跳到主要内容

SetButtonBindWindow 设置按钮绑定窗口

🎯功能

给按钮绑定窗口,使对按钮的点击可以控制被绑定窗口的显隐或者关闭,多次调用可绑定多个窗口,用于CreateButon创建的按钮。SetButtonSetButtonBindMode会将该设置还原成默认值,所以若还要使用SetButton或者SetButtonBindMode,应先调用SetButton或者SetButtonBindMode,再调用SetButtonBindWindow。给绑定窗口使用SetButtonBindWindow函数。

📜语法

Call Plugin.WndEx7_71.SetButtonBindWindow(窗口句柄, 被绑定的窗口句柄, 数据)

📥参数

参数数据类型解释
窗口句柄长整型数用于接收CreateButton创建的按钮的窗口句柄。
被绑定的窗口句柄长整型数设置被绑定的窗口的窗口句柄。
数据长整型数字符串不同按钮, 不同效果, 详见下面说明。
参数3(数据)详细介绍

如果是普通按钮,取长整型数0为绑定窗口。如果是显隐模式,按纽点击后,被绑定窗口的显示隐藏状态变换为相反的状态。如果是关闭模式,按钮点击后,被绑定的窗口被关闭。

如果是切换按纽,仅支持显隐模式,使用字符串设置当前按钮状态是哪些按钮状态时被绑定窗口是可见的,其它的时候是隐藏的。按钮状态是SetButton设置切换按钮的数组的序号。按钮状态的十进制数值用来设置被绑定窗口的可见性。如果要设置多个按钮状态,按钮状态之间用"|"号分隔,例如"0|2|3",这时按钮状态是023时是可见的,其它时候是隐藏的。

取长整型数-1时,解除被绑定的窗口。

📤返回

💡示例

Dim BtnData(2)
BtnData(0) = "按钮1"
BtnData(1) = "按钮2"
BtnData(2) = "按钮3"
hwnd1 = Plugin.WndEx7_71.FindWindow("Notepad", 0)
If hwnd1=0 Then
MsgBox "未找到记事本窗口", 4096
End If
//创建按钮
hwnd = Plugin.WndEx7_71.CreateButton(0, 20, 10, 100, 30)
//设置窗口样式
Call Plugin.WndEx7_71.SetButtonStyle(hwnd, "000000", "00FF00", 0, 0)
//设置切换按钮
Call Plugin.WndEx7_71.SetButton(hwnd, BtnData)
//设置按钮的绑定窗口,按钮状态为0、2时被绑定窗口可见,其它时候隐藏
Call Plugin.WndEx7_71.SetButtonBindWindow(hwnd, hwnd1, "0|2")
While True
Delay 1000
Wend
//OnScriptExit过程在脚本结束时执行,即使脚本执行到一半的时候,你按了停止热键,它也会执行了这个过程再停止
Sub OnScriptExit()
Call Plugin.WndEx7_71.SetWindowState(hwnd,0)
End Sub

📘备注