Hallo Hagen,
ich wollte auf Anregung in diesem Beitrag
Passwörter generieren.
http://www.delphi-praxis.de/topic747...e2c2145dd9c618
Code:
function Passwort: String
var
Buffer: array[0..1023] of Byte;
begin
CaptureInput(Buffer);
Result := THash_MD5.CalcBuffer(Buffer, SizeOf(Buffer), fmtMIME64);
end;
Leider ist in Deinen
DEC Sourcen nicht ein einziges mal der Begriff CaptureInput vorhanden.
Was macht diese Funktion ?
Ist das einfach eine Zufallsbefüllung des Buffers ?
bei THash_MD5.calcbuffer gibts noch einen Paramenter vom Typ TProtection.
kann der auf nil gesetzt werden ?
vielen Dank !
Gruß stoxx