[mmax]

Код:

[Выделить все]

(setq ss_get 
      (ssget 
      (list  (cons 0 "LINE") (cons 0 "lwpolyline"))
       )
     )

Найдено 0
Возвращает nil
Как организовать выбор только линий и полилиний и ничего больше.
Если использовать фильтры по отдельности, то все работает.

[Елпанов Евгений]

Сообщение от mmax Код: [Выделить все] (setq ss_get (ssget (list (cons 0 "LINE") (cons 0 "lwpolyline")) ) ) Найдено 0 Возвращает nil Как организовать выбор только линий и полилиний и ничего больше. Если использовать фильтры по отдельности, то все работает.

Пара вариантов, для затравки...

Код:

[Выделить все]

(setq ss_get
       (ssget
         (list
           (cons
             0
             (strcat "LINE" "," "lwpolyline")
           ) ;_  cons
         ) ;_  list
       ) ;_  ssget
) ;_  setq
(setq ss_get
       (ssget
         (list
           (cons -4 "<OR")
           (cons 0 "LINE")
           (cons 0 "lwpolyline")
         ) ;_  list
         (cons -4 "OR>")
       ) ;_  ssget
) ;_  setq

[mmax]

Ух как, я даже не подозревал, что можно такие списки делать.

А можно такие списки составлять для ENTMAKE????

[Елпанов Евгений]

Сообщение от mmax Ух как, я даже не подозревал, что можно такие списки делать. А можно такие списки составлять для ENTMAKE????

Нет...

[VVA]

Еще вариант для развития

Код:

[Выделить все]

(setq ss_get (ssget '((0 . "*LINE"))))

Выберет все, что заканчивается на LINE (LINE, POLYLINE, LWPOLYLINE, SPLINE)

[Кулик Алексей aka kpblc]

В общем-то фильтры в ssget формируются аналогично wcmatch, о чем честно написано в справке. Единственное отличие, по-моему, так это то, что для wcmatch играет роль регистр символов, а для ssget - нет. Но в этом до конца не уверен, т.к. постоянно пишу типы примитивов в "верхнем" варианте.

[Елпанов Евгений]

Сообщение от kpblc В общем-то фильтры в ssget формируются аналогично wcmatch, о чем честно написано в справке. Единственное отличие, по-моему, так это то, что для wcmatch играет роль регистр символов, а для ssget - нет. Но в этом до конца не уверен, т.к. постоянно пишу типы примитивов в "верхнем" варианте.

Да, для данного, конкретного случая можно написать очень коротко...

Код:

[Выделить все]

(setq ss_get  (ssget '((0 . "L*E"))))

[Елпанов Евгений]

Немного поясню фильтр - выбрать примитивы, название которых начинается на "L" и заканчивается на "E"...