• 设为首页
  • 点击收藏
  • 手机版
    手机扫一扫访问
    迪恩网络手机版
  • 关注官方公众号
    微信扫一扫关注
    公众号

在delphi的exe文件中嵌入另外一个exe文件

原作者: [db:作者] 来自: [db:来源] 收藏 邀请

原理:

     把需要包含的exe放入到进资源文件中,和原来的程序一起编译成一个exe文件,在程序第一次运行时释放出这个exe,然后调用这个exe文件。

 

步骤:

     1、创建rc文件。可以用任意文本编辑器来写。文件格式为:"资源名 资源类型 文件名"。

          对于资源类型,如果是exe文件,应该是EXEFILE,如果是二进制文件,则是RCDATA。  

           这里创建一个文件float.rc:

代码

1AEXE EXEFILE "E:\Software\float.exe"

 

     2、将这个rc文件转换成res文件。

         复制float.rc到DELPHI安装目录里的bin文件夹, 执行brcc32 float.rc,生成float.res 

 

     3、将这个res文件包含至工程文件中。

代码

1{$R   float.res}

    4、提取RES中的float.EXE。

 

代码
 1procedure TFormMain.IEEE7541Click(Sender: TObject);
 2
 3  var
 4    t : TResourceStream;
 5  begin
 6
 7  if FileExists('float.exe') then
 8    WinExec('float.exe',Sw_normal)
 9  else
10    begin
11      try
12        t := TResourceStream.Create(HInstance,'AEXE','EXEFILE'); //其中HInstance为一个句柄常量;rwww为资源名;exefile为资源类型
13       t.SaveToFile('float.exe');
14      finally
15        t.free;
16      end;
17      WinExec('float.exe',Sw_normal);
18    end;
19  end;

 

这样,就可以在一个exe文件中,调用另外一个exe程序了。

http://www.cnblogs.com/dabiao/archive/2009/11/28/delphi.html


鲜花

握手

雷人

路过

鸡蛋
该文章已有0人参与评论

请发表评论

全部评论

专题导读
热门推荐
阅读排行榜

扫描微信二维码

查看手机版网站

随时了解更新最新资讯

139-2527-9053

在线客服(服务时间 9:00~18:00)

在线QQ客服
地址:深圳市南山区西丽大学城创智工业园
电邮:jeky_zhao#qq.com
移动电话:139-2527-9053

Powered by 互联科技 X3.4© 2001-2213 极客世界.|Sitemap