kbmMW TkbmMWHashSHA256与Delphi 10.2 THashSHA2算出相同的结果

2021-03-30 02:26

阅读：615

标签：label create send span alt salt proc click div

procedure TForm2.Button3Click(Sender: TObject);
var
  hashed:string;
begin
  hashed:=TkbmMWHashSHA256.HashAsString(‘mypassword‘,‘somesaltvalue‘);
  Label1.Caption:=‘TkbmMWHashSHA256=‘+hashed;
end;

procedure TForm2.Button4Click(Sender: TObject);
var
  hashed:string;

//  hashed:=THashSHA2.GetHashString(‘a3k4p5‘);
//  hashed:=THashSHA2.GetHMAC(‘a3k4p5‘,‘somesaltvalue‘);
//  Label2.Caption:=‘Delphi THashSHA2.GetHMAC=‘+hashed.ToUpper;
  LSHA2: THashSHA2;
begin
  LSHA2 := THashSHA2.Create;//(SHA256);
  LSHA2.Update(‘somesaltvalue‘);
  LSHA2.Update(‘mypassword‘);
  hashed:=LSHA2.HashAsString;
  Label2.Caption:=‘Delphi LSHA2.HashAsString=‘+hashed.ToUpper;
end;

end.

标签：label create send span alt salt proc click div

原文地址：https://www.cnblogs.com/kinglandsoft/p/9285039.html

上一篇：编辑文件警告Swap file “apiserver.swp…” already exists!

下一篇：2.服务网关API-GETWAY

文章来自：搜素材网的编程语言模块，转载请注明文章出处。
文章标题：kbmMW TkbmMWHashSHA256与Delphi 10.2 THashSHA2算出相同的结果
文章链接：http://soscw.com/index.php/essay/69787.html

亲，登录后才可以留言！

kbmMW TkbmMWHashSHA256与Delphi 10.2 THashSHA2算出相同的结果

评论

热门文章

推荐文章

最新文章

置顶文章