DELPHI 使用 HmacSha1

DELPHI 使用 HmacSha1


uses   System.Hash

procedure TForm1.btn1Click(Sender: TObject);
var
 data, key: string;
begin
 data := 'XXXXX';
 key := 'key';
 mmo1.Text:=THashSHA1.Create.GetHMAC(data, key);
end;

来源：https://blog.csdn.net/jxt0533/article/details/84313950