HSPTV!掲示板

タイトルバーのない、bgscrではなく枠だけが残る
ウィンドウの作り方を教えてほしいのですが、宜しくお願い致します。

こんにちは。hamachです。

WinAPI を用いて実現することができます。

> bgscrではなく枠だけが残るウィンドウ

	#uselib "USER32.DLL"
		#cfunc GetWindowLong "GetWindowLongA" int, int
		#func SetWindowLong "SetWindowLongA" int, int, int

	#define WS_SIZEBOX 0x00040000	;	サイズ変更できる
	#define WS_BORDER 0x00800000	;	タイトルバーを消す

	screen 0,640,480,2

	onclick gosub *click
	
	//	タイトルバーもどき
	color 0,0,255
		boxf 0,0,ginfo(26),25

	SetWindowLong hwnd, -16, GetWindowLong (hwnd, -16) - (WS_SIZEBOX+WS_BORDER)

	width ginfo(26)/2,ginfo(27)/2	//	再描画　※(重要)
	gsel 0,1
	
	stop
*click
	sendmsg hwnd ,$a1,2,z
return

ありがとうございました