Как получить названия окон?

← →
Ivan K. (2003-12-18 07:43) [0]

Как получить названия всех открытых окон в системе?

← →
MBo © (2003-12-18 08:06) [1]

EnumWindows

← →
DVM © (2003-12-18 10:31) [2]

+ GetWindowText()

← →
chi (2003-12-18 10:40) [3]

Wnd := GetWindow(Handle, gw_HWndFirst);
WHILE Wnd <> 0 DO
BEGIN
IF (Wnd <> Application.Handle) AND {-Собственное окно}
(IsWindowVisible(Wnd) AND {-Невидимые окна}
((GetWindow(Wnd, gw_Owner) = 0) AND {-Дочернии окна}
(GetWindowText(Wnd, buff, sizeof(buff)) <> 0) {-Окна без заголовков}
THEN
BEGIN
GetWindowText(Wnd, buff, sizeof(buff));
END;
Wnd := GetWindow(Wnd, gw_hWndNext);
END;

> chi (18.12.03 10:40) [3]

EnumWindows лучше. C GetWindow можно в бесконечный цикл попасть. Не очень надежно.

Как получить названия окон? Найти похожие ветки