Ich habe jetzt mal folgendes ausprobiert:
Code:
var
MyUTF8String: UTF8String;
HashString: UTF8String;
begin
myUTF8String := TFormat_HEX.Encode('blncjsdfj/jhj/mJdfldfskJd94kfjs93');
HashString := TFormat_HEX.Encode(THash_MD5.CalcBuffer(MyUTF8String[1], Length(MyUTF8String)));
Memo1.Lines.Add(HashString);
end;
Leider ohne Erfolg. Es kommt immer noch dasselbe Ergebnis heraus.
Meine Vermutung ist jetzt, dass es an der MD5-Klasse liegt...