| |
| Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für Autodesk Produkte |
| |
| PNY präsentiert die neue NVIDIA RTX A400 und die A1000 Grafikkarte, eine Pressemitteilung
|
Autor
|
Thema: Seiteneinrichtung automatisch laden (1621 mal gelesen)
|
Onkel Hotte Mitglied
Beiträge: 4 Registriert: 19.11.2008 Inventor 2008 und Autocad Mechanical 2008
|
erstellt am: 20. Nov. 2008 08:33 <-- editieren / zitieren --> Unities abgeben:
Hallo zusammen, ich habe schon hier im Forum gesucht, aber leider keine bei mir funktionierende Lösung gefunden. Das hier schien mir eine heiße Spur: http://ww3.cad.de/foren/ubb/Forum54/HTML/003171.shtml Aufgabenstellung: Jedesmal, wenn ich eine Datei öffne, soll eine Seiteneinrichtung (enthalten in t:\Vorlagen\A-CAD Vorlagen\vorlage.dwt, Name der Seiteneinrichtung: "NDF A4") importiert werden und dann "aktuell" geschaltet werden. Ich habe folgende zwei Zeilen in die acaddoc.lsp ergänzt: _.FILEDIA;0;_PSETUPIN;"T:/VORLAGEN/A-CAD Vorlagen/vorlage.dwt";NDF A4;_.FILEDIA;1 _pagesetup ndf a4 Das funktioniert so leider nicht, ich denke es ist ein Syntaxproblem. Wäre schön, wenn mir jemand helfen könnte. Vielen Dank schon mal im voraus :-) Gruß, Onkel Hotte
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
CADmium Moderator Maschinenbaukonstrukteur
Beiträge: 13527 Registriert: 30.11.2003 ACAD 2011 Mechanical ff
|
erstellt am: 20. Nov. 2008 08:59 <-- editieren / zitieren --> Unities abgeben: Nur für Onkel Hotte
|
Onkel Hotte Mitglied
Beiträge: 4 Registriert: 19.11.2008 Inventor 2008 und Autocad Mechanical 2008
|
erstellt am: 20. Nov. 2008 09:28 <-- editieren / zitieren --> Unities abgeben:
Hallo Thomas, scheint so, als ob es zur Lösung des Problems mehr als 2 Zeilen braucht... Ich vermute, daß diese Funktion gemeint ist: ;;; add a new page setup name to current layout-type based on current plot configuration ;;; (addPageSetup <AcadDocument> <PageSetupName> ) ;;; (addPageSetup (vla-get-activedocument (vlax-get-acad-object)) "PageSetupName") (defun addPageSetup (doc name / space pc lay) (deletePageSetup doc name) (if (= (getvar "ctab") "Model") (setq space :vlax-true lay (vla-get-Layout (vla-get-ModelSpace (vla-get-activedocument (vlax-get-acad-object))))) (setq space :vlax-false lay (vla-get-ActiveLayout (vla-get-activedocument (vlax-get-acad-object)))) ) (setq pc (vla-add (vla-get-plotconfigurations doc) name space)) (vla-CopyFrom pc lay) (vla-put-name pc name) ) An welchen Stellen muß ich denn dort meine Vorlagendatei und den Namen der Seiteneinrichtung eintragen? Ich bin leider was Lisp angeht komplett frei von Vorkenntnissen... Danke+Gruß, Peter Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Wolli Mitglied Konstrukteur
Beiträge: 704 Registriert: 28.02.2001 Win7 64Bit+32Bit VM-Ware I7 12GB ACAD Mech 2010 = Mech 2012 Inventor Pro 2010 + 2012 Ansys 13 NLS
|
erstellt am: 20. Nov. 2008 12:02 <-- editieren / zitieren --> Unities abgeben: Nur für Onkel Hotte
Servus Otte, ich habe dazu ein lisp das ich über die acaddoc.lsp bei jedem Öffnen einer Zeichnung ausführe. Dieses lisp schmeißt erstmal alle Seiteneinrichtungen raus und importiert die Seiteneinrichtung aus einer Vorlagedatei. Somit muss ich bei Änderung der z.B. Druckerumgebung... nur die Seiteneinrichtung in der Vorlagedatei ändern und habe auch beim Öffnen alter Zeichnungen immer die aktuellen zur Verfügung. Gruß Wolfgang ------------------ "Früher war die Zukunft besser" -Karl Valentin- [Diese Nachricht wurde von Wolli am 20. Nov. 2008 editiert.] Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Onkel Hotte Mitglied
Beiträge: 4 Registriert: 19.11.2008 Inventor 2008 und Autocad Mechanical 2008
|
erstellt am: 20. Nov. 2008 12:41 <-- editieren / zitieren --> Unities abgeben:
Hallo Wolfgang, danke für Dein Lisp. Habe es angepasst und eingefügt, die Seiteneinrichtung wird auch eingelesen (bzw. die SeiteneinrichtungEN, da in der Vorlage mehrere gespeichert sind). Kannst Du mir noch sagen, wie ich die meistens gewünschte Seiteneinrichtung ("NDF A4") auf "Aktuell" setzen kann? Danke+Gruß, Peter Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
CADmium Moderator Maschinenbaukonstrukteur
Beiträge: 13527 Registriert: 30.11.2003 ACAD 2011 Mechanical ff
|
erstellt am: 20. Nov. 2008 12:53 <-- editieren / zitieren --> Unities abgeben: Nur für Onkel Hotte
(command "._plot" "_n" layout newpsn "" "" "_y" "_n") aus obigen Link .. Layout und newpsn mußt du anpassen ... oder für alle Layouts (außer Modell) (mapcar '(lambda(X) (command "._plot" "_n" X ("NDF A4" "" "" "_y" "_n") ) (layoutlist) ) ------------------ - Thomas - "Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits mehr als die Hälfte der Lösung desselben." Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Onkel Hotte Mitglied
Beiträge: 4 Registriert: 19.11.2008 Inventor 2008 und Autocad Mechanical 2008
|
erstellt am: 20. Nov. 2008 14:40 <-- editieren / zitieren --> Unities abgeben:
|