Hallo Leute,
ich möchte per Lisp Stile im Autocad-Stilmanager ändern. Über (dictsearch (namedobjdict) "AEC_WALL_STYLES") und die Gruppencodes 3 und 350 bin ich bis zu den Objektnamen und den Stilnamen
vorgedrungen und habe auch bereist die neuen Stilnamen an ein (setq ...) übergeben.
Aber ich habe keine Idee, wie ich die neuen Stilnamen an das Objekt zurück schreiben.
Mein aktueller Ansatz geht bis:
Befehl: (LOAD "Rename_Wandstilname_AECDictionary.lsp")
"alter Stilname: " MW Reichsklinker dunkel variabel - nicht tragend
"neuer Stilname: " MW Reichsklinker dunkel variabel F90 - nicht tragend
(vlax-ename->vla-object first350DIC) => #<VLA-OBJECT IAecWallStyle 00000227f37fa850>
aber mit
(vlax-get-property (vlax-ename->vla-object first350DIC) "?") komme ich nicht weiter.
Am Ende würde ich gerne sowas machen wie:
(vlax-put-property (vlax-ename->vla-object first350DIC) "StyleName" "MW Reichsklinker dunkel variabel F90 - nicht tragend").
Kann mir da jemand helfen? Die DWG mit den Wandstilen und die Lisp (als Rename_Wandstilname_AECDictionary.lsp.txt) befinden sich im Anhang
Danke für Eure Anregungen
Stefan
------------------
Danke Stefan
------------------
Danke Stefan
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP