| |
| Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für Autodesk Produkte |
| |
| Der Weg zur Smart Factory: Ganzheitliche Planung für eine digitale Zukunft, ein Webinar am 09.10.2024
|
Autor
|
Thema: Plot mit Dialog über Script aufrufen (1020 mal gelesen)
|
Getronics Mitglied
Beiträge: 74 Registriert: 28.08.2002 XP Prof / Vista Ultimate ACAD 2005 - 2010 MDT 2005 - 2010 AIP 10.0 - 2010
|
erstellt am: 02. Jun. 2004 10:21 <-- editieren / zitieren --> Unities abgeben:
Hallo, Ich möchte am Ende eines Scripts die Dialogbox des Befehls _.PLOT aufrufen. Bringe es aber nicht hin. Habe bei Autodesk irgendwo gelesen, dass ab A2K die Systemvariable CMDDIA nicht mehr auf 0 sein muss, sondern dass im Script immer die Befehlszeilenversion des Befehls gestartet wird. Das stimmt, aber weiss jemand einen Workaround? In Lisp geht's mit (initdia)(command "_.plot"), aber im Script nicht. Besten Dank ------------------ Marco Caprez Getronics (Schweiz) AG Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Proxy Ehrenmitglied Stateless-DHCP v6-Paketfragmentierer
Beiträge: 1629 Registriert: 13.11.2003 Tastaturen, Mäuse, Pladden, Monitore, ...
|
erstellt am: 02. Jun. 2004 10:36 <-- editieren / zitieren --> Unities abgeben: Nur für Getronics
Ergebniss der Suchfunktion: (defun c:freigabe (/ p1 p2 File) (setq p1 (getpoint "\nUntere linke Ecke des Fensters angeben: ")) (setq p2 (getpoint "\nObere rechte Ecke des Fensters angeben: \n")) (setq File (strcat "c:/cad/" (Dateiname "PLT"))) (DateiPlot2000 p1 p2 File) (princ (strcat "\nDatei " (strcase file) " erfolgreich gespeichert. ")) (princ) ) (defun DateiPlot2000 (p1 p2 File) (setvar "filedia" 0) (command "_.-plot") (command "_y") ; detailliert? (command "Model") ; Layoutnamen eingeben (command "PLT-Datei.pc3") ; Ausgabegerätname eingeben (command "ISO A4 (297.00 x 210.00 MM)") ; Papierformat angeben (command "M") ; Papiereinheiten angeben (command "Q") ; Ausrichtung der Zeichnung angeben (command "_n") ; Auf dem Kopf plotten? (command "_w") ; Plotbereich angeben [Anzeige/Grenzen/Limiten/ANsicht/Fenster] (command p1) ; Untere linke Ecke des Fensters angeben (command p2) ; Obere rechte Ecke des Fensters angeben (command "A") ; Millimeter=Zeichnungseinheiten) (command "0.00,0.00") ; Plotversatz angeben (x,y) oder [Zentrum] (command "_y") ; Mit Plotstilen plotten? (command "meine.ctb") ; Potstiltabellenname angeben (command "_n") ; Mit Linienstärken plotten? (command "_n") ; Verdeckte Linien entfernen? (command "_y") ; Plot in Datei ausgeben (command File) ; Die Plotdatei inc. Pfad (command "_n") ; Änderungen an Register Modell speichern (command "_y") ; Änderungen an Register Modell speichern (setvar "filedia" 1) )
(defun Dateiname (Extension / aktDwg) (setq aktDwg (getvar "DWGNAME")) (strcat (substr aktDwg 1 (- (strlen aktDwg) 4)) "." Extension) )
Bei Fragen melden dich. ------------------ "Lisp?!?! Why the Hell did you pick the most arcane, obscure, and hopelessly-rooted-in-the-computer-science-department language in the world for an AutoCAD programming language?" Read the whole story: The Autodesk File ca. 890 Seiten | 7500 KB PDF Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Bernd P Ehrenmitglied V.I.P. h.c. cook-general
Beiträge: 3424 Registriert: 07.06.2001 W10-64bit, AMD Ryzen 7 3700X,32GB RAM, Sapphire Pulse Radeon RX 570 8G G5, Canon TX-3000 MFP, Maus Cherry MW4500, Sub:Infrastructure Design Suite, Office 365
|
erstellt am: 02. Jun. 2004 10:37 <-- editieren / zitieren --> Unities abgeben: Nur für Getronics
|
cadffm Moderator 良い精神
Beiträge: 22275 Registriert: 03.06.2002 System: F1 und Google
|
erstellt am: 02. Jun. 2004 10:41 <-- editieren / zitieren --> Unities abgeben: Nur für Getronics
@Marco wenn du es tatsächlich direkt im Script aufrufen möchtest, da habe ich auch keine Ahnung ! Wenn das Script später aber über ein Buttonmakro ghestartet werden soll, so kannst du den Aufruf ja im Buttonmakro anhängen ?!? aber ansonsten k.A. @Proxy&Bernd = ??? ------------------ - Sebastian - Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Getronics Mitglied
Beiträge: 74 Registriert: 28.08.2002 XP Prof / Vista Ultimate ACAD 2005 - 2010 MDT 2005 - 2010 AIP 10.0 - 2010
|
erstellt am: 02. Jun. 2004 10:45 <-- editieren / zitieren --> Unities abgeben:
@Proxy, Danke für die Antwort.? @Bernd, Danke für die Antwort, aber bitte genau lesen. Gruss @cadffm, Danke, hab ich mir fast gedacht. Gruss ------------------ Marco Caprez Getronics (Schweiz) AG
[Diese Nachricht wurde von Getronics am 02. Jun. 2004 editiert.] Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Bernd P Ehrenmitglied V.I.P. h.c. cook-general
Beiträge: 3424 Registriert: 07.06.2001 W10-64bit, AMD Ryzen 7 3700X,32GB RAM, Sapphire Pulse Radeon RX 570 8G G5, Canon TX-3000 MFP, Maus Cherry MW4500, Sub:Infrastructure Design Suite, Office 365
|
erstellt am: 02. Jun. 2004 10:53 <-- editieren / zitieren --> Unities abgeben: Nur für Getronics
|
Proxy Ehrenmitglied Stateless-DHCP v6-Paketfragmentierer
Beiträge: 1629 Registriert: 13.11.2003 Tastaturen, Mäuse, Pladden, Monitore, ...
|
erstellt am: 02. Jun. 2004 10:59 <-- editieren / zitieren --> Unities abgeben: Nur für Getronics
Ich fragte mich warum da ein Script benutzt werden soll, Lisp ist da etwas besser und hab da gleich mal ein Beispiel gepostet.------------------ "Lisp?!?! Why the Hell did you pick the most arcane, obscure, and hopelessly-rooted-in-the-computer-science-department language in the world for an AutoCAD programming language?" Read the whole story: The Autodesk File ca. 890 Seiten | 7500 KB PDF 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: 02. Jun. 2004 11:00 <-- editieren / zitieren --> Unities abgeben: Nur für Getronics
|
Getronics Mitglied
Beiträge: 74 Registriert: 28.08.2002 XP Prof / Vista Ultimate ACAD 2005 - 2010 MDT 2005 - 2010 AIP 10.0 - 2010
|
erstellt am: 02. Jun. 2004 11:13 <-- editieren / zitieren --> Unities abgeben:
Zitat: Original erstellt von Bernd P: OOPS sorry war ein schnellschussMit (initdia)(command "_.plot") bekomm ich das Dialogfenster über script.
Bist du sicher? Bei mir AC2000/AC2004/AC2005 krieg ich immer die Befehlszeilen-Variante. Nur wenn ich (initdia)(command "_.plot") über die Befehlszeile eintippe, kommt die Dialogbox.
------------------ Marco Caprez Getronics (Schweiz) AG Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Bernd P Ehrenmitglied V.I.P. h.c. cook-general
Beiträge: 3424 Registriert: 07.06.2001 W10-64bit, AMD Ryzen 7 3700X,32GB RAM, Sapphire Pulse Radeon RX 570 8G G5, Canon TX-3000 MFP, Maus Cherry MW4500, Sub:Infrastructure Design Suite, Office 365
|
erstellt am: 02. Jun. 2004 11:22 <-- editieren / zitieren --> Unities abgeben: Nur für Getronics
Servus Jo weis schon warum´s bei mir ging Hab das Leerzeichen in Werkzeugkasten das das Script bestätigt. Ist wie wenn ich´s in einem Werkzeugkasten stehen hab. Also geht doch nicht
------------------ Same shit, different DAU. DAU Jones schöne Grüsse aus der Steiermark Bernd P. Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Getronics Mitglied
Beiträge: 74 Registriert: 28.08.2002 XP Prof / Vista Ultimate ACAD 2005 - 2010 MDT 2005 - 2010 AIP 10.0 - 2010
|
erstellt am: 02. Jun. 2004 11:25 <-- editieren / zitieren --> Unities abgeben:
|
Bernd P Ehrenmitglied V.I.P. h.c. cook-general
Beiträge: 3424 Registriert: 07.06.2001 W10-64bit, AMD Ryzen 7 3700X,32GB RAM, Sapphire Pulse Radeon RX 570 8G G5, Canon TX-3000 MFP, Maus Cherry MW4500, Sub:Infrastructure Design Suite, Office 365
|
erstellt am: 02. Jun. 2004 11:30 <-- editieren / zitieren --> Unities abgeben: Nur für Getronics
|