Hi,
@PN:
Guckst du hier...
@Hagen: hm. Dann frage ich mich folgendes: wenn PHP mir bei einem beliebigen String mit
md5() den Wert
d41d8cd98f00b204e9800998ecf8427e ausgibt und mein Delphiprogramm, dass nach Assarbad's MD5-Eintrag in der CodeLib folgendermaßen aussieht
Delphi-Quellcode:
function MD5String(s:String): TMD5digest;
begin
result := MD5_Hash_OverBuffer( @s[1], Length(s) );
end;
function CreateMD5(s: String): string;
begin
Result := MD5_Hash2String(MD5String(s));
end;
procedure TfrmMain.Button1Click(Sender: TObject);
begin
edtOutput.Text := CreateMD5(edtInput.Text);
end;
dann
47f8a3c383d73373f3830ba72f02aad3 ausgibt, woran das liegen kann!? ...
Chris