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
|
end; // countIPs
|
||||||
|
|
||||||
function strSHA256(s:string):string;
|
function strSHA256(s:string):string;
|
||||||
begin result:=THashSHA2.GetHashString(s) end;
|
begin result:=upperCase( THashSHA2.GetHashString(s) ) end;
|
||||||
|
|
||||||
function strMD5(s:string):string;
|
function strMD5(s:string):string;
|
||||||
begin result:=THashMD5.GetHashString(s) end;
|
begin result:=uppercase( THashMD5.GetHashString(s) ) end;
|
||||||
|
|
||||||
function idx_img2ico(i:integer):integer;
|
function idx_img2ico(i:integer):integer;
|
||||||
begin
|
begin
|
||||||
|
|||||||
Loading…
Reference in New Issue
Block a user