delphi自带md5的使用方法,在xe10.2版本测试通过。
uses单元中加入IdHashMessageDigest
procedure TForm1.Button1Click(Sender: TObject);var
MD5: TIdHashMessageDigest5;
begin
MD5 := TIdHashMessageDigest5.Create;
Edit2.Text := MD5.HashStringAsHex(Edit1.Text);
end;
貌似10.2中还有一个SHA的方法,回头慢慢研究一下。
本文介绍在Delphi XE10.2版本中如何使用内置的MD5加密功能来对字符串进行加密处理,并提供了具体的代码实现示例。

531

被折叠的 条评论
为什么被折叠?



