[求助]：请问如何构造这样的选择集？

Wildcat

想构造的选择集如下：
选择一个图层的图元，（只选中BYLAYER的图元，排除不是BYLAYER的图元，没有嵌套块）。

假设图层名为aaa，能举个例子参考吗？
谢谢了。

长清

最初由 Wildcat 发布
[B]想构造的选择集如下：
选择一个图层的图元，（只选中BYLAYER的图元，排除不是BYLAYER的图元，没有嵌套块）。

假设图层名为aaa，能举个例子参考吗？
谢谢了。 [/B]

bylayer 有颜色、线形。请把你得要求说得更具体一些。

Wildcat

假设在图层AAA中：
BYLAYER的颜色为绿色;BYLAYER的线型为CONTINUOUS。
我想根据物体的BYLAYER这个特性，过滤出这种物体。

又要麻烦您了。

XDSoft

最初由 Wildcat 发布
[B]假设在图层AAA中：
BYLAYER的颜色为绿色;BYLAYER的线型为CONTINUOUS。
我想根据物体的BYLAYER这个特性，过滤出这种物体。

又要麻烦您了。 [/B]

你还没有说明白，你是要线型bylayer的，还是要颜色bylayer的，或者两个都要？

不需要知道你的bylayer如何设置的。因为你要查的是bylayer

Wildcat

不好意思：）
我需要选BYLAYER颜色的物体。

XDSoft

最初由 Wildcat 发布
[B]不好意思：）
我需要选BYLAYER颜色的物体。 [/B]

所有层上的颜色bylayer的都要？还是指定具体层上的bylayer的？

e2002

如果你只是要求Color为ByLayer或Linetype为ByLayer的话,
Quick select可以很简单的达到你的要求

如果两者或更多的条件(如Lineweight...)那就要键入Lisp语句了

Wildcat

但是我用的是R14，而且我需要快速选中，因为有太多的图块是这样的。

长清

最初由 Wildcat 发布
[B]假设在图层AAA中：
BYLAYER的颜色为绿色;BYLAYER的线型为CONTINUOUS。
我想根据物体的BYLAYER这个特性，过滤出这种物体。

又要麻烦您了。 [/B]

不要客气。

没想出别的办法，就用这种笨办法试一试：

1  选出所有的AAA层实体
2  看每一个实体的ENTGET表，如果没有(assoc 62 ...),就满足，提取该实体，组成新的表。
(setq all (ssget "X" (list (cons 8 "aaa")))
(setq new (ssadd))
  (setq k 1)
  (while (< k (sslength all))
    (if (not (assoc 62 (entget (ssname all k))))
       (setq new (ssadd (ssname all k) new))
   )
   (setq k (1+ k))
)

Wildcat

成功了，谢谢您。

ll_j

最初由 Wildcat 发布
[B]但是我用的是R14，而且我需要快速选中，因为有太多的图块是这样的。 [/B]

其实filter命令可以对选择条件进行组合（**Begin AND、**End AND等），完全可以满足使用，不过线形Bylayer须手工输入。

y0yxt

过滤掉颜色随层实体

(ssget '((-4 . "<")(62 . 256)))

类似可进行其他随层、块的过滤。

saintdog

(setq  L (strcase  (getstring  "\nEnter layer to delete:")))
            (setq e (entnext))
           (while e
                       (if  (= L (cdr  (assoc 8 (entget  e))))
                                (entdel e)
                      )
                     (setq  e (entnext  e))
                      )