输入法自动切换V2.5--2021.9.3更新2013-2022版

print1985

xotoo 发表于 2021-4-27 22:32
好像不能回复点评

刚才的语句加入配置文件中，好像不行，我2022版

;鼠标双击
(defun double_click (a b / en end entype text)
  (if (setq en (nentselp (trans (car b) 0 1)))
    (progn
      (setq end (entget (car en)))
      (setq entype (cdr (assoc 0 end)))
      (if (wcmatch entype "*TEXT")
        (progn
          (setq text (cdr (assoc 1 end)))
          (if (= entype "MTEXT")
            (setq text (DK:mtext2text text))
          )
          (GC:doubleclick text);调用C#判断中英文，切换输入法
        )
      )
      (if (= entype "MULTILEADER")
        (progn
          (setq text (cdr (assoc 304 end)))
          (GC:doubleclick text)
      ))
    )
  )
  (princ)
)

guanfengchen

楼主好，双击天正文字，如何实现中英文自动切换，我按照你的鼠标双击的命令的模式，就是调试不出来，烦请指点，谢谢。

xotoo

print1985 发表于 2021-4-28 18:49
;鼠标双击
(defun double_click (a b / en end entype text)
  (if (setq en (nentselp (trans (car b ...

谢谢
但添加后切换输入法状态好像反了——不双击多重引线文字时 输入法状态为中文输入（中文 微软拼音输入），双击多重引线文字后，输入法状态反而变成英文状态了（英语 美式键盘）

亦即 加载程序后，CAD界面默认输入法为 中文 微软拼音输入法，双击多重引线的文字，文字进入编辑状态，但这时候输入法变成 英文 美式键盘 状态。然后退出文字编辑状态后，输入法又变成 中文 微软拼音输入法

需求正好反了

然后
出现了需多按一次首命令首字母的情形（比如输入E，输入后会消失，可能再次输入或者多次输入才可以），但其它中的两个选项灰色无法选择

WIN10 X64 （20H2）+ CAD版本2022

烟盒迷唇

win7 64位启动CAD2021的时候，中英文一直在不停切换，有没有办法处理

言戲無軍

赞 无私奉献 那些说没用的 肯定是编其它收费输入法软件的 侵犯他们利益了

hnfsf

这么流弊，可惜我还在用cad2006版

liufii

1、2008版本，输入法切换与批量打印冲突，我用的是批量打印是这个：http://bbs.mjtd.com/forum.php?mo ... A%C1%BF%B4%F2%D3%A1
加载输入法切换以后，使用多文档打印的时候，批量打印什么反应都没有，功能失效。
不加载输入法切换，就可以批量打印。2、2008版本，加载输入法切换后，程序自带新建命令没有反应，点了闪一下就没反应了。

言戲無軍

反馈下，在win10  CAD2008上测试基本完美，目前没遇到什么问题，感谢

言戲無軍

提一个小问题，我在08版测试的时候，如果双击文字，搜狗输入法会闪2-3下，我用的shift模式，按照切换原理，软件在判断文字的之前应该 输入法不应该变化才对，判断完成成模拟shift按键 输入法状态栏不该闪烁才对，如果能修正就好了。
用进阶版是 ctrl+shift切换模式，由于我的ctrl键快捷启动 quicker，双击文字切换输入法时候，有50%左右会把quicker一并启动了。

言戲無軍

建议还是用win32的  ACTIVATEKEYBOARDLAYOUT