hier hat Hagen auch noch einen kleinen Generatoransatz zum Passworterstellen angezeigt..versuch mal damit ob das Ergebnis als sicher eingestuft wird:
Delphi-Quellcode:
function Passwort: String
var
Buffer: array[0..1023] of Byte;
begin
CaptureInput(Buffer);
Result := THash_MD5.CalcBuffer(Buffer, SizeOf(Buffer), fmtMIME64);
end;