[求助]大哥,再帮个忙呀

mcxiangxin

有个问题相请教一个下:

(setq ss (ssget));选择几个对象

(command "copy" ss "" pause pause);将选择的对象从一个基点复制到另一点

然后我想获取复制以后的图元集,用entlast 却只能得到一个对象,用什么命令可以得到复制后那些对象集合呀?

ZZXXQQ

(SETQ S1 (ENTLAST) S2 (SSADD))

(SETQ SS (SSGET))

(COMMAND "COPY" SS "" PAUSE PAUSE)

(WHILE (SETQ S1 (ENTNEXT S1))

 (SETQ S2 (SSADD S1 S2))

)

;S2 中就是COPY的对象集合。