RSS订阅 | 匿名投稿
您的位置:网站首页 > 加密 > 正文

DELPHI SHA1加密函数

作者:admin 来源: 日期:2018/1/18 8:05:47 人气: 标签:

在命名空间IdHashSHA,有个函数TidHashSHa1类,用作SHA1加密;

该类的方法Methods有

Constructor:creat

Methods:HashtoHex(const aHash:TidBytes):string;override;

 

                    HashBytesAsHex(const aHash:TidBytes):string;该方法将TidBytes类型返回string类;

 

                   HashStringAsHex(const AStr:String;ADestEncoding:TidTextEncoding=nil):string

 

常规SHA1(utf-8)加密:40位SHA1大写

 

使用HashBytesAsHex代码如下:

function sha1(input:string):string;  

  var  

  temp:tidbytes;  

begin  

    with tidhashsha1.create do  

     try  

       result:=HashBytesAsHex(TdBytes(Bytesof(input)));  

       //result:=HashStringAsHex(input);  

     finally  

      free;  

    end;  

end;  

关于验证自己写的加密函数对错的方法:


读完这篇文章后,您心情如何?
0
0
0
0
0
0
0
0
本文网址: