puzb2001 发表于 2013-7-8 09:48:57

怎么实现仿CAD2004copy?

今天刚开始升级用CAD2006，CAD2006默认是多重考贝，能不能实现仿2004的考贝，即选参数M才能实现多重考贝？谢谢各位

kwok 发表于 2013-7-8 10:00:22

试试copy后输入"o"设一下默认设置，改成"s"单一

自贡黄明儒 发表于 2013-7-8 11:02:46

想复古呀？

puzb2001 发表于 2013-7-8 11:16:43

谢谢kwok 兄，自贡黄明儒 兄我比较守旧，呵呵

669423907 发表于 2013-7-8 19:15:37

用co和cp啊

puzb2001 发表于 2013-7-9 09:34:51

(defun C:c ()
       (setvar "cmdecho" 0)
       (setq css (ssget)) (command "copy" css "o" "s")
       (setq css nil) (setvar "cmdecho" 1)
       (prin1))

kwok 兄,我按照您的提示，没有做成功，请帮我看看是什么原因，肯请路过的大侠也出个手，谢谢

kwok 发表于 2013-7-9 10:36:43

(setq css (ssget)) (command "copy" css "o" "s")
=> (setq css (ssget)) (command "copy" css"" "o" "s")

puzb2001 发表于 2013-7-9 10:41:31

可以了，谢谢kwok 兄

caoyin 发表于 2013-7-9 12:16:06

不用这么麻烦,这样就可以
(defun c:CO ()
(command "_.copy")
(princ)
)

puzb2001 发表于 2013-7-9 14:30:57

caoyin 兄，神奇！
页: [1]
查看完整版本: 怎么实现仿CAD2004copy?