将MD5串原文写入文件中，用UE打开显示的前16字节就是MD5原文
2010-04-21 21:22
786 查看
代码
Str := GetFileMD5(mmo1.Lines[i]);
n := 0;
for j := 1 to 16 do begin
n := j * 2 - 1;
Str1 := Str
+ Str[n+1];
fMD5[j-1] := StrToInt('$' + Str1);
end;
FileInfoStream.Write(fMD5, 16);
Str := GetFileMD5(mmo1.Lines[i]);
n := 0;
for j := 1 to 16 do begin
n := j * 2 - 1;
Str1 := Str
+ Str[n+1];
fMD5[j-1] := StrToInt('$' + Str1);
end;
FileInfoStream.Write(fMD5, 16);
内容来自用户分享和网络整理，不保证内容的准确性，如有侵权内容，可联系管理员处理 
相关文章推荐
- 文件操作方法大全以及文件打开的其他一些模式sys.stdout.write()就是标准输出到你当前的屏幕 sys.stdout.flush()把内存立即显示到您当前的屏幕
- linux 下，vi文件时，显示这两个错误，E297: 交换文件写入错误 E303：不能打开交换文件
- 在使用O_APPEND 标志并以写打开一个已存在的文件，然后用lseek函数将偏移置于开头，在写入数据，写入的数据会显示在那个位置呢？？？
- UltraEdit打开文件总弹出什么dos格式 && &&UltraEdit标签消失 && UE显示函数列表
- mfc从磁盘中打开图像文件并显示在图像控件中
- 解决 Mac Pro 用 Excel 打开 CSV 文件不能正常显示的问题
- PHP文件打开、关闭、写入的判断与执行代码
- 解决chm文件打开，无显示内容
- 用Powerpoint打开ppt文件出现提示："PowerPoint无法显示文件中某些幻灯片中的文字、图像或对象，“xx.ppt”解决办法
- 例7.12 将 a 至 z的26个英文字母写入文件，而后从该文件中读取并显示出来。
- vim中 E212：无法打开并写入文件 的解决办法
- 关于部署好tomcat的环境下 jsp文件在eclipse中能运行，但是在浏览器打开时显示404错误的个人笔记
- vs visual studio 2015中如何在当前的项目管理器中打开文件？如何打开指定的方法名称，如何显示到指定的方法的那个位置
- 移动硬盘提示未格式化,显示0字节,文件系统为RAW格式的数据恢复
- SecureCRT打开UTF-8文件显示乱码的解决办法
- chm格式文件打开出错：无法显示网页
- opencv 读取视频、打开摄像头、写入视频文件
- Windows7 64位电脑打开*.chm文件，无法显示内容
- vim——打开多个文件、同时显示多个文件、在文件之间切换
- 有两种情况，会出现打开的文件都显示^M符号