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;