本ページには広告が含まれています。
指定されたウィンドウが最小化されているかどうか調べます。
- 構文(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を返します。
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
使用関数