Also,
ich hab mir nun die DCP Crypt komponenten runtergeladen.
Jedoch steig ich noch nicht wirklich durch.
Ich will "einfach" nur einen string verschlässeln mit dem blowfish algorithmus. Ich hab das mal versucht wie folgt zu testen, aber irgendwie erhalte ich ein komisch ergebnis:
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
begin
DCP_blowfish1.Init('58kkjl',256,nil);
Edit3.Text:=DCP_blowfish1.EncryptString(Edit1.Text);
end;
procedure TForm1.Button2Click(Sender: TObject);
begin
Edit4.Text:=DCP_blowfish1.DecryptString(Edit2.Text);
end;
Schreibe ich nun in edit1 einen text wie z.b. "Hallo" dann hab ich in Edit3 den verschlüsselten text, kopiere ich diesen in edit2 und will ihn dann nach edit4 entschlüsseln, kommt eine komische zeichenfolge raus, aber nicht wieder "hallo".
MfG - Ghost007
//Edit: Bei der kompo ist leider nur eine verschlüsselungs demo für einen file dabei.
//Edit: Hier der link zur kompo:
http://www.cityinthesky.co.uk/cryptography.html