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

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

Найти все окна принадлежышие процессу.

TeNY ©   (2004-10-23 14:49:00) 

как Найти все окна принадлежышие процессу с хэдлом ХХХ,к примеру окно настроек которое открытом в нужной программе.

---

GuAV   (2004-10-23 15:38:00) [1]

function EnumThreadWndProc(hWnd: HWND; lParam: LPARAM): BOOL; stdcall;
begin
//...
end;

var
Wnd: HWND;
SI: TStartupInfo;
PI: TProcessInformation;
begin
Wnd:=0;
FillChar(SI, SizeOf(SI),0);
SI.cb:=SizeOf(SI);
CreateProcess(nil,'CALC.EXE',nil,nil,False,
  0,nil,nil,SI,PI);
WaitForInputIdle(PI.hProcess, INFINITE);
EnumThreadWindows(PI.dwThreadId,
  @EnumThreadWndProc, LPARAM(@Wnd));
CloseHandle(PI.hThread);
CloseHandle(PI.hProcess);
end;


---

TeNY   (2004-10-23 15:04:00) [2]

> TUser ©   (23.10.04 14:58) [1]
> EnumWindows, EnumChildWindows

А можно с примером пожалуйста а то с API тяжеловато у меня :(

---

TUser   (2004-10-23 14:58:00) [3]

EnumWindows, EnumChildWindows

---

Наверх