利用Indy组件进行MD5验证简例

需要引用的单元：IdHashMessageDigest 和 IdHash （不知道对应那个组件，我是直接在uses里引用的）

代码简例：
var
  md5 : TIdHashMessageDigest5;
  longWordRec : T4x4LongWordRecord;
begin
  md5 := TIdHashMessageDigest5.Create;
  longWordRec:=md5.HashValue('string');
  ShowMessage(md5 .AsHex(longWordRec));
end;

简单说明：
TIdHashMessageDigest5 类是在 IdHashMessageDigest 中声明的
T4x4LongWordRecord 类是在 IdHash 中声明的
md5.HashValue('string') 这个方法返回一个 T4x4LongWordRecord 类型的MD5签名后结果，参数可以是 字符串或者 流对象
md5 .AsHex(longWordRec) 这个方法返回的是 T4x4LongWordRecord 类型参数转换成字符串形式

也是偶然发现原来delphi自带了MD5加密方法，这下就不用自己费劲写了，拿来用就好啦，咔咔～～