精易模块键盘钩子有时失效！

p58812442

我用精易模块做的键盘钩子我把软件卖给别人，在有的电脑上无效。有知道的吗？

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

变量名	类 型	静态	数组	备 注
jp	类_钩子

jp.安装钩子_键盘 (取窗口句柄 (), &子程序1, 真)

子程序名	返回值类型	公开	备 注
子程序1
参数名	类 型	参考	可空	数组	备 注
按键类型	整数型
键代码	整数型

如果真 (键代码 ＝ #Tab键 )
如果真 (按键类型 ＝ 256)  ' 按下
调试输出 (“按下”)
如果真 (按键类型 ＝ 257)  ' 放开
调试输出 (“放开”)

如果真 (键代码 ＝ 160 或 键代码 ＝ 161)  ' Shift键
如果真 (按键类型 ＝ 256)  ' 按下
调试输出 (“按下5555”)
如果真 (按键类型 ＝ 257)  ' 放开
调试输出 (“放开222”)

调试输出 (键代码)

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> .程序集 窗口程序集_启动窗口<br /> <br /> .子程序 __启动窗口_创建完毕<br /> .局部变量 jp, 类_钩子<br /> <br /> jp.安装钩子_键盘 (取窗口句柄 (), &子程序1, 真)<br /> <br /> <br /> .子程序 子程序1<br /> .参数 按键类型, 整数型<br /> .参数 键代码, 整数型<br /> <br /> .如果真 (键代码 ＝ #Tab键)<br />     .如果真 (按键类型 ＝ 256)  ' 按下<br />         调试输出 (“按下”)<br />     .如果真结束<br />     .如果真 (按键类型 ＝ 257)  ' 放开<br />         调试输出 (“放开”)<br />     .如果真结束<br /> <br /> .如果真结束<br /> .如果真 (键代码 ＝ 160 或 键代码 ＝ 161)  ' Shift键<br />     .如果真 (按键类型 ＝ 256)  ' 按下<br />         调试输出 (“按下5555”)<br />     .如果真结束<br />     .如果真 (按键类型 ＝ 257)  ' 放开<br />         调试输出 (“放开222”)<br />     .如果真结束<br /> <br /> .如果真结束<br /> 调试输出 (键代码)

@Y罢不能

Y罢不能

鼠标_监视_安装 ("响应监视事件[子程序指针]")

‘响应监视事件,3个参数,都为整数型,第1个为键代码（1为左键，2为右键，3为中键，4为滚轮）,第2个为按键状态(1为按下，2为放开，3为双击，4往上滚，5往下滚)，第3个参数为窗口句柄与坐标的指针集合（指针到文本即可取出信息 窗口句柄|X,Y）

补充内容 (2019-2-11 21:39):
推荐使用精易模块的，开源，安全，功能齐全，更新快， 精易模块官方网站 - 免费开源的易语言模块 http://ec.125.la/

Y罢不能

安装钩子_键盘 （）
这个命令有返回的，你用信息框调试输出下，是不是返回的0  如果是零，估计钩子失败了。
或者用下这个命令  窗口_监视热键_zc()

p58812442

Y罢不能 发表于 2019-2-11 20:38
安装钩子_键盘 （）
这个命令有返回的，你用信息框调试输出下，是不是返回的0  如果是零，估计钩子失败了 ...

请问一下，如何监视鼠标？

p58812442

Y罢不能 发表于 2019-2-11 21:39
鼠标_监视_安装 ("响应监视事件[子程序指针]")

‘响应监视事件,3个参数,都为整数型,第1个为键代码（1为 ...

鼠标监视给个例子啊。

Y罢不能

000.e (99.39 KB, 下载次数: 65)

2019-2-11 21:53 上传

点击文件名下载附件

推荐使用精易模块的，开源，安全，功能齐全，更新快， 精易模块官方网站 - 免费开源的易语言模块 http://ec.125.la/