![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Как запустить прогу и получить handle её главного окна? [D5, WinXP]
Deus © (2002-08-29 18:21:00)Казалось, что сложного?
делаем
CreateProcess(nil, "C:\WINDOWS\system32\calc.exe", nil, nil, false, 0, nil, nil, StartInfo, ProcInfo);
получаем в ProcInfo хандл процесса, перебираем окна, сравниваем GetWindowThreadProcessId.
Не находим....
GetGUIThreadInfo так же не помогает....
Deus (2002-08-30 12:52:00) [1]Опс. У меня оказывается всё правильно было.
Я просто в отладочное окно слал hProcess вместе dwProcess :)))
Сорри за беспокойство....
Ученик (2002-08-30 12:36:00) [2]procedure TForm1.Button1Click(Sender: TObject);
var
pi : TProcessInformation;
si : TStartupInfo;
begin
FillChar(si, SizeOf(TStartupInfo), 0);
si.cb := SizeOf(TStartupInfo);
if CreateProcess(NIL, "calc.exe",
NIL, NIL, False, 0, NIL, NIL, si, pi) then try
WaitForSingleObject(pi.hProcess, INFINITE)
finally
CloseHandle(pi.hThread);
CloseHandle(pi.hProcess)
end
end;
Deus (2002-08-30 12:33:00) [3]2Ученик:
Если не сложно, приведи код.
И, кстати, что ты запускаешь?
Ученик (2002-08-30 12:00:00) [4]>Deus © (30.08.02 11:33)
Может быть не с тем сравниваешь, я проверил ThreadID у окна и запущенного процесса они совпадают.
Deus (2002-08-30 11:33:00) [5]2Song:
"GetActiveWindow()"
А если оно неактивным запустилось?
2Ученик:
Гм...
А зачем?
Нужное окно я могу найти! Но GetWindowThreadProcessId возвращает иные значения, нежели чем возвращенные в ProcInfo.
Конкретный пример:
Я запускаю "c:\windows\calc.exe". CreateProcess в ProcInfo вернул значения:
ProcInfo.hProcess:=1932
ProcInfo.hThread:=1932
ProcInfo.dwProcessId:=1932
ProcInfo.dwThreadId:=1932
Перебираю окна, нахожу окно с ClassName="SciCalc".
Но GetWindowThreadProcessId=588!
Ученик (2002-08-30 09:21:00) [6]После CreateProcess, наверно надо, WaitForInputIdle
Song (2002-08-30 09:13:00) [7]GetActiveWindow()