摘要: function GetMd5(AValue : string) : string; var md5 : TIdHashMessageDigest5; bytes,byte1 : TBytes; begin md5 := TIdHashMessageDigest5.Create; try Result := LowerCase( ... 阅读全文
posted @ 2017-04-09 21:50 不能失败 阅读(409) 评论(0) 推荐(0) 编辑