Описание функции
EnumWindows
Перечисление дочерних окон для поиска по критерию.
EnumWindows(@EnumChildProc(), @hfound)
Параметры
@EnumChildProc() | Имя функции обратного вызова |
@hfound |
Указатель на данные куда будет помещён найденный дескриптор |
Примечания
Если окно соответствует критерию, то необходимо выполнить ProcedureReturn 0, чтобы остановить перечисление, в противном случае использовать ProcedureReturn 1, чтобы продолжить для следующего окна.См. также
EnumChildWindowsПример
Procedure EnumChildProc(hwnd.l, *hwnd)
Protected classText${256} ; буфер
GetClassName_(hwnd, @classText$, 256)
If classText$ = "WindowClass_2"
GetWindowText_(hwnd, @classText$, 256)
If Left(classText$, 9) = "PureBasic"
PokeL(*hwnd, hwnd)
ProcedureReturn 0 ; останавливает перечисление
EndIf
EndIf
ProcedureReturn 1 ; продолжает перечисление
EndProcedure
Define hwnd
EnumWindows_(@EnumChildProc(), @hwnd)
Debug hwnd