指定のウィンドウが最大化されているか調べる
Declare Function IsZoomed Lib "user32.dll" _
(ByVal hWnd As Long) As Long
Declare Function IsZoomed Lib "user32.dll" _
(ByVal hWnd As Integer) As Integer
BOOL IsZoomed(
HWND hWnd
);
引数
hWnd
ウィンドウのハンドル戻り値
最大化状態のとき 0以外サンプル
そうでないとき 0
ダウンロード(IsZoomed.lzh 1.06KB)'指定のウィンドウが最大化されているか調べる Private Declare Function IsZoomed Lib "user32.dll" (ByVal hWnd As Long) As Long
Private Sub Command1_Click() Dim rc As Long rc = IsZoomed(Me.hWnd) If rc <> 0 Then Me.Text1.Text = "最大化状態である" Else Me.Text1.Text = "最大化状態ではない" End If End Sub