Архив форумов ЦИТФорума

[Becks]

День добрый.
Необходимо из дельфевского приложения запускать различные другие приложение (например: Notepad.exe, Excel.exe, ... с заданным параметром - открываемым файлом), подскажите как сделать, плз.

[GREA]

Var
command:String;
si : Tstartupinfo;
p : Tprocessinformation;
begin
command:='app.exe';
Createproc ess(nil,PChar(command),nil,nil,false,Create_default_error_mo de,nil,nil,si,p);
Waitforsingleobject(p.hProcess,infinite);
//Последняя строка сворачивает твое приложение, пока запущена вызваная прога

[GREA]

ShellExecute(0,'open','text.txt',nil,nil,0);