server übergreifend

[himitsu]

Oder nur mit 'ner kleinen Pas.

Delphi-Quellcode:

Uses ..., UUHash_MD5;

Var P, S: String;
  H: MD5Digest; {MD5Digest = Array[0..15] of Byte}
  i: Integer;

Begin
  P := 'Dein Passwort';
  H := MD5String(P);
  S := '';
  For i := 0 to 15 do S := S + IntToHex(H[i], 2);
  ...
  {S = der MD5-Hash}

(du kannst die Datei auch umbenennen, wenn du willst)