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;