|
Lisp : Layouts auslesen
andi2050 am 29.07.2006 um 17:29 Uhr (0)
HalloGeht auch über Gruppencodes...Die Layoutinfos sind in einem Dictionary gespeichert, da muß man sich erst mal durchhangeln !Folgender Code gibt die DXF-Listen aller Layout im Textfenster aus.Die zu ändernden Gruppencodes musst Du selber raussuchen.Code:(defun c:layouts-dxflist (/) (foreach item (entget (cdr (assoc 350 (member (3 . "ACAD_LAYOUT") (entget (namedobjdict)))))) (if (= 350 (car item)) (progn (princ "
******************
DXF-Liste für LAYOUT:
******************
") (prin1 (entget (cdr ...
| | In das Form Lisp wechseln |
|
Lisp : Layouts auslesen
andi2050 am 29.07.2006 um 15:16 Uhr (0)
HiMittels ActiveX müsste es klappen (Eigenschaft ConfigName ändern):Code:;;;----------------------------------------------------;;; Setzt ConfigName von allen Layouts auf newname;;;----------------------------------------------------(defun layouts ut-configname (newname /) (vlax-for layout (vla-get-layouts (vla-get-activedocument (vlax-get-acad-object))) (vla-put-configname layout newname) ))Mit folgender Funktion kannst Du Dir die weiteren Eigenschaften/Methoden des aktiven Layouts angucken:Code:;;;----- ...
| | In das Form Lisp wechseln |
|
Anzeige:
Anzeige: (Infos zum Werbeplatz)
 |