Delphi sha1加密源码

之前网上找的sha1加密都有问题，多语言加密都不一致，这个事自己写的，和其他语言做比对后，都一致。Delphi sha1加密源码，delphi 写的加密和C#，PHP，三种语言比对，都是一致的。

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----
     目录           0  2016-08-05 16:05  TestSHA1\
     文件       17432  2016-08-05 00:22  TestSHA1\CnSHA1.pas
     文件         398  2016-08-05 00:18  TestSHA1\Project1.cfg
     文件        1096  2016-08-05 00:18  TestSHA1\Project1.dof
     文件         188  2016-08-05 00:18  TestSHA1\Project1.dpr
     文件      411136  2016-08-05 15:57  TestSHA1\Project1.exe
     文件         876  2016-08-05 00:07  TestSHA1\Project1.res
     文件         996  2016-08-05 15:57  TestSHA1\Unit1.dfm
     文件         591  2016-08-05 15:57  TestSHA1\Unit1.pas