Список форм

← →
_NoS_ © (2003-07-10 16:49) [0]

Подскажите люди добрые как мне получить список всех открытых форм и размещенных на них всяких label"ов, edit"ов и т.д.

← →
clickmaker © (2003-07-10 17:06) [1]

Screen.Forms
Form.Controls

← →
Spawn © (2003-07-10 22:00) [2]

GetWindow+GW_HWNDFIRST+GW_HWNDNEXT

← →
_NoS_ © (2003-07-12 16:21) [3]

Spawn, что значит "GetWindow+GW_HWNDFIRST+GW_HWNDNEXT"?

← →
Spawn © (2003-07-12 18:35) [4]

ну например так. Только тебе нужно самому отделять куда какие хендлы относятся:

Wnd := GetWindow(Form1.Handle, gw_HWndFirst); while Wnd <> 0 do begin if (Wnd <> Application.Handle) then //Делаешь что то if (GetWindow(Wnd, gw_Owner) = 0) then //Делаешь что то ( Wnd, gw_hWndNext) ну например так. Только тебе нужно самому отделять куда какие хендлы относятся: Wnd := GetWindow(Form1.Handle, gw_HWndFirst); while Wnd <> 0 do begin if (Wnd <> Application.Handle) then //Делаешь что то if (GetWindow(Wnd, gw_Owner) = 0) then //Делаешь что то Wnd := GetWindow(Wnd, gw_hWndNext); end; Обрати внимание также и на такие функции как IsWindow(), IsWindowWisible(), IsZoomed(), IsChild() и т.д. По идее можно ето еще сделать путем поиска окон через EnumWindows+FindWindowEx(Для нахождения хендлов контролов окна, если EnumWindows этого не дает, а то щас не помню:)) )

← →
Song © (2003-07-12 19:54) [5]

EnumWindows()+EnumChildWindows()

Song, что значит "EnumWindows()+EnumChildWindows()"?

Это ф-ии АПИ

Список форм Найти похожие ветки