| |
| Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für Autodesk Produkte |
| |
| Request a special discount on NVIDIA RTX 5000 Ada Generation GPU !, eine Pressemitteilung
|
Autor
|
Thema: autom. Zeichnungspfad ändern (1255 mal gelesen)
|
Jürgen Scheeren Mitglied Energieanlagen Konstrukteur , CAD-Administrator
Beiträge: 262 Registriert: 03.04.2003 Autocad MEP 2016 win7x64bit
|
erstellt am: 06. Okt. 2004 14:43 <-- editieren / zitieren --> Unities abgeben:
Hallo liebe Autolispgemeinde, zwecks mangelnder Sicherungsdisziplin in meiner Firma habe ich mir eine Zeichnungsspeicherung vor dem Druckbefehl eingebaut. Die Zeichnung wird im aktuellen Pfad im Ordner "Aktuell" abgespeichert. Ich möchte aber das die Zeichnung in einem anderen Ordner abgespeichert wird und zwar in "Verteilt". Weiss aber nicht wie ich das in meinem Code bekomme. Habe schon in diesem Forum und auf der Web Seite von Afralisp nachgeschaut. Kann mir jemand einen Tip geben. Gruß Jürgen Hier der Code (defun c:Index ( / sl) (setq Pfad (getvar "DWGPREFIX")) (setq Dwg_Name (getvar "DWGNAME")) (setq Vpfad (strcat Pfad DWG_Name)) (setq sl (getfiled "Zeichnung in Verteilt abspeichern" Vpfad "dwg" 5)) ;;5=speichern 10=öffnen (princ) );defun (princ) [Diese Nachricht wurde von Jürgen Scheeren am 06. Okt. 2004 editiert.] Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
CADwiesel Moderator CAD4FM UG
Beiträge: 1989 Registriert: 05.09.2000 AutoCAD, Bricscad Wir machen das Mögliche unmöglich
|
erstellt am: 06. Okt. 2004 15:00 <-- editieren / zitieren --> Unities abgeben: Nur für Jürgen Scheeren
|
Brischke Moderator CAD on demand GmbH
Beiträge: 4187 Registriert: 17.05.2001 AutoCAD 20XX, defun-tools (d-tools.eu)
|
erstellt am: 06. Okt. 2004 15:01 <-- editieren / zitieren --> Unities abgeben: Nur für Jürgen Scheeren
|
CADwiesel Moderator CAD4FM UG
Beiträge: 1989 Registriert: 05.09.2000 AutoCAD, Bricscad Wir machen das Mögliche unmöglich
|
erstellt am: 06. Okt. 2004 15:14 <-- editieren / zitieren --> Unities abgeben: Nur für Jürgen Scheeren
|
Brischke Moderator CAD on demand GmbH
Beiträge: 4187 Registriert: 17.05.2001 AutoCAD 20XX, defun-tools (d-tools.eu)
|
erstellt am: 06. Okt. 2004 15:19 <-- editieren / zitieren --> Unities abgeben: Nur für Jürgen Scheeren
... genau .. und dann noch erweitert um die Funktionen, dass die XRefs gebunden werden und der Dateiname um das Datum und Uhrzeit ergänzt werden. So hat man immer auch den Planstand zur Hand, der irgendwann mal geplottet wurde. Um dass dann allerdings noch händeln zu können wäre ein gleichzeitiger Eintrag in eine Datenbank sehr hilfreich. Wenn das hier jetzt so klingt, als nehme ich den Beiterag nicht ernst, das wäre falsch. Ich meine es ernst, das wäre doch mal eine Herausforderung! Grüße Holger ------------------ Holger Brischke (defun - Lisp over night! AutoLISP-Programmierung für AutoCAD Da weiß man, wann man's hat! Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Jürgen Scheeren Mitglied Energieanlagen Konstrukteur , CAD-Administrator
Beiträge: 262 Registriert: 03.04.2003 Autocad MEP 2016 win7x64bit
|
erstellt am: 06. Okt. 2004 15:27 <-- editieren / zitieren --> Unities abgeben:
Hallo CADwiesel, Hallo Holger, vielen dank für die schnellen Antworten. Das abspeichern soll schon von jedem User bewußt vollzogen werden. Ich arbeite mit der getfiled-Funktion und das Dialogfeld zum Speichern öffnet sich im Ordner "Aktuell" (aktueller Verzeichnispfad) es soll sich aber im Order "Verteilt" öffnen. Da der Verzeichnispfad für jedes Projekt anders ist und nur die Ordner "Verteilt" und "Aktuell" immer gleich sind würde ich gerne auch mit der Funktion "DWGPREFIX" weiter arbeiten. Gruß Jürgen Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
CADwiesel Moderator CAD4FM UG
Beiträge: 1989 Registriert: 05.09.2000 AutoCAD, Bricscad Wir machen das Mögliche unmöglich
|
erstellt am: 06. Okt. 2004 15:36 <-- editieren / zitieren --> Unities abgeben: Nur für Jürgen Scheeren
was willst du mit dwgprefix? ist doch nicht richtig. Du mußt entweder mit substr einige Zeichen von dwgprefix löschen oder mit strcat welche dazupacken, so das du auf deinen gewünschten pfad kommst Poste doch mal Beispiele (ist - soll) ------------------ Gruß CADwiesel Besucht uns im CHAT
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
CADmium Moderator Maschinenbaukonstrukteur
Beiträge: 13527 Registriert: 30.11.2003 .
|
erstellt am: 06. Okt. 2004 15:42 <-- editieren / zitieren --> Unities abgeben: Nur für Jürgen Scheeren
Vielleicht hilft dir das weiter (vl-string-subst "VERTEILT" "AKTUELL" (strcase(getvar "DWGPREFIX"))) .. wenn "Aktuell" im Pfad vorkommt, wird er durch "verteilt ersetzt.. ------------------ - Thomas - "Bei 99% aller Problemen 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 |
Jürgen Scheeren Mitglied Energieanlagen Konstrukteur , CAD-Administrator
Beiträge: 262 Registriert: 03.04.2003 Autocad MEP 2016 win7x64bit
|
erstellt am: 06. Okt. 2004 15:43 <-- editieren / zitieren --> Unities abgeben:
Hallo Cadwiesel, Du hast recht, für den Pfad P:\SW_Schönebeck\SWSK403-P_BHKW_700_kW\AutoCAD\Aktuell\001-A-e.dwg soll der Pfad P:\SW_Schönebeck\SWSK403-P_BHKW_700_kW\AutoCAD\Verteilt\001-A-e.dwg eingesetzt werden. Das mit substr hört sich schon gut an, vieleicht kannst Du mir ein Beispiel zeigen. Gruß Jürgen
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Jürgen Scheeren Mitglied Energieanlagen Konstrukteur , CAD-Administrator
Beiträge: 262 Registriert: 03.04.2003 Autocad MEP 2016 win7x64bit
|
erstellt am: 06. Okt. 2004 15:50 <-- editieren / zitieren --> Unities abgeben:
|