请问：账户密码修改界面中输入的帐号密码 如何实现MD5加密

Question

我编了一个账户密码修改窗口，需要输入帐号和密码，请问如何把输入的帐号和密码进行MD5加密后存储在SQL数据库中？

Answer 1

直接调用MD5算法生成MD5编码就行了。下面是生成MD5编码的一个函数：uses
  IdHash, IdHashMessageDigest;function MD5String(str: String): String;
var
  Digest: T4x4LongWordRecord;
  sTemp : String;
begin
  with TIdHashMessageDigest5.Create do Digest := HashValue(str);
  SetLength(sTemp, Sizeof(Digest));
  CopyMemory (@sTemp[1], @Digest, Sizeof(Digest));
  Result := PChar(sTemp);
end;