DELPHI SHA1加密函数

  • 时间:
  • 来源:互联网

在命名空间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;

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

百度搜索SHA1加密:


     

本文链接http://element-ui.cn/news/show-577045.aspx