---

2023-09-26_Layerbeschreib_ubertragen_Auszug.png

Hallo Cadler...,

kann ich irgendwie die Beschreibung der Layer (..dient zur Erläuterung der abgekürzten Layerbezeichnung...!)
übertragen und vereinheitlichen? (...teilweise gibt es eine Beschreibung, ... teilweise ist keine vorhanden oder falsch beschriftet...)

Ich habe ca. 10 Projekte, mit ca. 50 (von ca.70) namentlich gleich Layern und in allen Projekten sollen die Layerbeschreibung ergänzt oder überschrieben werden, falls falsch....

Da es sehr speziell ist, habe ich F1 nicht bemüht!
Meine Googlesuche fand auch nichts passendes ...

Gibt's Ideen oder hat sich jemand damit schon beschäftigt?

Grüße Pit

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

---

Ich würde die Layer-Referenzzeichnung als solche ohne Zeichnungselemente abspeichern und die Inhalte (Elemente und Layouts) der zu ändernden Zeichungen hineinkopieren und unter dem zugehörigen Namen abspeichern. Die BKS müsste man getrennt übertragen.

------------------
Gruß aus Wien
Bernhard

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

---

Hallo Bernhard,

ich danke Dir für Deinen Tipp.
Diese Lösung scheint machbar, ich werde sie ausprobieren.
Meiner Meinung aber zu aufwendig, ich glaube, ich habe zu viele Arbeitsschritte.

Ich würde alle DWGŽs so belassen wollen...
und am liebsten mit Skript oder Lisp die Informationen übertragen..., wenn das machbar ist...

Hat noch jemand einen Vorschlag oder Ansatz?

Grüße Pit

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

---

Meine Goolesuche nach
Layerbeschreibung übertragen
Layerbeschriebung kopieren
Layerliste mit Beschreibung
usw
und erst recht im großen Ozean, statt dem kleinen deutschen Tümpel

layerdescription import
layerdescription copy
layerdescription commandline
layerdescription list

Kurz: Beste Methode: Passendes Tool zum ex-/import benutzen, onboard gibt es da nichts.

ABER: Wer nichts findet/hat, der kann sich selbst helfen, OOTB: Einfaches Script erstellen, schließlich
sind dir die Layer ja bekannt, das könntest du dann auch immer wieder (für diese Layer) nutzen.

Layername mit Beschreibung kopieren (kann man direkt im Layereigenschaften-Manager markieren und *woauchimmer* einfügen),
und daraus ein Script generieren - zum erstellen und anpassen von Layern gibt es den Befehl -LAYER

und wie du selbst in der Befehlszeilen den Ablauf im Befehl entnehmen kannst,
ist der Ablauf in der Befehlszeile dann also
"-layer" "neu" "MeinLayername" "Beschreibung" "diese Beschreibung hier" "ja" ""

Da die Eingabe von Zeichenketten bei erlaubtem Leerzeichen ein wenig tricky in Scripten sind, packen wird es besser in ein Lisp (command gepackt:

(command "-layer" "neu" "MeinLayername1" "Beschreibung" "diese Beschreibung hier" "_yes" "")

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

---

Hallo Pit,

Keine Ahnung ob das funktioniert (arbeite nicht mit Beschreibungen), aber Du könntest Dir über den Layerstatusmanager eine LAS-Datei erzeugen und diese in die zu ändernde Zeichnung importieren.

Grüße
Klaus 

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

---

Hallo cadffm,

vielen Dank für die ausführliche Anleitung 😉, ich werde es testen 👍.

Hallo KlaK,

werde ich auch ausprobieren zu einem späteren Zeitpunkt.
Danke

Grüße Pit

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

---

Zitat:

---

Original erstellt von KlaK:
...aber Du könntest Dir über den Layerstatusmanager eine LAS-Datei erzeugen und diese in die zu ändernde Zeichnung importieren...

---

Genau DAS tut der Layerstatusmanager aber nicht bei "Beschreibung" - wird weder exportiert und folglich auch nicht importiert.

Die einfachste Lösung ist wie von CADFFM beschrieben: (command "_layer" ...)
Man könnte die Layernamen- und Beschreibung auch in eine LIST packen oder aus einer Textdatei importieren - je nach Lisp-Kenntnissen.

------------------
Gruß aus Wien
Bernhard

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

---

Sie können CSVlayer ausprobieren, um die Layerdefinitionen nach Excel zu exportieren (einschließlich der Beschreibung) und die Definitionen dann in die andere Zeichnung zu importieren.

https://www.cadforum.cz/en/how-to-create-dwg-layers-from-a-list-in-csv-excel-tip7193

V.Michl, www.arkance-systems.cz - www.cadforum.cz

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

---

Die folgenden zwei kurzen Lisps können helfen, ein Programm zu schreiben, das Beschreibungen in den Layer schreibt bzw. aus dem Layer ausliest:

Code:

---

(DEFUN :vl_write_layer_descr (#layername #description)
  (VL-LOAD-COM)
  (IF (TBLSEARCH "LAYER" #layername)
      (PROGN
  (SETQ #object (VLAX-ENAME->VLA-OBJECT (TBLOBJNAME "layer" #layername)))
  (VLA-PUT-DESCRIPTION #object #description)
  #description))
)

(DEFUN :vl_read_layer_descr (#layername)
(VL-LOAD-COM)
    (IF (TBLSEARCH "LAYER" #layername)
      (PROGN
  (SETQ #object (VLAX-ENAME->VLA-OBJECT (TBLOBJNAME "layer" #layername)))

(VLA-GET-DESCRIPTION #object)))
  )

---

Ergänzt um Abfrage, ob der Layer existiert.

------------------
Gruß aus Wien
Bernhard

[Diese Nachricht wurde von Bernhard GSD am 27. Sep. 2023 editiert.]

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

---

Zitat:

---

Original erstellt von cadffm:
(command "-layer" "neu" "MeinLayername1" "Beschreibung" "diese Beschreibung hier" "_yes" "")[/B]

---

Da fehlt der Layer auf den die Beschreibung angewendet werden soll, oder?

So: (command "-layer" "neu" "MeinLayername1" "Beschreibung" "diese Beschreibung hier" "MeinLayername1" "_yes" "")
Zu beachten wäre da noch das, falls es mal einen Layer in der DWG nicht gibt, dieser hierdurch angelegt wird und evtl. leer in der DWG verbleibt. Aber wenn sie sowieso in jeder DWG gleich sind....

Ich selbst benutze das (irgendwann, irgendwo gefunden)
(setq LAYERNAME "MeinLayer")(setq BESCHREIBUNG "MeineBeschreibung")(and(not(vl-catch-all-error-p(setq LAYER(vl-catch-all-apply'vla-item(list(vla-get-layers(vla-get-activedocument(vlax-get-acad-object)))LAYERNAME)))))(vlax-property-available-p  LAYER "DESCRIPTION")(vlax-put-property LAYER "DESCRIPTION" BESCHREIBUNG))
Hier wird die Beschreibung nur ergänzt, wenn der Layer in der DWG auch vorhanden ist, es wird kein Layer angelegt

------------------
Wer immer tut, was er schon kann, bleibt immer das, was er schon ist.

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

---

Zitat:

---

Original erstellt von cockpit:
Hallo Cadler...,

kann ich irgendwie die Beschreibung der Layer (..dient zur Erläuterung der abgekürzten Layerbezeichnung...!)
übertragen und vereinheitlichen? (...teilweise gibt es eine Beschreibung, ... teilweise ist keine vorhanden oder falsch beschriftet...)

Ich habe ca. 10 Projekte, mit ca. 50 (von ca.70) namentlich gleich Layern und in allen Projekten sollen die Layerbeschreibung ergänzt oder überschrieben werden, falls falsch....

---

Versuch's doch mal damit:

1. Lege eine leere DWG an mit den Layern samt beschreibungen.

2. Schreibe ein Skript, das jede Deiner zu bearbeitenden DWGs aufgelöst in diese leere DWG einfügt, und dann unter dem Namen der eingefügten DWG sichert. Dabei sollten dann die in dieser leeren DWG bereits vorhandenen korrekten Layer samt Beschreibungen unverändert bleiben.

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