复制如何做到像删除一样

ymcui · 发表于 2014-9-15 09:05:33

复制如何做到像删除一样可以先选择物体后输入命令删除,也可以输入命令再选择物体删除
也就是说先选择物体后输入命令复制,也可以输入命令再选择物体复制.

Andyhon · 发表于 2014-9-15 09:18:04

PickFirst 的值为何
----------------------------
0 Turns off PICKFIRST; you select objects after you issue a command
1 Turns on PICKFIRST; you select objects before you issue a command

自贡黄明儒 · 发表于 2014-9-15 09:28:20

删除后就是移动命令了

ymcui · 发表于 2014-9-15 11:00:38

自贡黄明儒发表于 2014-9-15 09:28
删除后就是移动命令了

是不是要增加个判断是否有选择物体,如何判断已选择物体和得出已选择物体
(if (是否有选择物体)
(command "MOVE" ss(已选择物体) "")
(command "MOVE")
)

自贡黄明儒 · 发表于 2014-9-15 11:59:12

;;拷贝时是否删除原对象，似mirror
(defun C:w1 (/ P1 SS)
  (if (setq ss (ssget))
(progn
   (initget "Yes  ")
   (setq p1 (getpoint "\n [保留/删除Y]<保留>"))
   (if (equal p1 "Yes")
(command "_.move" ss "" pause pause)
(command "_.copy" ss "" p1 pause)
   )
)
  )
  (princ)
)

自贡黄明儒 · 发表于 2014-9-15 12:01:27

本帖最后由自贡黄明儒于 2014-9-15 12:04 编辑

以上我搞错了

ymcui · 发表于 2014-9-15 13:55:57

自贡黄明儒发表于 2014-9-15 11:59
;;拷贝时是否删除原对象，似mirror
(defun C:w1 (/ P1 SS)
(if (setq ss (ssget))

非常感谢黄总,要的就这个效果.谢谢

ysq101 · 发表于 2014-9-15 19:24:42

其实还可以改成左或右键来删除
这样更方便
搜索WOW1314

账号		自动登录	找回密码
密码			注册

[已解答] 复制如何做到像删除一样

相关帖子

点评

点评

浏览过的版块