Passworthash - einfach und schnell

[Sharky]

Zitat von p80286:

.... @sharky
wo kommt denn der MD5_HashforString her? hinke ich so hinterher?

Ziemlich weit unten in der MD5.pas :

Delphi-Quellcode:

{
  Danke an Sharky, der mich darauf hinwies, dass die Benutzer
  eine solche Funktion wohl lieber aufrufen würden.
  
  Sharky ist Moderator in der DP -> [url]http://www.delphipraxis.net/user4.html[/url]
}
function MD5_HashForString(aValue: String): TMD5Digest;
var
  Context: TMD5_CTX; 
begin 
  MD5Init(Context); 
  MD5Update(Context, @aValue[1], Length(aValue));
  MD5Final(Context, Result); 
end;