如何注册热键框??、不是简单的注册热键
.版本 2
.支持库 shellEx
.支持库 spec
.子程序 _标签1_反馈事件, 整数型
.参数 参数一, 整数型
.参数 参数二, 整数型
.判断开始 (h [1] = 参数一)
执行子程序 (z [1], )
.判断 (h [2] = 参数一)
执行子程序 (z [2], )
.判断 (h [3] = 参数一)
执行子程序 (z [3], )
.默认
.判断结束
.子程序 _编辑框7_按下某键, 逻辑型
.参数 键代码, 整数型
.参数 功能键状态, 整数型
编辑框7.内容 = 选择热键 (键代码, 功能键状态)
.子程序 _编辑框7_放开某键, 逻辑型
.参数 键代码, 整数型
.参数 功能键状态, 整数型
编辑框7.内容 = 确认热键 ()
.子程序 选择热键, 文本型, 公开, 1、请在“按下某键”事件中调用该子程序为“编辑框.内容”赋值。2、该子程序必须与“确认热键”子程序配合使用。3、使用前请将想要变成热键框的编辑框的“输入方式”设为“只读方式”。4、请将“按下某键”事件的参数赋值到静态变量或非局部变量,提供给“注册热键”命令作参数。
.参数 键代码, 整数型, , 直接调用“按下某键”事件的第1个参数
.参数 功能键状态, 整数型, , 直接调用“按下某键”事件的第2个参数
.局部变量 热键, 文本型
.判断开始 (功能键状态 = 1 + 2 + 4)
热键文本 = “Ctrl+Shift+Alt+ ”
.判断 (功能键状态 = 1 + 2)
热键文本 = “Ctrl+Shift+ ”
.判断 (功能键状态 = 1 + 4)
热键文本 = “Ctrl+Alt+ ”
.判断 (功能键状态 = 2 + 4)
热键文本 = “Shift+Alt+ ”
.判断 (功能键状态 = 1)
热键文本 = “Ctrl+ ”
.判断 (功能键状态 = 2)
热键文本 = “Shift+ ”
.判断 (功能键状态 = 4)
热键文本 = “Alt+ ”
.默认
' 本源码来自易语言资源网( www.5A5X.com )
.判断结束
.判断开始 (键代码 = #Ctrl键 且 功能键状态 = 0)
热键文本 = “Ctrl+ ”
.判断 (键代码 = #Ctrl键 且 功能键状态 = 2)
热键文本 = “Ctrl+Shift+ ”
.判断 (键代码 = #Ctrl键 且 功能键状态 = 4)
热键文本 = “Ctrl+Alt+ ”
.判断 (键代码 = #Ctrl键 且 功能键状态 = 2 + 4)
热键文本 = “Ctrl+Shift+Alt+ ”
.判断 (键代码 = #Shift键 且 功能键状态 = 0)
热键文本 = “Shift+ ”
.判断 (键代码 = #Shift键 且 功能键状态 = 4)
热键文本 = “Shift+Alt+ ”
.判断 (键代码 = #Alt键 且 功能键状态 = 0)
热键文本 = “Alt+ ”
.默认
' 本源码来自易语言资源网( www.5A5X.com )
.判断结束
.判断开始断 (功能键状态 = 1 + 2 + 4)
' 热键文本 = “Ctrl + Shift + Alt + ”
.' 判断 (功能键状态 = 1 + 2)
' 热键文本 = “Ctrl + Shift + ”
.' 判断 (功能键状态 = 1 + 4)
' 热键文本 = “Ctrl + Alt + ”
.' 判断 (功能键状态 = 2 + 4)
' 热键文本 = “Shift + Alt + ”
.' 判断 (功能键状态 = 1)
' 热键文本 = “Ctrl + ”
.' 判断 (功能键状态 = 2)
.版本 2
.支持库 shellEx
.支持库 spec
.子程序 _标签1_反馈事件, 整数型
.参数 参数一, 整数型
.参数 参数二, 整数型
.判断开始 (h [1] = 参数一)
执行子程序 (z [1], )
.判断 (h [2] = 参数一)
执行子程序 (z [2], )
.判断 (h [3] = 参数一)
执行子程序 (z [3], )
.默认
.判断结束
.子程序 _编辑框7_按下某键, 逻辑型
.参数 键代码, 整数型
.参数 功能键状态, 整数型
编辑框7.内容 = 选择热键 (键代码, 功能键状态)
.子程序 _编辑框7_放开某键, 逻辑型
.参数 键代码, 整数型
.参数 功能键状态, 整数型
编辑框7.内容 = 确认热键 ()
.子程序 选择热键, 文本型, 公开, 1、请在“按下某键”事件中调用该子程序为“编辑框.内容”赋值。2、该子程序必须与“确认热键”子程序配合使用。3、使用前请将想要变成热键框的编辑框的“输入方式”设为“只读方式”。4、请将“按下某键”事件的参数赋值到静态变量或非局部变量,提供给“注册热键”命令作参数。
.参数 键代码, 整数型, , 直接调用“按下某键”事件的第1个参数
.参数 功能键状态, 整数型, , 直接调用“按下某键”事件的第2个参数
.局部变量 热键, 文本型
.判断开始 (功能键状态 = 1 + 2 + 4)
热键文本 = “Ctrl+Shift+Alt+ ”
.判断 (功能键状态 = 1 + 2)
热键文本 = “Ctrl+Shift+ ”
.判断 (功能键状态 = 1 + 4)
热键文本 = “Ctrl+Alt+ ”
.判断 (功能键状态 = 2 + 4)
热键文本 = “Shift+Alt+ ”
.判断 (功能键状态 = 1)
热键文本 = “Ctrl+ ”
.判断 (功能键状态 = 2)
热键文本 = “Shift+ ”
.判断 (功能键状态 = 4)
热键文本 = “Alt+ ”
.默认
' 本源码来自易语言资源网( www.5A5X.com )
.判断结束
.判断开始 (键代码 = #Ctrl键 且 功能键状态 = 0)
热键文本 = “Ctrl+ ”
.判断 (键代码 = #Ctrl键 且 功能键状态 = 2)
热键文本 = “Ctrl+Shift+ ”
.判断 (键代码 = #Ctrl键 且 功能键状态 = 4)
热键文本 = “Ctrl+Alt+ ”
.判断 (键代码 = #Ctrl键 且 功能键状态 = 2 + 4)
热键文本 = “Ctrl+Shift+Alt+ ”
.判断 (键代码 = #Shift键 且 功能键状态 = 0)
热键文本 = “Shift+ ”
.判断 (键代码 = #Shift键 且 功能键状态 = 4)
热键文本 = “Shift+Alt+ ”
.判断 (键代码 = #Alt键 且 功能键状态 = 0)
热键文本 = “Alt+ ”
.默认
' 本源码来自易语言资源网( www.5A5X.com )
.判断结束
.判断开始断 (功能键状态 = 1 + 2 + 4)
' 热键文本 = “Ctrl + Shift + Alt + ”
.' 判断 (功能键状态 = 1 + 2)
' 热键文本 = “Ctrl + Shift + ”
.' 判断 (功能键状态 = 1 + 4)
' 热键文本 = “Ctrl + Alt + ”
.' 判断 (功能键状态 = 2 + 4)
' 热键文本 = “Shift + Alt + ”
.' 判断 (功能键状态 = 1)
' 热键文本 = “Ctrl + ”
.' 判断 (功能键状态 = 2)