Delphi 2010 字符串转化为MD5

   Delphi 2010 使用函数 MyMD5.HashStringAsHex(strtomd5)，把字符串strtomd5，转化为MD5。如下是实现的具体代码：

// 引用单元文体

 user   IdHashMessageDigest ;

//在函数中使用

var

  MyMD5: TIdHashMessageDigest5;   //user IdHashMessageDigest

  strtomd5:string;

begin

  MyMD5 := TIdHashMessageDigest5.Create;

strtomd5:='123';//转为md5的字符

  ShowMessage('32: ' + MyMD5.HashStringAsHex(strtomd5)); //显示32个字符长度的MD5签名结果

end