mirror of
https://github.com/rejetto/hfs2.git
synced 2025-12-19 10:03:56 +01:00
fix: login with MD5
This commit is contained in:
parent
b33136e3b0
commit
28b1919ffd
4
main.pas
4
main.pas
@ -1938,10 +1938,10 @@ result:=length(ips);
|
||||
end; // countIPs
|
||||
|
||||
function strSHA256(s:string):string;
|
||||
begin result:=THashSHA2.GetHashString(s) end;
|
||||
begin result:=upperCase( THashSHA2.GetHashString(s) ) end;
|
||||
|
||||
function strMD5(s:string):string;
|
||||
begin result:=THashMD5.GetHashString(s) end;
|
||||
begin result:=uppercase( THashMD5.GetHashString(s) ) end;
|
||||
|
||||
function idx_img2ico(i:integer):integer;
|
||||
begin
|
||||
|
||||
Loading…
Reference in New Issue
Block a user