Как определить, что запущено полноэкранное приложение?

[Space]

Как определить, что запущено полноэкранное приложение? У меня обычное окно (не панель).

[awl100Alex]

Можно попробовать через GetWindowPlacement получить подструктуру RECT структуры WINDOWPLACEMENT нужного окна, и потом сравнить эти координаты с Screen.Height; Screen.Width.

[dr.MIG]

Всё проще.

Код: Выделить всё

Private Declare Function GetWindowLong Lib "user32" Alias "GetWindowLongA" (ByVal hWnd As Long, ByVal nIndex As Long) As Long
Private Const GWL_STYLE = -16
Private Const WS_MAXIMIZE = &H1000000

Private Sub Command1_Click()
    Dim styles As Long
    styles = GetWindowLong(Form1.hWnd, GWL_STYLE)
    If (styles And WS_MAXIMIZE) = WS_MAXIMIZE Then
      MsgBox "Полноэкранное"
    Else
      MsgBox "Обычное"
    End If
End Sub


Естественно, Form1.hWnd заменить на хэндл окна, которое надо проверить.

[Space]

dr.MIG, твой код будет определять максимизированное окно как полноэкранное?

[awl100Alex]

dr.MIG
Да, точно! Через стили тоже можно.

[dr.MIG]

dr.MIG, твой код будет определять максимизированное окно как полноэкранное?

Я невнимательно прочитал вопрос просто, но, думаю, понятно теперь в какую сторону смотреть .

А что кстати подразумевается под полноэкранным режимом — максимизированное окно без строки заголовка?

[Space]

окно, которое закрывает весь экран, типа ScreenSaver.

[awl100Alex]

Space
Всё правильно! dr.MIG дал правильное направление. Вот сам убедись в этом...

[Space]

ничего оно не определяет! Ни скринсейвер, ни полноэкранное видео/изображение...

[dr.MIG]

В таком виде оно вообще ничего не определяет .

Для начала надо смотреть на каком именно месте код начинает работать не так как надо. Да и документацию читать полезно. Тебе ни о чем не говорит:

The GetActiveWindow function retrieves the window handle to the active window attached to the calling thread's message queue.

Если заменить на GetForegroundWindow, то окна, которые разворачивает пользователь, будут определяться.

Никто и не говорил, что это универсальное решение — если максимизировать окно видео-плеера, то программа это отловит, если просто сделать его полноэкранным, скорее всего нет. Ну а момент запуска заставки можно легко отловить другим способом (на форуме есть мой пример с использованием WMI и более подходящий для твоей ситуации пример GSerg'а).

Add: да и поясни, чтобы не было путаницы в терминах — что ты подразумеваешь под словом «полноэкранное». Окно, не максимизированное, размером 800х600, размещенное по центру на мониторе с разрешением 800х600 тоже входит в это понятие? А немного сдвинутое вбок?