Запуск стороннего приложения

← →
Ламот (2006-04-04 14:14) [0]

Добрый день, подскажите пож., необходимо запустить "чужое" приложение, дождаться пока оно отработает (будет закрыто пользователем) и продолжить выполнение своей программки... если мне не изменяет память - была когда-то соответствующая функция, которой в качестве параметров передовался путь к приложению и флаги (в том числе - ждать)... ежелить такие функции есть - напомните пож. как они звучат (называются).
Зарание пасиба! ))

← →
Сергей М. © (2006-04-04 14:18) [1]

Среди стандартных ф-ций в составе Делфи таковых нет.

Запуск :

CreateProcess()
ShellExecute()

Ожидание :

WaitForSingleObject(), MsgWaitForMultipleObujects()

← →
Ламот (2006-04-04 14:24) [2]

2 Сергей М. © - дякую! вопросов больше не имеем! )))

← →
Ламот (2006-04-05 17:41) [3]

... поторопился с выводами...
объясните пож.
1. ShellExecute() по моему должен возвращать хендл запущенного приложения или код ошибки, так?!
2. что такое 42 — это значение, которое возвращает мне ShellExecute(), когда отрабатывает без ошибки...
3. итого, мне нужно запустить приложение и получить его хендл, с createprocess - не разобрался (параметров там слишком много), WinExec - тоже хендла не возвращает... в какую сторону рыть?!
Извените если чересчур сумбурно получилось! ))

← →
MBo © (2006-04-05 17:48) [4]

в FAQ есть пример для CreateProcess

← →
Khim © (2006-04-05 19:08) [5]

var
h: hwnd;
begin
if findwindow("nil","заголовок окна")<>0 then
h:=findwindow("nil","заголовок окна")<>0 then
h-хендл твоего окна

← →
TUser © (2006-04-05 19:33) [6]

procedure RunAndWait; var {$ifdef fpc} PI:_PROCESS_INFORMATION; SI:STARTUPINFO; {$else} SI: _STARTUPINFOA; PI: _PROCESS_INFORMATION; {$endif} begin FillChar(SI, sizeof(SI), #0); SI.cb:=sizeof(SI); FillChar(PI, sizeof(PI), #0); CreateProcess(nil,PAnsiChar(Command),nil,nil,false,0,nil,nil,SI,PI); WaitForSingleObject(PI.hProcess,INFINITE); end;

← →
Anatoly Podgoretsky © (2006-04-05 20:04) [7]

Khim © (05.04.06 19:08) [5]
h:=findwindow("nil","заголовок окна")<>0 then

А это что такое, хочешь сказать, что Дельфи это съест?

← →
Ламот (2006-04-06 09:25) [8]

2 MBo © - от теперь точно ОНО, пасиба! )))
2 Khim © - пасибо за участие...
2 TUser © - Ого! первый раз вижу подобные кострукции в Var"e... ща буду пробовать! )))

В общем рискну: всем еще раз пасиба, вопрос... "прикрыт", как минимум до появления новых! :))

← →
Ламот (2006-04-06 11:35) [9]

Надеюсь я не сильно надоел? ))
Еще вопрос — как можно прочитать параметры, передаваемые моей программе из командной строки?

> Ламот (06.04.06 11:35) [9]

> Еще вопрос — как можно прочитать параметры, передаваемые
> моей программе из командной строки?

ParamStr

--
Regards, LVT.

← →
Ламот (2006-04-06 11:54) [11]

с запускателями есть еще нехрошая фича - 16-битные программы очень тяжело отследить, дышит он а или уже отдышалась, ибо запускаются через ntvdm

← →
Ламот (2006-04-06 15:22) [13]

Запуск стороннего приложения Найти похожие ветки