就是还是不能连续执行啊
大写开启时,会有个空输入格框卡着,希望楼主解决下。加入大写键的检测操作
本帖最后由 oldskooler 于 2021-4-23 14:16 编辑
感谢分享,能否增加在程序加载后,暂时停止双击时切换输入法的功能,
经过摸索,终于自己搞定了,分享出来,在楼主程序末尾添加以下内容,然后可以用命令autoime切换开关
;;;添加控制开关
(defun c:autoime()
(if (/= autoimeonoff 0) (setq autoimeonoff 1))
(cond
((= autoimeonoff 0) ((vlr-add mouse_reactor) (vlr-add command_reactor) (setq autoimeonoff 1) (princ "自动切换输入法打开。")))
((= autoimeonoff 1) ((vlr-remove mouse_reactor) (vlr-remove command_reactor) (setq autoimeonoff 0) (princ "自动切换输入法关闭。")))
)
(princ)
)
66666666666666666666666
6666666666666
xman00 发表于 2021-4-18 09:58
大写开启时,会有个空输入格框卡着,希望楼主解决下。加入大写键的检测操作
大写开启,测试正常,空输入格具体是什么情况?
本帖最后由 xman00 于 2021-4-25 13:20 编辑
fyw12345 发表于 2021-4-24 13:38
大写开启,测试正常,空输入格具体是什么情况?
如图,如果是大写状态结束输入,就会有个空输入格卡着。重新尝试了下,至少cad2007是有这样的情况的(我电脑装的2007和2018双版本切换使用)。
xman00 发表于 2021-4-25 13:19
如图,如果是大写状态结束输入,就会有个空输入格卡着。重新尝试了下,至少cad2007是有这样的情况的(我 ...
按esc结束,空格结束,鼠标右键结束,这三种情况是没有问题的
发现个问题
从CAD切换到别的软件的时候还一直保持着原来的英文输入法
系统win10 CAD2020
这个必须点赞了