从字符串转换为SHA256

Question

我是delphi的初学者。 在Delphi XE2中，我可以使用我的函数将 String 转换为 Sha256 。但我的功能在Delphi7中不起作用。 Delphi7中是否有任何函数可以从 String 转换为 Sha256 ？这是我的功能：

function GetSHA256Str(const str : Ansistring) : Ansistring;
begin
  IdSSLOpenSSL.LoadOpenSSLLibrary;
  with TIdHashSHA256.Create do
  try
    Result := LowerCase( HashStringAsHex(str) );
  finally
    Free;
  end;
  IdSSLOpenSSL.UnLoadOpenSSLLibrary;
end; 

Answer 1

我遇到了同样的问题并写了这些问题：http://yoy.be/md5.html（它说MD5，但那里还有SHA256）