ウィンドウが最大化しているかどうかの判断          <TOP>

ウィンドウが最大化されているかどうかを判断します。

IsZoomed ウィンドウが最大化されているかどうかを判断する関数

　

最大化ボタンで最大化した場合は「最大化 = True」になります。

←→で画面一杯に広げてもTrueにはなりません。

　

'================================================================
'= ウインドウが最大化しているかどうかの判断
'=    (IsZoomed.bas)
'================================================================
#include "Windows.bi"

' ウィンドウが最大化されているかどうかを判断する関数
Declare Function Api_IsZoomed& Lib "user32" Alias "IsZoomed" (ByVal hWnd&)

'================================================================
'=
'================================================================
Declare Sub Button1_on edecl ()
Sub Button1_on()
    Var Ret As Long

    Ret = Api_IsZoomed(GethWnd)
    If Ret Then
        Print "最大化 = True"
    Else
        Print "最大化 = False"
    End If
End Sub

'================================================================
'=
'================================================================
While 1
    WaitEvent
Wend
Stop
End