怕了你们了, 先看看下面这篇文章吧:
http://www.delphibbs.com/delphibbs/dispq.asp?lid=690315
做法很简单:
先编辑一个文本文件起名为MyRes.rc,内容如下:
TESTEXE EXERES C:/Test.exe
然后用Borland带的brcc32.exe编译成.res资源文件
在你的工程中加上{$R MyRes.res}
要执行的时候先把它解到临时目录:
with TResourceStream.Create(HInstance, 'TESTEXE', 'EXERES') do
try
; SaveToFile('C:/Windows/Temp/A.exe');
finally
; Free;
end;
执行之:
ShellExecute(Handle, 'open', 'C:/Windows/Temp/A.exe', nil, nil, 0);
说得很清楚了吧?