HSPTV!掲示板

下半分のようにwindowの背景色を暗くするとボタンやチェックボックスが浮いてしまいます。
ボタンやチェックボックスも背景色と同じ色にしたいのです。上半部全体を暗くするでもいいです。

syscolor 15
boxf
button "TEST1",*dummy
chkbox"chkbox1",k
chkbox"chkbox2",k
syscolor 16
boxf 0,240,640,480
pos ,240
button "TEST1",*dummy
chkbox"chkbox1",k
chkbox"chkbox2",k
*dummy

ボタンに関して。
NO.5814
NO.5831
NO.9002

チェックボックス。
NO.15341

Gugurecusさんありがとうございます。
ボタンの色を変えるのはイメージボタンを使えばいいのは分かったのですが、チェックボックス
はNO.15341の例を使うと文字の部分が白になってしまいます。ここは変えられないのでしょうか？

#uselib "user32.dll"
#cfunc GetSysColorBrush "GetSysColorBrush" int
#define WM_CTLCOLORSTATIC 0x138

syscolor 16
boxf

	oncmd gosub *createcheckbox, WM_CTLCOLORSTATIC		;	スタティックコントロールが作成されるときに割り込み
	chkbox "checkbox", a		;	チェックボックス作成
	stop

*createcheckbox
	hBrush = GetSysColorBrush(3);5=白	ウィンドウ背景色のブラシを取得
	return hBrush		;	ブラシのハンドルを返す

ども。NO.15341で回答した者です。
kenさんも気づいていらっしゃるようですが、GetSysColorBrush()関数のパラメータを変えると色を変えられます。パラメータに指定する数値は、HSPのsyscolor命令で指定する数値と同じものです。たとえば、NO.17803に挙げられているサンプルでは、syscolor命令に16を指定しているので、GetSysColorBrush(16)とすればよいです。

floryさんが直接解説してくれたので大丈夫だと思うが、
GetSysColorBrush()関数の引数については以下で分かると思う。
VB用のサイトだがHSPでAPIを使う際にかなり有用なので
ぜひ知っておいてほしい。
http://www.winapi-database.com/
http://www.winapi-database.com/Graphics/Brush/GetSysColorBrush.html
http://www.winapi-database.com/Graphics/Color/GetSysColor.html

ありがとうございます。

GetSysColorBrush(16)でもうまくいきません。
check2のようにしたいのですが・・・。

#uselib "user32.dll"
#cfunc GetSysColorBrush "GetSysColorBrush" int
#define WM_CTLCOLORSTATIC 0x138

oncmd gosub *createcheckbox, WM_CTLCOLORSTATIC		;	スタティックコントロールが作成されるときに割り込み

syscolor 16
boxf
chkbox "check1", a		;	チェックボックス作成
;↓擬似チェックボックス面倒くさい
objsize 12,12
font "",13
chkbox "", a
color
pos 18,23
mes "check2"

stop

*createcheckbox
	hBrush = GetSysColorBrush(16);5=白	ウィンドウ背景色のブラシを取得
	return hBrush		;	ブラシのハンドルを返す