请教delphi xe SHA256 加密问题
delphi吧
全部回复
仅看楼主
level 1
黑白星辉 楼主
首先,我使用Delphi Xe indy 直接哈希后返回值为空,代码如下:
uses IdHashSHA, IdGlobal;
function SHA256(Input: String): String;
begin
with TIdHashSHA256.Create do
try
Result := LowerCase(HashBytesAsHex(TidBytes(Bytesof(Input))));
finally
Free;
end;
end;
然后使用第三方工具dcpcrypt_2.0.4.1_xe2
测试结果生成的哈希值和我希望的不一致。
请问各位怎么解决?
明文:dxh320780wibble480771000.507977244061004
正确的SHA256值:89c3671e7f743d6d72c65f663fcf342edd77eb7e5cfac8bd0d15d12a43a5542d
2015年06月03日 15点06分 1
吧务
level 14
用platformbytesof呢?
2015年06月03日 16点06分 2
level 10
TEncoding.XXXX.GetBytes
XXXX 就是你期望的。
2015年06月04日 01点06分 3
1