---

GzW: Layer innerhalb eines Blocks anzeigen #481

Mit folgendem LISP-Code kann man in BricsCAD die Layer der Objekte innerhalb einer ausgewählten Blockreferenz anzeigen, ohne den Block vorher zu öffnen:

Code:

---

(vlax-for item
(vla-item
(vla-get-Blocks
(vla-get-ActiveDocument (vlax-get-acad-object))
)
(cdr (assoc 2 (entget (car (entsel)))))
)
(terpri)
(if (vlax-property-available-p item 'Layer)
(princ (vla-get-layer item))
)
(terpri)
)

---

Anwendung

1. Code in die BricsCAD-Befehlszeile kopieren.
2. Mit Return bestätigen.
3. Eine Blockreferenz auswählen.
4. Die Layer der enthaltenen Objekte werden in der Befehlszeile ausgegeben.
   

Als Button hinterlegen

1. Rechtsklick auf ein Icon.
2. Anpassen wählen.
3. Werkzeugkasten auswählen oder neuen Werkzeugkasten anlegen.
4. Neues Werkzeug erzeugen.
5. Als Befehl die einzeilige Variante eintragen:
   

Code:

---

(vlax-for item(vla-item(vla-get-Blocks(vla-get-ActiveDocument (vlax-get-acad-object)))(cdr(assoc 2(entget(car(entsel))))))(terpri)(if(vlax-property-available-p item 'Layer)(princ(vla-get-layer item)))(terpri))

---

Hinweis
Eine direkte BricsCAD-Hausfunktion zum Anzeigen oder Ändern der Layer innerhalb eines Blocks, ohne den Block zu öffnen, wurde im Beitrag nicht genannt. Dafür ist ein Zusatztool bzw. LISP-Code erforderlich.