unit Hash_u;

interface

uses SysUtils, System, System.Hash;

Function hash(sPassword : string) : string;

implementation

Function hash(sString : string) : string;
begin
// Hash password
  result := THashMD5.GetHashString(sString)
end;

end.
