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;