Как найти окно по заголовку с определенным словом?

[tozter]

Задача:

найти окна с определенным словосочетанием.

Как найти окно с заранее известным текстом - это ясно, а вот как найти окно с определенным словом в этом тексте - не понятно.

[Человек_Борща]

EnumWindows+проверка на видимость+рекурсивные переход по дереву компонентов окна.

[haruhi]

Сообщение от tozter

найти окна с определенным словосочетанием.

Как найти окно с заранее известным текстом - это ясно, а вот как найти окно с определенным словом в этом тексте - не понятно.

только ручной перебор всех окон с анализом каждого заголовка

[tozter]

Сделал так, оцените:

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));
      for W := 1 to MaxNameWin do
        begin
            position := AnsiPos('progname'), StrPas(buff));
            if position <> 0 then
             PostMessage(wnd, WM_CLOSE, 1,0);
             CloseWindow(wnd);
        end;
    end;
wnd := GetWindow(wnd, gw_hwndnext);
end;

[Человек_Борща]

Неплохо. Но что менает использовать системный перебор окон EnumWindows?

[tozter]

Сообщение от Человек_Борща

Неплохо. Но что менает использовать системный перебор окон EnumWindows?

EnumWindows - первый раз вижу, поэтому сделал по старинке - руками.

EnumWindows то же смотрю.....