| |
| 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 ! |
Autor
|
Thema: AMSETUPDWG ohne Dialogfeld (5017 mal gelesen)
|
wklemens Mitglied Systemingenieur
Beiträge: 383 Registriert: 02.09.2002
|
erstellt am: 14. Jan. 2003 12:49 <-- editieren / zitieren --> Unities abgeben:
Hallo! Ich möchte den Befehl AMDWGSETUP ohne die Warnmeldung "Dieser Vorgang kann nicht rückgängig gemacht weren. Möchten Sie fortfahren?" in Lisp oder VBA aufrufen. Habe aber bis jetzt noch keine Möglichkeit gefunden. Es sollten damit Zeichnungen automatisch konvertiert werden. Grüße aus Linz
Willi Klemens Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Thomas_K Mitglied Projektmanager
Beiträge: 17 Registriert: 24.09.2002
|
erstellt am: 15. Jan. 2003 16:24 <-- editieren / zitieren --> Unities abgeben: Nur für wklemens
|
wklemens Mitglied Systemingenieur
Beiträge: 383 Registriert: 02.09.2002
|
erstellt am: 15. Jan. 2003 16:39 <-- editieren / zitieren --> Unities abgeben:
|
Werner Mitglied Konstrukteur
Beiträge: 72 Registriert: 19.11.2000
|
erstellt am: 11. Feb. 2003 12:59 <-- editieren / zitieren --> Unities abgeben: Nur für wklemens
Hallo Thomas Bin zur Zeit dabei amconvdwg zu automatisieren. Wie läßt sich der Dialogbestätiger anwenden. Habe das Programm heruntergeladen und kann es auch aufrufen. Das ist es dann aber auch. Gibt es irgendwelche Informationen wie von ACAD aus über Lisp oder durch ein Script aufgerufen werden kann. Stehe da etwas auf dem Schlauch. Vielen Dank Werner
[Diese Nachricht wurde von Werner am 11. Februar 2003 editiert.] Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Thomas_K Mitglied Projektmanager
Beiträge: 17 Registriert: 24.09.2002
|
erstellt am: 11. Feb. 2003 14:25 <-- editieren / zitieren --> Unities abgeben: Nur für wklemens
|
Thomas_K Mitglied Projektmanager
Beiträge: 17 Registriert: 24.09.2002
|
erstellt am: 11. Feb. 2003 14:34 <-- editieren / zitieren --> Unities abgeben: Nur für wklemens
Hallo Werner, der Funktion AMCONVDWG kann auch ohne Dialog eine beliebige CCF-Datei mitgeliefert werden. Der Dialog-Bestätiger ist hier also vollkommen überflüssig. Aufruf in Lisp: (defun c:amconvdwg()(genlade"gen""LAYER"genconvert)(genconvert)) (C:AMCONVDWG) -> Hier mußt du beachten, daß die LAYER.LSP eine Kopie der GENCNVRT.LSP ist, welche den Verweis auf die LAYER.CCF enthält. So hat man auch die Möglichkeit, eine beliebige Anzahl Layerübersetzungen (CCF-Tabellen) für verschiedene Anforderungen aufzurufen.
------------------ Gruß Thomas Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
wklemens Mitglied Systemingenieur
Beiträge: 383 Registriert: 02.09.2002
|
erstellt am: 11. Feb. 2003 22:54 <-- editieren / zitieren --> Unities abgeben:
|
Werner Mitglied Konstrukteur
Beiträge: 72 Registriert: 19.11.2000
|
erstellt am: 12. Feb. 2003 19:50 <-- editieren / zitieren --> Unities abgeben: Nur für wklemens
Hallo Thomas Vielen Dank für dein Hinweis. Habe inzwischen einige Stunden damit verbracht das ganze zum laufen zu bringen. Funktioniert ums verecken nicht. Was will ich eigentlich? Innerhalb eines Lisp-Programmes möchte ich unsere firmenspezifische ccf-Datei aufrufen und anschliesend noch einige andere Operation an der Zeichnung durchführen. Das ganze macht nur Sinn, wenn ich nicht jedesmal über das Dateimenü die entsprechende ccf-Datei auswählen und mit RETURN bestätigen muß. Jede andere Funktion wie das Datei laden läßt sich problemlos automatisieren. Nur an diesem amconvdwg beise ich mir die Zähne aus. Falls es wirklich so wie du beschrieben hast geht, bitte Aufruf etwas näher beschreiben. Vielen Dank
Werner Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Werner Mitglied Konstrukteur
Beiträge: 72 Registriert: 19.11.2000
|
erstellt am: 13. Feb. 2003 21:36 <-- editieren / zitieren --> Unities abgeben: Nur für wklemens
So etwa stelle ich mir den Aufruf von amsetupdwg und amconvdwg in Lisp vor! (prompt "\n Dateikonvertierung mit ccf Datei aufrufen") (command "_amconvdwg" "AM2002") (prompt "\n Template DWG laden") (command "_amsetupdwg" "_y" "AM2002") Warum geht das nicht????? Werner
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Thomas_K Mitglied Projektmanager
Beiträge: 17 Registriert: 24.09.2002
|
erstellt am: 17. Feb. 2003 14:54 <-- editieren / zitieren --> Unities abgeben: Nur für wklemens
Hallo Werner, Schritt für Schritt: 1. Kopier dir die "\acadm\gen\gencnvrt.lsp" als Layerkonv.lsp ins gleiche Verzeichnis 2. Setze oben den Pfad zur CCF-Datei ein. Bsp.: (defun gencnvrt-start(/ foo olderr) (setq foo "C:/KONVERT/TABELLE/LAYER.ccf")(defun locstop(st /) nil ) 3. Aufruf in deiner Lisp: (defun c:amconvdwg()(genlade"gen""LAYERKONV"genconvert)(genconvert)) (C:AMCONVDWG) That's all... ------------------ Gruß Thomas Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Vollmer Mitglied Konstrukteur
Beiträge: 149 Registriert: 12.06.2002 Inventor 2008 / Compass Productstream
|
erstellt am: 19. Feb. 2003 15:50 <-- editieren / zitieren --> Unities abgeben: Nur für wklemens
|
axeld Mitglied Projektingenieur/CAD-Administrator
Beiträge: 267 Registriert: 18.11.2002
|
erstellt am: 25. Feb. 2003 13:06 <-- editieren / zitieren --> Unities abgeben: Nur für wklemens
|
wklemens Mitglied Systemingenieur
Beiträge: 383 Registriert: 02.09.2002
|
erstellt am: 25. Feb. 2003 16:27 <-- editieren / zitieren --> Unities abgeben:
Leider ist das Problem mit dem Befehl AMDWGSETUP auch in ACADM7 nicht gelöst. D.H. man muß auf einen Dialogfeldbestätiger zurück greifen. Eine Andere Möglichkeit kennt auch der Support von Autodesk nicht. @Thomas: könntest Du Dein Programm vom 11.2. nochmals ohne Umlaute ins Netz stellen?
------------------ Grüße aus Linz Willi Klemens MCDS Datensystem GmbH www.mcds.net Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Thomas_K Mitglied Projektmanager
Beiträge: 17 Registriert: 24.09.2002
|
erstellt am: 27. Feb. 2003 15:24 <-- editieren / zitieren --> Unities abgeben: Nur für wklemens
|
wklemens Mitglied Systemingenieur
Beiträge: 383 Registriert: 02.09.2002
|
erstellt am: 27. Feb. 2003 16:02 <-- editieren / zitieren --> Unities abgeben:
|
Werner Mitglied Konstrukteur
Beiträge: 72 Registriert: 19.11.2000
|
erstellt am: 10. Apr. 2003 17:55 <-- editieren / zitieren --> Unities abgeben: Nur für wklemens
Hallo Thomas Bin mal wieder an meinem leidigen Thema: "genconvdwg" Finde es ja echt peinlich, aber es funktioniert bisher weder mit der geänderten genconv.lsp noch mit dem Dialog-Bestätiger. Wie ist das mit dem Dialog-Bestätiger eigentlich gedacht. Wenn ich das Programm aufrufe kommt die Maske wo ich den zu bestätigenden Befehl eingeben kann. Soweit so gut. Habe es anhand des beigefügten Beispiels ohne Erfolg probiert. Ich kann eigentlich keine Reaktion von ACAD erkennen. Es müste doch eigentlich aus Lisp heraus aufrufbar sein. Wie soll das aussehen?? Fragen über Fragen und keine Antworten. Vielen Dank für deine Hilfe Werner
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
mz Mitglied Software Development
Beiträge: 182 Registriert: 15.09.2000
|
erstellt am: 29. Apr. 2008 10:37 <-- editieren / zitieren --> Unities abgeben: Nur für wklemens
Hi, hier noch eine Kurzlösung für so mach ärgerlichen Dialog. In meinem Fall war das der Genius Dialog der beim Öffnen von alten Genius Files entsteht Set ws = Wscript.CreateObject("Wscript.Shell") ws.AppActivate "Genius" ws.SendKeys("{enter}") CU Markus
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
axeld Mitglied Projektingenieur/CAD-Administrator
Beiträge: 267 Registriert: 18.11.2002 WIN7, ACAD M2013 , PSP2011, PLANT3D 2013, DBQ-, Lisp- und VBA-Programmierungen
|
erstellt am: 06. Mai. 2008 08:34 <-- editieren / zitieren --> Unities abgeben: Nur für wklemens
|
Lothar Herrl Mitglied
Beiträge: 602 Registriert: 06.07.2001
|
erstellt am: 06. Mai. 2008 10:05 <-- editieren / zitieren --> Unities abgeben: Nur für wklemens
|