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 rest客户端程序

Delphi整理二（object pascal语言）

Delphi idhttp读取网页重定向

Delphi getmodulefilename函数的用法(可以获取项目的路径，桌面的路径，我的文档的路径)

Delphi 在内存中直接运行exe类型的资源文件

Delphi xe更改ttrayicon系统任务栏图标（无模糊）

Delphi用idhttp.get访问一个网址返回403错误，但用ie浏览器访问正常

Delphi在64位系统下读写注册表

Delphi 打包文件到apk安装包中

Delphi win10系统通知 notificationcenter1 基本用法

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

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