HSPTV!掲示板

screenで作成したウィンドウをSetParentでもうひとつのウィンドウに
くっつけたのですが、親ウィンドウのクライアント領域を超えると
ウィンドウの状態が更新されないみたいです。
どうすれば更新されるようになりますか？

//ウィンドウを最大化して
//中のウィンドウをしたのステイタスバーで隠れるまで下にドラッグして、
//そのまま上に引き上げてください。

#include "user32.as"
#const global WS_CHILD 0x40000000
#const global WS_VISIBLE 0x10000000
#define global WM_SIZE 0x0005		//サイズ変更

	screen 0,ginfo(20),ginfo(21),2
	SetWindowLong hwnd,-16,0x14CF0000
	width 640,480
	gsel 0,1
	hD=hwnd
	screen 1
	SetParent hwnd,hD
	gsel 0,1
	winobj "msctls_statusbar32", "", 0, WS_CHILD | WS_VISIBLE, 0, 0, 0, 0
	oncmd gosub *size, WM_SIZE
	stop
*size
	clrobj
	winobj "msctls_statusbar32", "", 0, WS_CHILD | WS_VISIBLE, 0, 0, 0, 0
	return

ステータスバーのスタイルにWS_CLIPSIBLINGSを追加すればいいです。
ただしscreen1がステータスバーより手前になってしまうようなので、
それが困るならまた違う方法を考えないとダメそうです。

つかぬ事をお伺いしますが
WS_CLIPSIBLINGSは16真数に直すとなにになるのですか？

#define global WS_CLIPSIBLINGS	$04000000

定数値を知りたいときは
http://hspnext.com/tool/hsptool04.htm
の「Windows32 API Constance 検索」が便利です

ありがとうございます。やっとうまくいきました。
定数値の検索も今度から活用させていただきます。