sssetfirst（AutoLISP）

签名

(sssetfirst gripset [pickset])

返回值

类型：列表

指定的一个或多个选择集。

言论

夹具参数被忽略;选择并抓取由“拾取集”指定的对象的选择集。

您负责创建有效的选择集。例如，您可能需要验证背景图纸空间视口（DXF 组代码 69）是否未包含在选择集中。您可能还需要确保所选对象属于当前布局，如以下代码所示：

(setq ss (ssget (list (cons 410 (getvar "ctab")))))

例子

首先，画一个正方形并构建三个选择集。首先绘制第 1 面并创建一个选择集以包含绘制的线：

(entmake (list (cons 0 "line") '(10 0.0 0.0 0.0)'(11 0.0 10.0 0.0)))
((0 . "line") (10 0.0 0.0 0.0) (11 0.0 10.0 0.0))

(setq pickset1 (ssget "_l"))
<Selection set: a5>

变量指向创建的选择集。pickset1

绘制第 2 面并将其添加到选择集：pickset1

(entmake (list (cons 0 "line") '(10 0.0 10.0 0.0)'(11 10.0 10.0 0.0)))
((0 . "line") (10 0.0 10.0 0.0) (11 10.0 10.0 0.0))

(ssadd (entlast) pickset1)
<Selection set: a5>

创建另一个选择集以仅包含侧 2：

(setq 2onlyset (ssget "_l"))
<Selection set: a8>

绘制第 3 面并将其添加到选择集：pickset1

(entmake (list (cons 0 "line") '(10 10.0 10.0 0.0)'(11 10.0 0.0 0.0)))
((0 . "line") (10 10.0 10.0 0.0) (11 10.0 0.0 0.0))

(ssadd (entlast) pickset1)
<Selection set: a5>

创建另一个选区并在选择集中包括第 3 面：

(setq pickset2 (ssget "_l"))
<Selection set: ab>

变量指向新选择集。pickset2

绘制第 4 面并将其添加到选择集：pickset1pickset2

(entmake (list (cons 0 "line") '(10 10.0 0.0 0.0)'(11 0.0 0.0 0.0)))
((0 . "line") (10 10.0 0.0 0.0) (11 0.0 0.0 0.0))

(ssadd (entlast) pickset1)
<Selection set: a5>

(ssadd (entlast) pickset2)
<Selection set: ab>

此时，包含边 1-4，包含边 3 和 4，并且仅包含边 2。pickset1pickset22onlyset

打开手柄并选择以下位置的所有对象：pickset1

(sssetfirst nil pickset1)
(nil <Selection set: a5>)

打开手柄并选择以下位置的所有对象：pickset2

(sssetfirst nil pickset2)
(nil <Selection set: ab>)

打开手柄并选择以下位置的所有对象：2onlyset

(sssetfirst nil 2onlyset)
(nil <Selection set: a8>)

每个调用将替换上一个调用中已抓取和选定的选择集。sssetfirstsssetfirst