Einfache PW Verschlüsselung mit MD5

[Klaus01]

TMD5digest = array[0..15] of Byte;

Du mußt das Array in einen String wandeln.
Dazu kannst Du die Funktion IntToHex verwenden.
Ein Byte entsprechen 2 HexZeichen.
Du bekommst dann einen String mit 32 Zeichen.

for i:=0 to 15
result:=result+IntToHex(MD5Digest[i],2);

oder du verwendest die Methode von freak4fun

Grüße
Klaus