Функция IsWindowEnabled

Declare Function IsWindowEnabled Lib "user32" (ByVal hwnd As Long) As Long
IsWindowEnabled определяет, доступно ли окно в настоящее время или заблокировано. Если окно заблокировано, оно не может получать фокус и игнорирует любой предпринятый ввод. Многие окна, типа кнопок и других элементов управления, будут казаться недоступными, когда заблокированы

Возвращаемое значение

Функция возвращает 0, если окно заблокировано, или ненулевое значение, если окно доступно

Параметры

hwnd
Дескриптор окна, чтобы определить, доступно ли оно или заблокировано

Пример

' Изменим состояние окна Command1. Если окно 
' заблокировано, делаем доступным; если доступно, блокируем его
Dim wasenabled As Long  ' Получаем состояние Command1

' Получаем состояние Command1(доступно или нет)
wasenabled = IsWindowEnabled(Command1.hWnd)
If wasenabled = 0 Then  ' Если не не доступно
  MsgBox "Кнопка не доступна"
Else  ' и наоборот
  MsgBox "Кнопка доступна"
End If

Смотри также

EnableWindow

Категория

Окна