delphi 自带单元字符MD5加密

本文整理自网络，侵删。

 
uses System.Hash, System.DateUtils;
{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
var
  md5: THashMD5; //加密后的信息
begin
   Edit2.Text := UpperCase(md5.GetHashString(Edit1.text));
end；
 

相关阅读 >>

Delphi 判断字符串是否相同

Delphi 的tstringbuilder防止服务器内存碎片化

Delphi utf8乱码问题

Delphi validatename 过滤特殊字符

线程池的概念

Delphi 让程序只运行1次

Delphi apihook createprocess

Delphi 的运算符列表

Delphi 进程程序多开调用单元

Delphi Delphi 学习大师qq群讨论的字符串位置替换方法

更多相关阅读请进入《Delphi》频道 >>

转载请注明出处：木庄网络博客 » delphi 自带单元字符MD5加密