明经CAD社区

 找回密码
 注册

QQ登录

只需一步,快速开始

搜索
查看: 1896|回复: 16

[经验] 【原创】用lsp检查按键状态

  [复制链接]
发表于 2023-10-19 14:17 | 显示全部楼层 |阅读模式
本帖最后由 baitang36 于 2023-11-8 08:27 编辑

定义了一个函数 syz_getkeystate,用法如下:

(syz_getkeystate 144) 返回numlock键的状态,按下灯亮时为1,否则为0.
(syz_getkeystate 145) 返回scrollLock键的状态,按下灯亮时为1,否则为0.
(syz_getkeystate 20) 返回CapsLock键的状态,按下灯亮时为1,否则为0.
本程序是【原创】用lsp模拟按键 - AutoLISP/Visual LISP 编程技术 - AutoCAD论坛 - 明经CAD社区 - Powered by Discuz! (mjtd.com)的升级版,功能包括了以前内容。
这函数是通过调用windows系统的api实现的,当然也可以检测其它键的状态,关于返回值的说明,准确的说法搜到的是英文的,请自己翻译:
The return value specifies the status of the specified virtual key, as follows:
  • If the high-order bit is 1, the key is down; otherwise, it is up.
  • If the low-order bit is 1, the key is toggled. A key, such as the CAPS LOCK key, is toggled if it is turned on. The key is off and untoggled if the low-order bit is 0. A toggle key's indicator light (if any) on the keyboard will be on when the key is toggled, and off when the key is untoggled.

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有账号?注册

x

评分

参与人数 8明经币 +8 金钱 +50 收起 理由
菜鸟初来乍到 + 1 很给力!
fangmin723 + 1 + 50
dtucad + 1 赞一个!
guosheyang + 1 赞一个!
Bao_lai + 1 神马都是浮云
Terence688 + 1
自贡黄明儒 + 1 很给力!
magicheno + 1 很给力!

查看全部评分

"觉得好,就打赏"
还没有人打赏,支持一下
发表于 2023-10-19 22:24 | 显示全部楼层
高人,太牛了,感谢分享
回复 支持 1 反对 0

使用道具 举报

 楼主| 发表于 2023-10-20 08:30 | 显示全部楼层
caoliu023 发表于 2023-10-19 17:35
是不是用了内部函数

是的,用lsp调用windows的dll
回复 支持 1 反对 0

使用道具 举报

发表于 2024-4-29 13:40 | 显示全部楼层
大佬你好,我下载了fas,但是
(syz_press 1)这个没反应 是用错了吗  其他键盘上的都可以,鼠标左右键都没反应
发表于 2023-10-19 14:28 | 显示全部楼层
感谢大佬分享
发表于 2023-10-19 14:41 | 显示全部楼层
谢谢哥分享!
支持+1
发表于 2023-10-19 15:22 | 显示全部楼层
方向键也能检测到?
 楼主| 发表于 2023-10-19 15:37 来自手机 | 显示全部楼层
本帖最后由 baitang36 于 2023-10-20 08:29 编辑
kozmosovia 发表于 2023-10-19 15:22
方向键也能检测到?

试了一下,可以的
发表于 2023-10-19 16:11 | 显示全部楼层
感谢大佬分享
发表于 2023-10-19 17:35 | 显示全部楼层
是不是用了内部函数
发表于 2023-10-19 19:36 | 显示全部楼层
盛老师出手,必属精品
您需要登录后才可以回帖 登录 | 注册

本版积分规则

小黑屋|手机版|CAD论坛|CAD教程|CAD下载|联系我们|关于明经|明经通道 ( 粤ICP备05003914号 )  
©2000-2023 明经通道 版权所有 本站代码,在未取得本站及作者授权的情况下,不得用于商业用途

GMT+8, 2024-5-4 14:54 , Processed in 0.256362 second(s), 28 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

快速回复 返回顶部 返回列表