[讨论]不同版本cad命令参数有差别,command调用时如何处理?
www.dimcax.com
[讨论]不同版本cad命令参数有差别,command调用时如何处理?
[讨论]不同版本cad命令参数有差别,command调用时如何处理?
例如copy命令,之前版本是单步复制的,
d
加个版本判断可以
d
(defun yad-comd()
(setvar "cmdecho" 1)
(while (/= 0 (getvar "cmdactive")) (vl-cmdf pause))
(setvar "cmdecho" 0)
)
...
(vl-cmdf "_.xxx" ...)
(yad-comd)
...
好好学习天天向上
(defun c:ddd ()
(setq #a (ver))
(setq #b (vl-string->list #a))
(setq #c (vl-remove-if '(lambda (x) (> x 57)) #b))
(setq #d (vl-remove-if '(lambda (x) (< x 46)) #c))
(setq #e (vl-remove 47 #d))
(setq banben (vl-list->string #e))
)
能求出版本号,剩下工作你自己定吧
工资真的要涨了,心里更加爱党了,能给孩子奖赏了,见到老婆敢嚷了,敢尝海鲜鹅掌了,闲时能逛商场了,遇见美女心痒了,结果物价又涨了!
d
楼主的理解有点差异,
autocad 因版本改变对 command的影响不大,以copy 命令为例:
命令: copy
选择对象: 指定对角点: 找到 3 个
选择对象:
当前设置: 复制模式 = 多个
指定基点或 [位移(d)/模式(o)] <位移>:
命令: (command "copy")
选择对象: 指定对角点: 找到 3 个
选择对象:
指定基点或 [位移(d)/多个(m)] <位移>:
也就是说常规的命令行显示和command调用的命令行是有差异的
d
其实我们做程序的时候,还是要判断一下版本的好
我以前做过一个程序,要用到copy命令,因为公司有人用