Keygen mit MD5 um Serial zu generieren !

[Delphiturbo]

Ich bekomme tatsächlich 32 Zeichen

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
//Edit1.text := md5Print(md5String('Dein String'));
Edit1.text := md5Print(md5String(Edit2.Text));
end;

Ich muss 3 Sachen haben : Key, Benutzername, Serial !
Wie kann ich testen