---

(Ich vermute, dass die Frage nicht direkt lösbar ist und es auf eine Schleifenlösung hinausläuft, aber vielleicht doch ...)

Ausgang:
Folgender Aufruf wählt mit Kreuzen in einem Fenster alle Linien, die nicht auf Layer "Testlayer" liegen.

Code:

---

(ssget "_C" pkt_re_obe pkt_li_unt '((0 . "LINE") (-4 . "<NOT") (8 . "Testlayer") (-4 . "NOT>")))

---

Aufgabe:

Code:

---

Wähle mit Kreuzen in einem Fenster alle Linien, die auf irgendeinem Layer liegen, der nicht die Farbe Gelb hat.(Der layer, nicht die Linie!)

---

Schleife oder SSGET?

Peter

------------------
Für jedes Problem gibt es eine einfache Lösung.
Die ist aber meistens falsch. ;-)

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

ssget mit vorher zu erzeugener Layernamenliste

z.B:

(setq L nil LLIST nil)
(while (setq L(tblnext "LAYER" (not L)))
  (if(/=(abs(cdr(assoc 62 L)))2)
    (setq LLIST(cons(cdr(assoc 2 L))LLIST))
  )
)
(ssget ..... (list (cons 8 (vl-string-trim ","(apply 'strcat (mapcar '(lambda(X)(strcat X ","))LLIST)))))
------------------
      - Thomas -          
"Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits mehr als die Hälfte der Lösung desselben."

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Besten Dank für Meldung und Lösung.
(Ich hätte ein paar Zeilen mehr gebraucht..)

Peter

------------------
Für jedes Problem gibt es eine einfache Lösung.
Die ist aber meistens falsch. ;-)

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP