delphi 资源文件释放exe （源码）.rar下载

weixin_39821746 2020-08-13 02:30:46

A.exe 释放 b.exe文件

操作说明：http://blog.csdn.net/qq_14876677/article/details/51760393
相关下载链接：//download.csdn.net/download/qq_14876677/9559634?utm_source=bbsseo

...全文

8 回复打赏收藏转发到动态举报

写回复

用AI写文章

切换为时间正序

请发表友善的回复…

发表回复

Delphi 从资源文件中释放exe程序，从1.exe文件中释放出2.exe，并且修改资源文件2的变量值，就是我们1.exe程序需要修改的值,写成XXXXX便于我们查找它的位置。地址在 0004DD8C 转换成10 进制就是318844 （这个很关键，记下来）。

A.exe 释放 b.exe文件操作说明：http://blog.csdn.net/qq_14876677/article/details/51760393

前段时间烈火下载给大家提供了一款Flash文件转EXE的Delphi源代码，我们知道SWF转EXE是很常见的，那么反相转换（EXE转Flash）你有没有见过呢？今天就带给大家这样的源程序。SWF就Flash的一种生成格式，依靠自已公司的FlashPlyaer插件运行，如果要想脱离插件，需导出成EXE文件格式，用Flash软件可以，如果没有可以自己写程序将SWF转换成EXE,将EXE转换成SWF是个逆过程，具体请看代码。 // 将Edit1中的路径赋给exeFileName变量 exeFileName := Edit1.Text; // 修改EXE路径中的扩展名，以获取SWF文件的存储路径。 swfFileName := ChangeFileExt(exeFileName, ‘.swf‘); // 检查指定的EXE文件是否存在，如果不存在则退出过程，不做任何处理。 if not FileExists(exeFileName) then begin ShowMessage(‘文件未找到．); Exit; end; // 分别创建swfFile及exeFile对象 // 创建空的swf文件并赋于写入的权限(fmOpenWrite) swfFile:=TFileStream.Create(swfFileName, fmCreate or fmOpenWrite); // 打开EXE文件，并赋于读取的权限(fmOpenRead) exeFile:=TFileStream.Create(exeFileName, fmOpenRead); // 从EXE文件开头搜索 // 将文件指针移到存储SWF文件大小的地方 // exeFile.Size用于获取整个EXE文件的大小，减去4个字节正好是SWF文件大小储存的地方 exeFile.Seek(exeFile.Size - 4, soFromBeginning); // 读出SWF文件的大小 exeFile.Read(nFileSize, 4); // 将文件指针移动到SWF文件开始处 exeFile.Seek(exeFile.Size - (nFileSize 8), soFromBeginning); // 将SWF文件所有内容复制到swfFile对象中去 // 此时SWf文件内容已保存在硬盘中了 swfFile.CopyFrom(exeFile, nFileSize); // 释放资源 swfFile.Free; exeFile.Free; ShowMessage(‘SWF文件已成功还原．); end;

Delphi ShellExecuteHook 源码示例，添加Url执行挂钩，释放资源到文件，定位资源，锁定内存，建立文件，写入文件，添加Hook，URL 执行挂钩作者：By 麻子。

Delphi环境下的FastReports 报表3 支持中文附代码，修改PDF中文乱码,将过程替换frxPDFFile.pas中的过程就可以了,使用时请将报表中可视内容的字符集CHINESE_GB2312就可以了.修正在简体系统下繁体字体名的问题，只提供 MingLiU, PMingLiU --> 细明体, 新细明体的修正。文件列表：　　Fast Reports V3.15 输出CJK PDF完美解决方案　　frxPDFfile.pas 　　Fast Reports3.15 中PDF中文乱码-二娃　　fr3.15汉化资源　　使用注意：将压缩包中文件释放到ResChinese下，先运行mkd6.bat(Delphi6)，然后到Delphi中重新编译frx6.dpk,frx6e.dpk并将生成的bpl文件拷贝到有关目录下即可。

下载资源悬赏专区

12,867

社区成员

12,418,943

社区内容

发帖

与我相关

我的任务

其他技术论坛（原bbs）

社区管理员

加入社区

近7日
近30日
至今

加载中

查看更多榜单

社区公告

暂无公告

试试用AI创作助手写篇文章吧

+ 用AI写文章

delphi 资源 文件释放exe （源码）.rar下载

delphi 资源文件释放exe （源码）.rar下载