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, создание диалогового окна.

Реклама
Новое
Реклама