请教高手：选择集的应用程序是这样吗？

anderal

假如上一步骤画一直线，图元名设为en1，再画一圆，图元名设为en2，

将两者添加到同一个选择集sec中，程序如下：

……

 (setq  sec  en1)

 (ssadd   en2  sec)

运行后好像sec中不含en2，不行啊，哪位高手请指导指导，急用！！！！

谢谢谢………………

anderal

但像我上面的两句程序那样，程序不会报错啊！！

高手帮忙………………

Andyhon

Set e1 to the name of the first entity in drawing:

Command: (setq e1 (entnext))

<Entity name: 1d62d60>

Set ss to a null selection set:

Command: (setq ss (ssadd))

<Selection set: 2>

The following command adds the e1 entity to the selection set referenced by ss:

Command: (ssadd e1 ss)

<Selection set: 2>

Get the entity following e1:

Command: (setq e2 (entnext e1))

<Entity name: 1d62d68>

Add e2 to the ss entity:

Command: (ssadd e2 ss)

<Selection set: 2>