明经CAD社区

 找回密码
 注册

QQ登录

只需一步,快速开始

搜索
楼主: Comming

[讨论] 按键切换程式

[复制链接]
发表于 2013-8-30 21:29:38 | 显示全部楼层
xiaobao02 发表于 2013-8-29 22:30
最近才编的

我的返回值是12 替换后还是不行
 楼主| 发表于 2013-8-30 21:50:55 | 显示全部楼层
xiaobao02 发表于 2013-8-29 22:30
最近才编的

这下写得真不错
 楼主| 发表于 2013-8-30 22:06:27 | 显示全部楼层
长风(尚品) 发表于 2013-8-29 22:50
hv右键选项不能用,是怎么回事?

我想不是返回值的问题,是操作的问题吧
发表于 2013-8-30 22:21:28 | 显示全部楼层
Comming 发表于 2013-8-30 22:06
我想不是返回值的问题,是操作的问题吧

如果点两下右键是可以的,。不知是怎么回事

点评

第一次右键是退出其它正在执行的选项,第二次右键是选择执行垂直构造线选项,第二次右键后就要用左键选择通过点了  发表于 2013-8-31 08:59
发表于 2013-8-31 08:50:39 | 显示全部楼层
xiaobao02 发表于 2013-8-29 22:30
最近才编的

请教一个问题:我想把 X 改为中键,中键的值是多少呢?可以吗?

点评

好像不行,中键没返回值,按ESC和X键更方便吧,反正左手不是要按键盘的吗  发表于 2013-8-31 09:00
发表于 2013-8-31 10:15:45 | 显示全部楼层
我改一个子程序在里面,可以很好的退出
(defun c:hh ()
  (command "xline" "h")
  (RCommand "xline")
;;;  (while (not (zerop (getvar "CMDACTIVE")))
;;;    (princ "\n指定通过点: ")
;;;    (command pause)
;;;  )  
(princ)
)

(defun c:vv ()
  (command "xline" "v")(RCommand)
;;;  (while (not (zerop (getvar "CMDACTIVE")))
;;;    (princ "\n指定通过点: ")
;;;    (command pause)
;;;  )
(princ)
)
(Defun RCommand (ComStr)
  (command ComStr)
  (while (/= (Getvar 'cmdactive) 0)
    (command pause)
  )
  (princ)
)
发表于 2013-8-31 12:09:07 | 显示全部楼层
xiaobao02 发表于 2013-8-29 22:30
最近才编的

快捷菜单开关
Pickfirst 必须开
QPmode 1 打开 -1 关闭
怎么加到里面去,谢谢
发表于 2013-9-2 08:25:42 | 显示全部楼层
太牛了,学习。
发表于 2013-9-26 21:47:56 | 显示全部楼层
很方便的程序!!
感謝樓主的大方分享!!
发表于 2014-6-14 10:17:32 | 显示全部楼层
最近莫名发现hv右键选项不能用了,是怎么回事?
您需要登录后才可以回帖 登录 | 注册

本版积分规则

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

GMT+8, 2025-5-20 11:45 , Processed in 0.185021 second(s), 25 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

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