复制后的图元名如何定义？

暗夜贵族 · 发表于 2015-7-2 09:34:19

复制后的图元名如何定义？
(command "._COPY" PAUSE)

fan_zh · 发表于 2015-7-2 09:46:47

(setq newent (entlast))

暗夜贵族 · 发表于 2015-7-6 09:06:13

fan_zh 发表于 2015-7-2 09:46
(setq newent (entlast))

不对，出来的图元不是copy之后的图元

fan_zh · 发表于 2015-7-6 09:54:45

(entlast)是指最后一个新生成的图元名，不会有错
如果你要拷贝后的全部图元即选择集，由需要自定义函数

;获得图元后所有图元选择集
(defun lt:ss-entnext (en / ss)
  (setq ss (ssadd))
  (while en (setq en (entnext en)) (if en (ssadd en ss)))
  (if (zerop (sslength ss)) (setq ss nil))
  ss
)

暗夜贵族 · 发表于 2015-7-6 10:16:35

fan_zh 发表于 2015-7-6 09:54
(entlast)是指最后一个新生成的图元名，不会有错
如果你要拷贝后的全部图元即选择集，由需要自定义函数

...

(SETQ e1 (entlast))
(command "COPY" (entsel) "" pause)
(setq e2 (entnext e1 ))

出来e2不对

fan_zh · 发表于 2015-7-6 10:27:11

把问题描述清楚点，最好上个图，把图元顺序及需要定义的名称都标上

暗夜贵族 · 发表于 2015-7-6 12:34:15

比如已经存在的图元e0 ，我想要得到复制后它的图元名e2

(SETQ E1 (entlast))
(command "._COPY" (setq e0 (car (entsel)) )"" PAUSE)

(setq e2 (entnext e1))

Q1241274614 · 发表于 2015-7-6 12:47:35

(setq newent (vla-Copy (vlax-ename->vla-object obj) (vlax-3d-point pR1) (vlax-3d-point pR2)))？

暗夜贵族 · 发表于 2015-7-6 13:01:49

本帖最后由暗夜贵族于 2015-7-6 13:08 编辑

vla-这个函数哪里可以查到资料，很多都咩有见过

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

[提问] 复制后的图元名如何定义？

相关帖子