HSPTV!掲示板

他のウィンドウをアクティブにしたときに、ウィンドウを最小化するようなことはできますか。
ウィンドウスタイルにありそうだと思い調べたのですが、見つかりませんでした。

無理やりならできないこともないのですが、もっといい方法はないかと思いまして。

#uselib "user32.dll"
#func ShowWindow "ShowWindow" sptr, sptr
#define SW_MINIMIZE		0x00000006
repeat
	getkey LButton, 1
	if (LButton) {
		if (ginfo_mx < ginfo_wx1) | (ginfo_my < ginfo_wy1) | (ginfo_mx > ginfo_wx2) | (ginfo_my > ginfo_wy2) {
			ShowWindow hwnd, SW_MINIMIZE
		}
	}
	await 32
loop

COMオブジェクトのサンプルにありましたよ

アクティブ状態変わる際にWM_ACTIVATEがくるんでそれをトリガーに処理すればどうです。

(参考)
http://chokuto.ifdef.jp/urawaza/message/WM_ACTIVATE.html

#uselib "user32.dll"
#func ShowWindow "ShowWindow" sptr, sptr
#define SW_MINIMIZE		0x00000006
#define global WM_ACTIVATE			$0006

	mes strf("%8X",hwnd)//テスト用
	oncmd gosub *act,WM_ACTIVATE
	stop
*act
	mes strf("%8X,%8X",wparam,lparam)//テスト用
	if ( wparam == 0 ){
		ShowWindow hwnd,SW_MINIMIZE
	}
	return

誤字って再投稿とか頭悪すぎた。

なるほど。ウィンドウがアクティブでなくなる時にもWM_ACTIVEは送られるのですね。
こういうのがほしかったんです。
ありがとうございました。