跳到主要内容

GetButtonState 获得按钮状态

🎯功能

获得按钮状态,用于CreateButon创建的按钮。

📜语法

按钮状态 = Plugin.WndEx7_71.GetButtonState(窗口句柄)

📥参数

参数数据类型解释
窗口句柄长整型数用于接收CreateButton创建的按钮的窗口句柄。

📤返回

长整型数,按钮状态值。默认初始值是0。如果目标按钮是普通按钮,目标按钮被点击后,第一次获得的值是1,后面获得的值都是0,至到下一次按钮被点击。如果目标按钮是切换按钮,获得的是当前按钮的状态在数组中的序号,这里的数组指的是用SetButton设置按钮时使用的数组。

💡示例

hwnd=Plugin.WndEx7_71.CreateButton(0,20,10,100,30)
Call Plugin.WndEx7_71.SetButton(hwnd,"按钮")
While True
If Plugin.WndEx7_71.GetButtonState(hwnd)=1 Then
MsgBox "按钮被点击",4096
End If
Delay 200
Wend
//OnScriptExit过程在脚本结束时执行,即使脚本执行到一半的时候,你按了停止热键,它也会执行了这个过程再停止
Sub OnScriptExit()
Call Plugin.WndEx7_71.SetWindowState(hwnd,0)
End Sub
Dim MyArray(2)
MyArray(0)="按钮A"
MyArray(1)="按钮B"
MyArray(2)="按钮C"
hwnd=Plugin.WndEx7_71.CreateButton(0,20,10,100,30)
Call Plugin.WndEx7_71.SetButton(hwnd,MyArray)
OldIndex=-1
While True
Index=Plugin.WndEx7_71.GetButtonState(hwnd)
If Index<>OldIndex Then
MsgBox "按钮当前序号:" & Index,4096
OldIndex=Index
End If
Delay 200
Wend
//OnScriptExit过程在脚本结束时执行,即使脚本执行到一半的时候,你按了停止热键,它也会执行了这个过程再停止
Sub OnScriptExit()
Call Plugin.WndEx7_71.SetWindowState(hwnd,0)
End Sub

📘备注