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

原理:

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

步骤:

1、创建rc文件。可以用任意文本编辑器来写。文件格式为:"资源名 资源类型 文件名"。
对于资源类型,如果是exe文件,应该是EXEFILE,如果是二进制文件,则是RCDATA。
这里创建一个文件float.rc:

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

2、将这个rc文件转换成res文件。 复制float.rc到DELPHI安装目录里的bin文件夹, 执行brcc32 float.rc,生成float.res

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

{$R   float.res}

4、提取RES中的float.EXE。

procedure TFormMain.IEEE7541Click(Sender: TObject);

 var  t : TResourceStream;

 begin

   if FileExists('float.exe') then

   WinExec('float.exe',Sw_normal)

 else

   begin

     try

       t := TResourceStream.Create(HInstance,'AEXE','EXEFILE'); //其中HInstance为一个句柄常量;rwww为资源名;exefile为资源类型

      t.SaveToFile('float.exe');

     finally

       t.free;

     end;

     WinExec('float.exe',Sw_normal);

   end;

 end;

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

转载于:https://blog.51cto.com/alun51cto/2398822

  • 0
    点赞
  • 0
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值