本文整理自网络,侵删。
usesIdHashMessageDigest, IdHash, IdGlobal;
Function Md5Encode(const Source:string):string;var MD5:TIdHashMessageDigest5;begin MD5 :=TIdHashMessageDigest5.Create; Result :=MD5.HashStringAsHex(Source); MD5.Free;end;
相关阅读 >>
Delphi 获取适合微信使用的当前日期,以int64表示,是当前时间和1970-01-01 00:00:00之间的秒差
更多相关阅读请进入《Delphi》频道 >>