注册热键子类化拦截消息

子类化拦截消息，源码是易语言API函数的应用教程。

.版本 2

.程序集 窗口程序集1
.程序集变量 窗口句柄, 整数型
.程序集变量 默认窗口程序, 子程序指针
.程序集变量 i, 整数型

.子程序 __启动窗口_创建完毕

窗口句柄 ＝ _启动窗口.取窗口句柄 ()
RegisterHotKey (窗口句柄, 786, 3, #B键)  ' Ctrl+Alt+b
默认窗口程序 ＝ 置窗口特征 (窗口句柄, -4, &新窗口程序)

.子程序 新窗口程序, 整数型
.参数 窗口句柄, 整数型
.参数 消息, 整数型
.参数 参数1, 整数型
.参数 参数2, 整数型

.如果 (消息 ＝ 786)
    SendMessageCallback (取窗口句柄 (), 0, 0, 0, &a, 0)
    返回 (0)
.否则

.如果结束

返回 (执行窗口程序 (默认窗口程序, 窗口句柄, 消息, 参数1, 参数2))  ' 把不需要处理的消息传递给默认窗口处理程序，使窗口能正常响应消息

.子程序 __启动窗口_将被销毁

置窗口特征 (窗口句柄, -4, 默认窗口程序)  ' 窗口销毁前置回原来的消息处理程序

.子程序 a

标签1.标题 ＝ 到文本 (i)
i ＝ i ＋ 1

@易语言学习论坛