Q语言定义热键代码


Event Form1.Hotkey1.Hotkey
Select Case 启动状态 // 利用情况条件选择 设置启动状态不同的时候 按钮运行不同的语句
//启动状态含义 0 未启动或者终止 1-启动 2-暂停
Case 0
线程ID1 = BeginThread(main) //当启动状态为0时 运行开始线程
启动状态 = 1// 启动状态改变，启动状态值赋值1，表示现在已经是启动状态
form1.Button4.Visible = true
form1.Button5.Visible = true
form1.Button1.Visible = false
form1.Button4.caption = "暂停"
Case 1
PauseThread 线程ID1 //暂停该线程
启动状态 = 2// 启动状态改变，启动状态值赋值2，表示现在已经是暂停状态
form1.Button4.caption = "继续"
Case 2
ContinueThread 线程ID1 // 恢复线程
启动状态 = 1// 启动状态改变，启动状态值赋值1，表示现在已经是启动状态
form1.Button4.caption = "暂停"
End Select
End Event

Event Form1.Hotkey3.Hotkey
StopThread 线程ID1//终止线程
//这是终止按钮
启动状态 = 0//终止状态赋值
form1.Button1.Visible = true
form1.Button4.Visible = False
form1.Button5.Visible = false
End Event

Event Form1.Hotkey2.Hotkey
Select Case 窗口状态 // 0-隐藏 1-显示
Case 0
Call 窗口显示("G")
Call 窗口显示("H")
Call 窗口显示("P")
窗口状态 = 1
Case 1
Call 窗口隐藏("G")
Call 窗口隐藏("H")
Call 窗口隐藏("P")
窗口状态 = 0
End Select
End Event

Q语言 定义热键代码