delphi中资源的添加与解压
来源:互联网 发布:东京淘宝网 编辑:程序博客网 时间:2024/06/15 23:18
有时候我们需要在主程序中添加sys和dll等二进制资源,当我们预期的sys和dll文件被删改时,我们可以从资源中解压。
首先编写资源脚本文件,测试的脚本my.rc内容很简单,只是当前目录的一个文件,代码如下:
viewpic bin ".\viewpic.exe"
然后我们需要将rc文件编译成res,那样我们的程序就可以添加资源,简单地用批处理写编译资源脚本build.bat:
brcc32 my.rc
运行build.bat,在my.rc的当前目录下会生成一个名为my.res的文件。
找到delphi工程文件中的"{$R *.res}",我们添加一行{$R my.res},这样我们的资源文件就添加到我们的主程序。
然后我们需要解压资源,简单地写一下过程,代码如下:
procedure ExtractRes(ResName,ResType,szFileName:string);
var
resStream:TResourceStream;
begin
//*.rc资源文件
//Wave,RCDATA,AVI,ICON,BITMAP,CURSOR
try
resStream := TResourceStream.Create(HInstance,ResName,PChar(ResType));
resStream.SaveToFile(szFileName);
finally
resStream.Free;
end;
end;
接着调用ExtractRes('viewpic','bin','c:\viewpic.exe');我们就可以发现c:\viewpic.exe文件已经生成,是不是很简单。
- delphi中资源的添加与解压
- Delphi的压缩流与解压流
- delphi压缩与解压_不需要特别的控件
- VS 2013中添加zlib源文件实现压缩与解压的工程配置过程
- Delphi 中压缩流和解压流的应用
- Delphi 中压缩流和解压流的应用
- Delphi中资源的简单应用
- Delphi中资源的简单应用
- Delphi XE2 压缩与解压 System.Zip
- delphi的资源文件
- delphi的资源文件
- Delphi的资源文件
- MFC中如何获取添加的资源
- 对MTK中添加资源的研究
- delphi 往数据库中添加图片与读取
- Delphi中使用资源文件.
- delphi中使用资源文件
- Delphi中使用资源文件的一点记录
- 解决[warn] _default_ VirtualHost overlap on port 80, the first has precedence问题
- DG2013SP1_1100U1.exe 与 ATEN 62US USB型多电脑切换器应用冲突
- sql server出生年月减去退休年月 计算年龄
- Please ensure that adb is correctly located at问题解决
- Sparsity and Some Basics of L1 Regularization
- delphi中资源的添加与解压
- 如何将BASE64编码的证书转换成C语言数组格式
- linux下svn客户端安装及环境配置
- c++与Python3互相调用
- Powershell随笔
- <Unity3D>NGUI插件中Atlas和Font的制作
- Mybatis+oracle 批量导入
- 根据四个角点计算其他点的值.使之平均
- c++动态加载DLL