Delphi中如何将 Exe 程序或其他资料打包在内,使用时再释放使用(转)

1、生成一个rc文件,文件格式如下:

rname exefile "test.exe"

//rname是资源名称

//exefile是资源类型

//text.exe是资源

资源类型列表:

Wave:资源文件是声音文件;

RCDATA:一般二进制文件;

AVI:AVI动画;

ICON:图标文件;

BITMAP:位图文件;

CURSOR:光标文件;

exefile: exe文件

FILE: 一般文件

2、将delphi安装目录下bin中的brcc32.exe文件拷出,用brcc32.exe执行

生成的rc文件,在dos窗口下 运行:brcc32 test.rc 生成正式的

后缀为.res的次源文件

3、在delphi中加入编译指令{$R test.res}用以编译。但注意,以上的test.exe文件

一定要在当前路径下存在。

4、调用:

var

t : TResourceStream;

begin

try

t := TResourceStream.Create(HInstance,'rname','exefile'); //其中HInstance为一个句柄常量;rname为资源名;exefile为资源类型

t.SaveToFile('c:\2.exe'); //保存文件成2.exe

finally

t.free;

end;

end;

上一篇:C++提高编程 3 STL常用容器


下一篇:python脚本自动登录