---

Hallo Forum,

ich arbeite gerade an einem Planausgabetool.

Wir haben bei uns in der Vorgabelayerstruktur verschiedene Layer für Indizes. Die ersten Wolken kommen auf Layer Index_A, bei der nächsten Änderung wird der Layer Index_B verwendet usw.
Für die Planausgabe möchte ich nur den jeweils letzten Layer erhalten und alle vorherigen löschen. Unbenutzte Index-Layer fallen ja durch bereinigen schon raus, also könnte ich ja theoretisch prüfen, welche Layerbezeichnung den größten Buchstaben am Ende hat und alle anderen Index-Layer außer diesem löschen.

So, und jetzt mein Problem:
Ich habe keine Ahnung, ob das überhaupt geht und wie ich das am gescheitesten anstelle.
Hat jemand vielleicht einen Denkanstoß für mich?

Vielen Dank,
Musicus

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

---

Genau so wie du es geschrieben hast funktioniert es auch !
Eine Quick&Command Möglichkeit sieht so aus:

Code:

---

(defun c:CLEANINDEXLAYER ( / LAY LAYLIST)
  (setq LAY (tblnext "LAYER" T) n 0)
  (while LAY
    (if (wcmatch (strcase(cdr(assoc 2 LAY))) "INDEX_?")
(setq LAYLIST (cons(strcase(cdr(assoc 2 LAY)))LAYLIST))
    )
    (setq LAY (tblnext "LAYER"))
  )
  (if LAYLIST
      (foreach LAY (vl-sort-i LAYLIST '< )
    (if (/= 0 LAY)
        (progn
  (command "_.-LAYDEL" "_Name" (nth lay laylist) "" "_yes")
  (terpri)(princ (nth lay laylist))
)
    )
      )
      (princ "\nEs wurden keine 'Index' Layer gefunden")
  )
  (princ)
)

---

------------------
Link: User:FAQ (einiges Wissenswertes über AutoCAD)

[Diese Nachricht wurde von cadffm am 22. Jul. 2013 editiert.]

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

---

Super, dankeschön!

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