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

时间:2021-12-31 02:27:44

对于资源类型,如果是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。

代码 Code highlighting produced by Actipro CodeHighlighter (freeware)> 1procedure TFormMain.IEEE7541Click(Sender: TObject); 3 var t : TResourceStream; begin 7 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程序了。

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