اجرای فایل EXE در یک پروژه

[Moh1361sen]

با سلام خدمت دوستان
من میخوام یک برنامه EXE رو در داخل پروژه بیارم تا بتونم ازش مثل یک فرم آماده استفاده کنم
چه راهی رو پیشنهاد می‌کنید.
با تشکر

[Delphi Coder]

CreateProcess
یا WinExec

[Moh1361sen]

دوست من امکان داره مقداری بیشتر توضیح بدید من که چیزی متوجه نشدم

[Delphi Coder]

اینا دو تا Procedure باعث میشن تا Internet Explorer اجرا بشه. تو MSDN روش دوم پیشنهاد میشه.

procedure TForm1.Button1Click(Sender: TObject);
begin
WinExec('C:\Program Files\Internet Explorer\IExplore.EXE',SW_SHOW)
end;


procedure TForm1.Button1Click(Sender: TObject);
var
StartInfo: TStartupInfo;
ProcInfo: TProcessInformation;
begin
FillChar(StartInfo,SizeOf(TStartupInfo),#0);
FillChar(ProcInfo,SizeOf(TProcessInformation),#0);
CreateProcess('C:\Program Files\Internet Explorer\IExplore.EXE',nil, nil, nil,False,0,nil, nil, StartInfo, ProcInfo);
end;

[rasool_brn]

از ShellExecute هم می تونی استفاده کنی:

uses
shellapi;
.
.
.
procedure OpenFile(FileName: string);
var
c: array[0..800] of Char;
begin
StrPCopy(c, FileName);
ShellExecute(Application.Handle, 'open', c, nil, nil, SW_NORMAL);
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
OpenFile('C:\Program Files\Internet Explorer\IExplore.EXE');
end;

[vcldeveloper]

1000 بار توضیح داده شده!!!!