var sSrc, sDst: string; begin sSrc := EditSrc.Text; sDst := MD5Print(MD5String(sSrc)); EditDest.Text := sDst;
lazarus：将字符串加密生成md5码,布布扣,bubuko.com
lazarus：将字符串加密生成md5码
原文：http://www.cnblogs.com/cuibq/p/3822354.html
