请教MD5加密问题！

Question

我现在手上有一个md5.pas的文件，请问如何在delphi中实现MD5算法，我是想加密字符串，比如，加密文本框1中的内容，MD5加密后输出到文本框2，请给出详细调用代码，谢谢！

Answer 1

uses md5;
 1. Password='''+ UpperCase(MD5Print(MD5String(RzEdit3.Text)))；
 2. delphi自帶也有此功能；
 3.這個貼子已在最近也討論過，你可以找一下最近的貼子，見上面回復的！！！

Answer 2

uses MD5;procedure TForm1.Button1Click(Sender: TObject);
begin
edit2.Text:=StrMD5(edit1.text);
end;