| |
| Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für Autodesk Produkte |
| |
| Effiziente Datenmigration trifft nahtlose Systemintegration , ein Anwenderbericht
|
Autor
|
Thema: dias über script haben keine Dateiendung (1540 mal gelesen)
|
he-st Mitglied CAD Konstrukteur
Beiträge: 110 Registriert: 18.04.2005 Win10 64bit AutoCAD 2016
|
erstellt am: 02. Okt. 2015 12:24 <-- editieren / zitieren --> Unities abgeben:
Hallo liebe Kollegen, ich habe ein Verzeichnis mit über 1000 kleinen Dateien, zu denen ich gerne ein Dia hätte. Dazu habe ich ein altes Script von mir (von AutoCAD 2004) raugekramt und über den Multe Script Creator laufen lassen. Früher ging das immer ohne Probleme. Jetzt habe ich das Problem, dass zwar für jede DWG eine Dia Datei erstellt wird, aber leider ohne Dateiendung. Wenn ich die Datei per Hand zu*.sld ändere wird im Dia nichts angezeigt (alles schwarz). Das Script sieht folgendermaßen aus: zoom g machdia Wird der Befehl machdia von mir direkt eingegeben wird auch ein korrektes Dia mit Dateiendung erstellt. Nur über das Script nicht.
Kann mir da jemand helfen? Oder gibt es eine andere Möglichkeit massenhaft aus Dateien Dias zu erstellen (vorher zoom g)? Vielen Dank schon mal Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
jupa Ehrenmitglied V.I.P. h.c. Ruheständler
Beiträge: 6052 Registriert: 16.09.2004 Windows 10 64bit, ACAD Rel. 14 - ACAD 2023
|
erstellt am: 02. Okt. 2015 13:35 <-- editieren / zitieren --> Unities abgeben: Nur für he-st
Zitat: Original erstellt von he-st: Multe Script Creator
Was ist das? Jürgen ------------------ Bildung kommt nicht vom Lesen, sondern vom Nachdenken über das Gelesene. (Carl Hilty) [Diese Nachricht wurde von jupa am 02. Okt. 2015 editiert.] Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
he-st Mitglied CAD Konstrukteur
Beiträge: 110 Registriert: 18.04.2005 Win10 64bit AutoCAD 2016
|
erstellt am: 02. Okt. 2015 13:43 <-- editieren / zitieren --> Unities abgeben:
Ein Tool, mit dem man ein Script auf mehrere Dateien anwenden kann. Es wird dann jede gewählte Datei geöffnet, Script ausgeführt, Datei geschlossen, nächste Datei. Dies aber nur am Rande, weil wenn ich das Script direkt in AutoCAD ausführe dann kommt das selbe Ergebnis raus. [Diese Nachricht wurde von he-st am 02. Okt. 2015 editiert.] Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
CAD-Huebner Ehrenmitglied V.I.P. h.c. Verm.- Ing., ATC-Trainer
Beiträge: 9803 Registriert: 01.12.2003 AutoCAD 2.5 - 2025, Civil 3D, MAP 3D, ACADM, ACA Inventor Prof. 2025, AIP 4-2025 Win 11
|
erstellt am: 02. Okt. 2015 16:17 <-- editieren / zitieren --> Unities abgeben: Nur für he-st
|
jupa Ehrenmitglied V.I.P. h.c. Ruheständler
Beiträge: 6052 Registriert: 16.09.2004 Windows 10 64bit, ACAD Rel. 14 - ACAD 2023
|
erstellt am: 02. Okt. 2015 16:23 <-- editieren / zitieren --> Unities abgeben: Nur für he-st
Zitat: Original erstellt von he-st: wenn ich das Script direkt in AutoCAD ausführe dann kommt das selbe Ergebnis raus.
Probiere dieses Script: zoom g machdia (strcat (getvar "dwgname") ".sld") Sollte Dich das .dwg im DiaNamen stören, läßt sich das durchaus entfernen. Der Lispausdruck wird nur "etwas" länger.
Jürgen ------------------ Bildung kommt nicht vom Lesen, sondern vom Nachdenken über das Gelesene. (Carl Hilty) [Diese Nachricht wurde von jupa am 03. Okt. 2015 editiert.] Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
jupa Ehrenmitglied V.I.P. h.c. Ruheständler
Beiträge: 6052 Registriert: 16.09.2004 Windows 10 64bit, ACAD Rel. 14 - ACAD 2023
|
erstellt am: 02. Okt. 2015 16:37 <-- editieren / zitieren --> Unities abgeben: Nur für he-st
Zitat: Original erstellt von CAD-Huebner: ich kann bestätigen, dass AutoCAD 2016 beim Befehl MACHDIA den Zeichnungsnamen ohne die Extension .SLD vorschlägt und speichert.
Wird der Befehl innerhalb eines Scriptes aufgerufen, trifft diese Aussage für alle von mir getesteten ACAD-Versionen bis hinab zu ACAD 2004 zu. (Weiter zurück kann ich nicht mehr). Keine Ahnung, warum das dann beim TE früher (mit ACAD 2004) anders gewesen sein soll. Jürgen ------------------ Bildung kommt nicht vom Lesen, sondern vom Nachdenken über das Gelesene. (Carl Hilty) Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
jupa Ehrenmitglied V.I.P. h.c. Ruheständler
Beiträge: 6052 Registriert: 16.09.2004 Windows 10 64bit, ACAD Rel. 14 - ACAD 2023
|
erstellt am: 02. Okt. 2015 16:46 <-- editieren / zitieren --> Unities abgeben: Nur für he-st
Zitat: Original erstellt von CAD-Huebner: ... es entsteht eine gültige Diadatei, die mit Befehl MACHDIA angezeigt werden kann.
Nur um Mißverständnisse zu vermeiden, Du meintest vermutlich "ZEIGDIA". Jürgen ------------------ Bildung kommt nicht vom Lesen, sondern vom Nachdenken über das Gelesene. (Carl Hilty) Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
CAD-Huebner Ehrenmitglied V.I.P. h.c. Verm.- Ing., ATC-Trainer
Beiträge: 9803 Registriert: 01.12.2003 AutoCAD 2.5 - 2025, Civil 3D, MAP 3D, ACADM, ACA Inventor Prof. 2025, AIP 4-2025 Win 11
|
erstellt am: 02. Okt. 2015 23:59 <-- editieren / zitieren --> Unities abgeben: Nur für he-st
Zitat: Original erstellt von jupa: Nur um Mißverständnisse zu vermeiden, Du meintest vermutlich "ZEIGDIA". Jürgen
Ganz sicher sogar MACHDIA -> ZEICHDIA ------------------ Mit freundlichem Gruß Udo Hübner www.CAD-Huebner.de [Diese Nachricht wurde von CAD-Huebner am 02. Okt. 2015 editiert.] Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
jupa Ehrenmitglied V.I.P. h.c. Ruheständler
Beiträge: 6052 Registriert: 16.09.2004 Windows 10 64bit, ACAD Rel. 14 - ACAD 2023
|
erstellt am: 03. Okt. 2015 09:57 <-- editieren / zitieren --> Unities abgeben: Nur für he-st
Zitat: Original erstellt von jupa:
Sollte Dich das .dwg im Scriptnamen stören, läßt sich das durchaus entfernen.
Ein mögliches Script mit dieser Funktionalität könnte folgendermaßen aussehen: zoom g machdia (defun str-reverse (s1 / str lfd) (setq str "") (setq lfd 1) (while (<= lfd (strlen s1)) (setq str (strcat (substr s1 lfd 1) str)) (setq lfd (1+ lfd)) ) str ) (strcat (str-reverse (strcat (substr (str-reverse (getvar "dwgname")) 1 0) (substr (str-reverse (getvar "dwgname")) 5))) ".sld")
Nicht schön (ich sehe schon die Schelte aus der LISP-Ecke auf mich zukommen), aber funktioniert. [EDIT] Dank Sebastians Hinweis verkürzt auf:
zoom g machdia (strcat (substr (getvar "dwgname") 1 (- (strlen (getvar "dwgname")) 4)) ".sld") Jürgen
------------------ Bildung kommt nicht vom Lesen, sondern vom Nachdenken über das Gelesene. (Carl Hilty) [Diese Nachricht wurde von jupa am 03. Okt. 2015 editiert.] Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
cadffm Moderator 良い精神
Beiträge: 22275 Registriert: 03.06.2002 System: F1 und Google
|
erstellt am: 03. Okt. 2015 13:01 <-- editieren / zitieren --> Unities abgeben: Nur für he-st
LispEcke: Der String kann auch umschrieben werden in dem sagt: Ab erstem Zeichen wiedergeben, für die Länge (- Gesamtlänge 4), die Funktionalität liefert SUBSTR . Weiteres: (vl-filename-base xxxxx) (cadr(fnsplitl xxxxx)) Edit, String drehen: vl-string->list und vl-list->list und reverse ------------------ CAD on demand GmbH - Beratung und Programmierung rund um AutoCAD Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
he-st Mitglied CAD Konstrukteur
Beiträge: 110 Registriert: 18.04.2005 Win10 64bit AutoCAD 2016
|
erstellt am: 05. Okt. 2015 09:18 <-- editieren / zitieren --> Unities abgeben:
@ jupa Das verkürzte Script funktioniert. Danke schon mal. Hab jetzt nur noch das Problem, dass die SLD Datei nicht im Verzeichnis der DWG gespeichert wird, sondern im Verzeichnis wo sich das Script befindet. Kann man das irgendwie anpassen? Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
jupa Ehrenmitglied V.I.P. h.c. Ruheständler
Beiträge: 6052 Registriert: 16.09.2004 Windows 10 64bit, ACAD Rel. 14 - ACAD 2023
|
erstellt am: 05. Okt. 2015 11:17 <-- editieren / zitieren --> Unities abgeben: Nur für he-st
Zitat: Original erstellt von he-st:
Kann man das irgendwie anpassen?
Ungetestet: LISP-Zeile ändern in (Fett markiertes wurde hinzugefügt): (strcat (getvar "dwgprefix")(substr (getvar "dwgname") 1 (- (strlen (getvar "dwgname")) 4)) ".sld") Jürgen
------------------ Bildung kommt nicht vom Lesen, sondern vom Nachdenken über das Gelesene. (Carl Hilty) [Diese Nachricht wurde von jupa am 05. Okt. 2015 editiert.] Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
he-st Mitglied CAD Konstrukteur
Beiträge: 110 Registriert: 18.04.2005 Win10 64bit AutoCAD 2016
|
erstellt am: 05. Okt. 2015 11:38 <-- editieren / zitieren --> Unities abgeben:
|