delphi 把EXE可执行文件等作为资源包含在Delphi编译文件中

老魏的书架 2013-12-15

展开全文

换一种说法：

1、生成一个rc文件，文件格式如下：
    rwww exefile "test.exe"    //rwww是资源名称
                              //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,'rwww','exefile'); //其中HInstance为一个句柄常量；rwww为资源名；exefile为资源类型
          t.SaveToFile('c:\2.exe'); //保存文件成2.exe
        finally

          t.free;
        end;
      end;

读完这篇文章后，您心情如何？