---

LayernameMitSonderzeichen.dwg LayernameSonderzeichen.jpg

Hallo,
ich bin über eine Zeichnung gestolpert, in der ein Sonderzeichnen im Layernamen Probleme bereitet hat:

Layername: "5·01 Ⓝ_TEST"

1. Wenn ich diesen Layernamen prüfe mit
Befehl: (snvalid "5·01 Ⓝ_TEST")
=> T

2. Wenn ich den Layernamen aus einem Objekt ziehe wird das Sonderzeichen aber nicht mitgegeben:
Befehl: (setq LayerNameObj (vla-get-Layer(vlax-ename->vla-object(car(entsel)))))
Objekt wählen: "5·01 ?_TEST"

3. So kann ich dann auch nicht mit dem Layernamen des Objektes das Layerobjekt bekommen:
Befehl: (vla-item (vla-get-layers(vla-get-activedocument(vlax-get-acad-object)))LayernameObj)
; Fehler: Automatisierungsfehler Schlüssel nicht gefunden

Gibt es eine Möglichkeit, über das Objekt an den Objektlayer als vla-Objekt heranzukommen, wenn der Layername das oben beschriebene Sonderzeichen enthält?

Ich habe die Zeichnung angehängt.

------------------
viele Grüße

Jörn
http://www.bosse-engineering.com

das Flächenstempel_Tool(2023)

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

---

Da würde mir jetzt auch nur der Umweg über DXF/Autolisp Model einfallen, also mit (cdr(assoc 8 (entget(car(entsel))))) oder
(getpropertyvalue (car(entsel)) "layerid") auslesen und dann weiter wie gewünscht.

Nicht getestet, weil für mich uninteressant, wie es mit vla- bei aktivierter unicode Unterstützung ausgelesen wird)

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

---

Mit der Funktion (getpropertyvalue (car(entsel)) "layerid")  funktioniert es.

Aber ich weiß noch nicht, ob ich den Weg gehen werden, weil bei BricsCAD diese Funktion erst ab V21 zur Verfügung steht.

Außerdem ist mir ein solcher Layername nach über 20 Jahren noch nicht über den Weg gelaufen. Vielleicht werde ich das auch alles mit VL-CATCH abfangen und dem Benutzer dann sagen, dass er den Layer ordentlich benennen soll.

Ich betrachte meine Frage als gelöst, auch wenn ich noch nicht final weiß, wie ich mit den Erkenntnissen genau umgehe, danke.

------------------
viele Grüße

Jörn
http://www.bosse-engineering.com

das Flächenstempel_Tool(2023)

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

---

Hallo Jörn,

ich denke das liegt an dem activeX-Zeugs. Lass das weg und arbeite einfach mit native Lisp.
Mit

Code:

---

(setq Lname (cdr(assoc 8 (entget(car(entsel)))))
      Le (tblobjname "LAYER" lname)
      vlL (vlax-ename->vla-object le)
      )

---

Grüße!
Holger

------------------
Holger Brischke
CAD on demand GmbH
Individuelle Lösungen von Heute auf Morgen.

defun-tools Das Download-Portal für AutoCAD-Zusatzprogramme!

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

---

Hallo Holger,
manchmal muss mein einfach denken, mit Deinem Code klappt es!
Jetzt bin ich natürlich am grübeln, wieviele Programme bei mir mit vla-get-name.... arbeiten, naja, ich kann ja erst mal beim aktuellen Programm mit der Änderung anfangen

------------------
viele Grüße

Jörn
http://www.bosse-engineering.com

das Flächenstempel_Tool(2023)

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