function GetSHA1OfUnicodeString(const S: String): String;
Gets the SHA-1 hash of the specified string, as a string.
var SHA1: String; begin SHA1 := GetSHA1OfUnicodeString('Test'); // SHA1 = '9ab696a37604d665dc97134dbee44cfe70451b1a' end;