Pascal Scripting: GetSHA1OfUnicodeString

Prototype:

function GetSHA1OfUnicodeString(const S: String): String;

Description:

Gets the SHA-1 hash of the specified string, as a string.

Causes an internal error if called by non Unicode Setup or Uninstall.

Example:
var
  SHA1: String;
begin
  SHA1 := GetSHA1OfUnicodeString('Test');
  // SHA1 = '9ab696a37604d665dc97134dbee44cfe70451b1a'
end;