delphi MD5 和 SHA1加密方法

作品分类:编程随笔 2018-06-29

引用单元:   system.hash     IdHashMessageDigest

MD5例子:

var
 asign:string; //定义字符串
  md5: THashMD5; //加密后的信息
begin
 asign:='123456';  
 asign := LowerCase(md5.GetHashString(asign)); //32位字符串
end;

SHA1例子:

var
 asign:string; //定义字符串 
begin
 asign:='123456';  
 asign:= system.hash.THashSHA1.GetHashString(asign);//40位字符串
end;


验证网址:http://www.ttmd5.com/hash.php?type=5

二维码
意见反馈