DELPHI FINDWINDOW НАЙТИ ВСЕ ОКНА
Delphi - это язык программирования, который используется для создания приложений на платформе Windows. FindWindow - это функция WinAPI, которая позволяет найти окно по его имени или классу. С помощью FindWindow можно найти как основные окна приложений, так и различные диалоговые окна.
Для использования функции FindWindow в Delphi необходимо подключить модуль Windows в разделе uses:
uses Windows;
Пример использования функции FindWindow для поиска основного окна формы с заголовком "MyForm":
var hWnd: HWND;begin hWnd := FindWindow(nil, 'MyForm'); if hWnd = 0 then ShowMessage('Window not found') else ShowMessage('Window found');end;
Пример использования функции FindWindow для поиска диалогового окна с классом "TOpenDialog":
var hWnd: HWND;begin hWnd := FindWindow('TOpenDialog', nil); if hWnd = 0 then ShowMessage('Dialog not found') else ShowMessage('Dialog found');end;
Также можно использовать функцию EnumWindows для перебора всех окон и поиска нужного. Пример использования EnumWindows для поиска основного окна формы с заголовком "MyForm":
function EnumWindowsProc(hWnd: HWND; lParam: LPARAM): BOOL; stdcall;var S: array[0..255] of Char;begin GetWindowText(hWnd, S, 255); if S = 'MyForm' then begin PHandle(lParam)^ := hWnd; Result := False; Exit; end; Result := True;end;var hWnd: HWND;begin hWnd := 0; EnumWindows(@EnumWindowsProc, LPARAM(@hWnd)); if hWnd = 0 then ShowMessage('Window not found') else ShowMessage('Window found');end;
Программирование в Delphi Урок 8. Компоненты Главное меню и диалоговые окна
HWND Controls Работа с окнами чужих приложений Delphi XE
Уроки WinApi C++ - Работа с окнами виндовс - HWND на примерах
Windows : ::FindWindow fails from Service application
[1] Уроки по WinAPI?! - Создание окна.
Окно выключения компа в Delphi delphi-hlp.ru
Windows : delphi-hlp.rundow Not finding window
Создание окон на WIN API, создание DLL, создание диалогового окна.