HSPTV!掲示板

ウィンドウのサイズが変更されたときに、
mesboxやlistboxのサイズも大きくしたいのですが、
どうすればいいのでしょうか。

考えてわかるもんではないですから、
サンプルだけ示します。

#define WM_SIZE 0x0005

sdim buf,256
screen 0,90,16;邪魔なので.
screen 1,ginfo_dispx,ginfo_dispy,0,,,320,240
mesbox buf,ginfo_winx,ginfo_winy,0,256 : boxid=stat
oncmd gosub *on_windowresize,WM_SIZE
stop
*on_windowresize
	clrobj boxid,boxid
	pos 0,0
	mesbox buf,ginfo_winx,ginfo_winy,0,256 : boxid=stat
	return

ウィンドウサイズが変更されたときWM_SIZEメッセージが通知されるので、
SetWindowPos関数かMoveWindow関数でリサイズしてください。
（common\obj.asモジュールにresizeobj命令も用意されてる）

MoveWindowを使ったサンプル
( http://yokohama.cool.ne.jp/chokuto/urawaza/api/MoveWindow.html )

#include "user32.as"
#define WM_SIZE 0x0005

	gsel 0, -1
	screen 2, 640, 480

	a = ""
	mesbox a
	hObj = objinfo(stat, 2)

	gosub *size
	oncmd gosub *size, WM_SIZE
	stop

*size
	MoveWindow hObj, 0, 0, ginfo(12), ginfo(13), 0
return