小ワザ
ボタンの無効化・有効化 †
HSP3.2ではenableobjが追加されるようですが、それまでのつなぎとして。
引数についてはオブジェクトIDを参照。
1
2
3
4
5
6
7
8
9
10
11
12
|
| #module
#uselib "user32.dll"
#func EnableWindow "EnableWindow" int, int
#deffunc lock_button int button_id
hbutton = objinfo(button_id, 2)
EnableWindow hbutton, 0
return
#deffunc unlock_button int button_id
hbutton = objinfo(button_id, 2)
EnableWindow hbutton, 1
return
#global
|