iCAx开思网

标题: 【讨论】一个高深，实用的问题，大家都来瞧瞧 [打印本页]

作者: DavidJiang 时间: 2002-11-28 12:55
标题: 【讨论】一个高深，实用的问题，大家都来瞧瞧
在CAD2000/2002中如何配置带参数得快捷命令。比如配置一个画三边相切的圆，我知道如何做出的图标（这是相关宏^C^C_circle _3p _tan \_tan \_tan \），去无法为他配置快捷命令。

我感到想画圆等这样的命令一个C是不够了，我希望配出C2(两点画圆)，C3,CT等专有命令。

作者: ganzhangxiu 时间: 2002-11-28 15:17
::b::b::b

作者: zgmzjddzxx 时间: 2002-11-28 15:19
自己写个程序就可以了。。。。。。。。。。

作者: DavidJiang 时间: 2002-11-28 15:38
呵呵，希望简单一点，不要这么麻烦。

作者: Jacky Wang 时间: 2002-11-28 18:38
用lisp，可以做到這個。
俺以前用Lisp做了個打印的命令，也蠻方便的。

作者: zgmzjddzxx 时间: 2002-11-28 22:46
工具菜单->自定义->工具栏->命令，然后看看附图，把三切点画圆的图标拉到工具栏上就可以...

作者: DavidJiang 时间: 2002-11-29 16:52
需要的是命令，不是图标。图标我也知道呀。

作者: zgmzjddzxx 时间: 2002-12-3 12:01

jh wrote:
需要的是命令，不是图标。图标我也知道呀。

试试
(defun c:c3(/ oldos oldcmd)
  (setq oldos (getvar "osmode"))
  (setq oldcmd (getvar "cmdecho"))
  (setvar "osmode" 256)
  (setvar "cmdecho" 1)
  (command "_.circle" "3p" pause pause pause)
  (setvar "cmdecho" oldcmd)
  (setvar "osmode" oldos)
  (princ)
)

作者: DavidJiang 时间: 2002-12-3 17:16
谢谢板主！

不过这样的话，始终觉得不不爽。每个都编lisp会很麻烦的，

再说俺又学的不精，比如cad2000以后打断命令提供两个图标，一个可在

一点打断，一个在两点打断。现在要在一点打断必须点图标，右键重复

都不行。当然有命令就方便多了，看来cad又该升级了，希望下个版本有

此功能

作者: Diabloye 时间: 2002-12-3 20:18
提示: 作者被禁止或删除内容自动屏蔽

作者: DavidJiang 时间: 2002-12-3 20:42
呵呵，早知道了

欢迎光临 iCAx开思网 (https://www.icax.org/)