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

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

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。

代码

Code highlighting produced by Actipro CodeHighlighter (freeware)http://www.CodeHighlighter.com/--> 1

procedure 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程序了。

上一篇:Python的Web编程[2] -> WebService技术[0] -> 利用 Python 调用 WebService 接口


下一篇:京东无人超市的成长之路 如何利用AI技术在零售业做产品创新?