首页 > 解决方案 > Delphi DEC CalcFile 消息

问题描述

我刚刚盯着 Delphi Encryption Compendium(我使用 GetIt 在 Delphi 10.4.2 中安装 v6.3)

这是我用来计算文件哈希的简单过程

var
 HASH : THash_SHA3_384;
 s : rawbytestring;
begin
  try
    HASH := THash_SHA3_384.Create;
    HASH.Init;
    s := HASH.CalcFile(edFilename.Text,Tformat_HEX);
    EdHashedFile.Text := s;
    hash.Done;
  finally
    HASH.Free;
  end;
end;

生成的哈希与计算 SHA3_384 的各种在线资源一致。

但是,在进行计算时会显示一个消息框。

“吸收:mod 8 <> 0 或挤压活动的位数。位:0,挤压:真。”

不知道重要不?如果是我该怎么办?如果不是我该如何抑制它?

非常感谢

标签: delphihash

解决方案


推荐阅读