怎样把我在一个子程序里面生成的所有实体都加到一个选择集里面

sunix · 发表于 2004-3-21 12:48:00

怎样把我在一个子程序里面生成的所有实体都加到一个选择集里面，而不用一个一个加？例如在子程序开始的地方加一个标志，结束的地方加一个标志，然后选择集就包括了这两个标志之间的所有实体

meflying · 发表于 2004-3-21 12:57:00

一个一个加为什么就不可以?
程序开始前,记住entlast,程序结束后,使用(entnext...)一直到结束,找到一个就加一个到选择集

sunix · 发表于 2004-3-21 13:04:00

因为要做fillet所以不能都用pline画线，
那样中间要是画了N条线线，岂不要加N次？

sunix · 发表于 2004-3-21 13:05:00

特别是一个command里面画了多条line就没有办法了？

meflying · 发表于 2004-3-21 13:38:00

我2楼的话有没有看啊,不是已经教你方法了吗...

sunix · 发表于 2004-3-21 14:09:00

(setq entpoint (entnext entlast1)) ;entlast1指向的是你说的记住entlast
;ssmiror是选择集
(while (/= entpoint nil)
   (ssadd entpoint ssmirror)
   (setq entpoint (entnext entpoint))
   )
错在哪里？
或者
(setq entpoint entlast1) ;entlast1指向的是你说的记住entlast，entlast2是最后一个实体
(setq ssmirror nil)
(while (/= (setq entpoint (entnext entpoint))    entlast2)
   (ssadd entpoint ssmirror)
   )
也错了，究竟应该怎么写？