IsIconic

本ページには広告が含まれています。

指定されたウィンドウが最小化されているかどうか調べます。

構文(VBA)
Declare Function IsIconic Lib "user32" Alias "IsIconic" (ByVal hwnd As Long) As Long
構文(UWSC)
DEF_DLL IsIconic(hwnd): long: user32.dll
引数
hwnd
ウィンドウのハンドル
戻り値
ウィンドウが最小化されている場合は0以外の数値、最小化されていない場合は0を返します。

プログラム実行例

メモ帳が最小化されているかどうか

メモ帳を起動し、最小化されているかどうかを示す値を吹き出しに表示します。最小化されている場合は0以外の数値、最小化されていない場合は0を返します。

UWSC
SETHOTKEY(VK_ESC, EMPTYPARAM, "forceQuit")
DEF_DLL IsIconic(hwnd): long: user32.dll

DIM ID = EXEC("notepad")

WHILE TRUE
	FUKIDASI(IsIconic(IDTOHND(ID)))
	SLEEP(0.001)
WEND

//////////////////////////////////////////////////
// 【引数】
//   
// 【戻り値】
//   
//////////////////////////////////////////////////
PROCEDURE forceQuit()
	EXITEXIT
FEND