Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Как запустить прогу и получить 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()


Наверх

Титульная страница Поиск, карта сайта Написать письмо