delphi 10.1 Berlin 中使用自带的 MD5 校验
2024-08-27 06:02:34
uses
System.Hash;//要引用这个单元哈 var
Digest: TBytes;
MD5: THashMD5;
MD5Buf: TBytes;
params: string;
begin
SetLength(MD5Buf, Length(...));//做一些自己爱做的处理
MD5.Reset;
MD5.Update(MD5Buf);
Digest := MD5.HashAsBytes; //返回 TBytes
params := MD5.HashAsString;//返回 string
end;
很愉快的就得到结果了,无论是要字符串形式还是要别的。
因为从 delphi XE5 开始,一波隆就开始废弃了 ShortString AnsiString AnsiChar PAnsiChar PPAnsiChar UTF8String PUTF8String RawByteString PRawByteString 等(当然,如果依依不舍还是有补丁可以下载的,但根本没必要,旧的不去,新的不来),以前的还需要第三方的单元,现在越来越简单的自带了。
补丁下载参见:http://andy.jgknet.de/blog/2013/10/the-return-of-the-byte-strings/
最新文章
- Web应用性能优化思路
- css中的1px并不总等于设备的1px(高分辨率不等 低分辨等)
- java虚拟机之垃圾收集器
- POJ 3281	Dining 最大流
- JMS学习(三)JMS 消息结构之属性及消息体详解
- javaBean的使用方法;
- SQL Server 一些关键字详解(一)
- 使用var声明的变量 和 直接赋值并未声明的变量的区别
- javascript数组详解
- 常用的js代码
- mysql中isnull,ifnull,nullif的用法
- eclipse 改包名
- 跨站的艺术-XSS Fuzzing 的技巧
- iOS地理围栏技术的应用
- Command ";python setup.py egg_info"; failed with error code 10
- 使用我的编译器,下面的代码 int i=7; printf(";%d\n";, i++ * i++); 返回 49?不管按什么顺序计算, 难道不该打印出56吗?
- 文本处理三剑客之grep
- 合并排序 java
- Python内置类型(3)——比较
- Doxygen简单经验谈。。。