|
Lisp : Materialzuweisung von ACA-Stil ermitteln
cadking am 06.04.2020 um 09:00 Uhr (1)
Hallo Lispler,ich habe mir ein Lisp geschrieben, mit dem ich nicht verwendete ACA-Stile aus dem Stilmanager bereinigen kann. Nun würden ich gerne auch die nicht genutzten Materialien aus dem Stilmanager bereinigen, aber ich finde keinen Weg wie man an die einem Stil zugewiesenen Materialien kommt. Hat jemand eine Idee?------------------Danke Stefan
|
In das Form Lisp wechseln |
 |
Lisp : MV-Block geänderte Werte zurückschreiben
cadking am 08.10.2021 um 08:03 Uhr (15)
Hallo Lisp-Experten,ich habe mir aus MV-Blöcken in einer Zeichnung folgende Werte ermittelt:(setq ObjnameMVB (ssname get_MV-BLOCK lauf));holt Entityname von MV-Block(setq ObjnameMVBVLA (vlax-ename-vla-object ObjnameMVB));holt VLA-Objektname von MV-Block(setq MVBlockDefName (vlax-get-property ObjnameMVBVLA "StyleName"))(setq scalex (vlax-get-property ObjnameMVBVLA "ScaleX"))(setq scalez (vlax-get-property ObjnameMVBVLA "ScaleZ"))(setq scaley (vlax-get-property ObjnameMVBVLA "ScaleY"))(setq einfp (vlax-get O ...
|
In das Form Lisp wechseln |
|
AutoCAD VBA : Ändern von Einträgen im ACA-Stilmanager
cadking am 28.04.2023 um 23:37 Uhr (1)
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 Stilnamenvorgedrungen und habe auch bereist die neuen Stilnamen an ein (setq ...) übergeben.Aber ich habe keine Idee, wie ich die an das Objekt zurück schreiben.Gibt es so etwas wie DumpObjectV1-2.lsp auch für nicht auswählbare Objekte wie Einträge im Stilmanager?Ich habe es auch schon mit find-vla-functions.lsp versuch ...
|
In das Form AutoCAD VBA wechseln |
|
Lisp : Ändern von Einträgen im ACA-Stilmanager mit Lisp
cadking am 02.05.2023 um 15:43 Uhr (1)
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 Stilnamenvorgedrungen 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 ...
|
In das Form Lisp wechseln |
|
Lisp : Ändern von Einträgen im ACA-Stilmanager mit Lisp
cadking am 02.05.2023 um 22:28 Uhr (1)
OK, wenn mir auf meine erste Frage keiner eine Antwort geben kann,hier vielleicht ein anderer Ansatz:(setq dict (dictsearch (namedobjdict) "AEC_WALL_STYLES")) =((-1 . Objektname: 1e51606de40 ) (0 . "DICTIONARY") (5 . "334") (102 . "{ACAD_REACTORS") (330 . Objektname: 1e51606e8c0 ) (102 . "}") (330 . Objektname: 1e51606e8c0 ) (100 . "AcDbDictionary") (280 . 0) (281 . 1) (3 . "MW Reichsklinker dunkel variabel - nicht tragend") (350 . Objektname: 1ed197b3ab0 ) (3 . "MW Reichsklinker dunkel variabel - tragend" ...
|
In das Form Lisp wechseln |
 Rename_Wandstilname_AECDictionary.lsp.txt |
Lisp : Ändern von Einträgen im ACA-Stilmanager mit Lisp
cadking am 04.05.2023 um 00:48 Uhr (15)
so, ich habe es geschafft.Ich habe keine Listenelemente ausgetauscht, sondern die ganze Entityliste des Dictionary "AEC_WALL_STYLES" mit den aktualisierten GC3-Stilnamen neu erzeugt und dann mit entmod zurückgeschrieben.Hier eine Beispiel-DWG und die Lisp. Zum Starten der Lisp einfach per DRAG&DROP in die Zeichnung ziehen.------------------Danke Stefan
|
In das Form Lisp wechseln |