| |
| 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: Optionen (1497 mal gelesen)
|
MaKollin Mitglied Konstrukteur
Beiträge: 8 Registriert: 09.07.2009
|
erstellt am: 01. Dez. 2009 12:15 <-- editieren / zitieren --> Unities abgeben:
Hallo! Hab für euch eine einfache Frage. Als erst, Lisp ist für mich Neuland. Wie kan man Optionen (_.-optionen --> funktioniert so nicht in der Befeshlzeile) im Lisp ändern? Gibts eigentlich auch einen Befehl für die Entwurseinstellungen, bzw. für die Werkzeugkästen. Wäre nicht schlecht, wenn es da schon ein Tool gibt. Besten Dank Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
CADmium Moderator Maschinenbaukonstrukteur
Beiträge: 13527 Registriert: 30.11.2003 .
|
erstellt am: 01. Dez. 2009 12:19 <-- editieren / zitieren --> Unities abgeben: Nur für MaKollin
|
cadffm Moderator 良い精神
Beiträge: 22275 Registriert: 03.06.2002 Alles
|
erstellt am: 01. Dez. 2009 12:53 <-- editieren / zitieren --> Unities abgeben: Nur für MaKollin
95% von dem was es dort zu ändern gibt sind SYSTEMVARIABLEN und somit über (getvar"meinevariable") abzufragen oder eben mit SETvar zu setzen. (if (= 1 (getvar"PICKFIRST"))(setvar "PICKFIRST" 0)(setvar "PICKFIRST" 1)) Toggled die Einstellung "Objekt vor Befehl" welche ja über die Systemvariable "Pickfirst" gesteuert wird - schau dir das Ergebnis jeweils in den Optionen, Reiter "Auswahl" / Bereich "AuswahlModi" an.. ------------------ die alte SUCHfunktion.. - System-Angaben - User:FAQ(Adesk) [Diese Nachricht wurde von cadffm am 01. Dez. 2009 editiert.] Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
MaKollin Mitglied Konstrukteur
Beiträge: 8 Registriert: 09.07.2009
|
erstellt am: 01. Dez. 2009 16:43 <-- editieren / zitieren --> Unities abgeben:
|
cadffm Moderator 良い精神
Beiträge: 22275 Registriert: 03.06.2002 Alles
|
erstellt am: 01. Dez. 2009 16:58 <-- editieren / zitieren --> Unities abgeben: Nur für MaKollin
|
MaKollin Mitglied Konstrukteur
Beiträge: 8 Registriert: 09.07.2009
|
erstellt am: 01. Dez. 2009 18:53 <-- editieren / zitieren --> Unities abgeben:
zuerst mal Danke für die schnellen Antworten! Geht echt schnell ! Hab da noch einige Fragen. 1.: Wie kann man den UserName ändern? gen@User@Username 2.: Bildlaufleiste (Optionen - Anzeige) auschalten. Gibts da auch Variablen? 3.: Pfad für Drucker-Support-Datei möchte ich auch noch gerne ändern. bei manchen gibts ja eine Systemvariable .
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
CADmium Moderator Maschinenbaukonstrukteur
Beiträge: 13527 Registriert: 30.11.2003 .
|
erstellt am: 01. Dez. 2009 19:14 <-- editieren / zitieren --> Unities abgeben: Nur für MaKollin
|
MaKollin Mitglied Konstrukteur
Beiträge: 8 Registriert: 09.07.2009
|
erstellt am: 04. Dez. 2009 19:25 <-- editieren / zitieren --> Unities abgeben:
Hat bis jetzt toll funktioniert. Heute hab ich mich wieder mal daran gemacht, hier weiter zu machen. Steh jetzt wieder an - bei den Active-X Befehlen. Die Hintergrundfarben und Fadenkreuze hab ich so hinbekommen: Bsp.: (vlax-put-property (vlax-get-property (vlax-get-property (vlax-get-acad-object) 'Preferences ); Preferences 'Display ); Display 'ModelCrosshaircolor 16777215 ); ModelCrosshaircolor (princ) Gibts da irgendwo eine Auflistung sämtlicher Active-x Befehlen (wie z.B.: vla-get-...) mit ihren Bedeutungen. Beim Mechanical Desktop (Gott hab ihn selig) gibt es bei den Optionen/Anzeige/3D-Parallelprokektion/einheitlicher Hintergrund auch eine vla-get-... Variable? Dies ist mir aber nicht so wichtig. Wegen den Bildlaufleisten hab ich auch nach langem suchen nichts gefunden . Bitte um eure Unterstützung
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
wisch Mitglied
Beiträge: 78 Registriert: 22.05.2003 WIN 7 Prof. SP1 64Bit Intel i7 2,4GHz 8GB PDSU 2013 Vault Prof. 2013
|
erstellt am: 10. Dez. 2009 09:13 <-- editieren / zitieren --> Unities abgeben: Nur für MaKollin
Also ich regel die Meisten Einstellungen in einem VB-Skript. Für die Bildlaufleisten wäre da z.B. Preferences.Display.DisplayScrollBars = True/Falsezu setzen. Bei den alten Genius Sysvar hab ich es über ein LISP geregelt. Hier wäre für gen@User@Username wie folgt einzufügen: (gencfgset "gen@User@Username" "Dein Name") ------------------ wisch Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
marc.scherer Ehrenmitglied V.I.P. h.c. CAD-Administrator
Beiträge: 2494 Registriert: 02.11.2001 Windows 10 64bit AutoCAD Architecture 2018/2019 (deu/eng) AEC-Collection 2019 (Revit und Zeugs) Wenn sich's nicht vermeiden läßt: D-A-CH Erweiterung (mies implementierter Schrott)
|
erstellt am: 10. Dez. 2009 11:20 <-- editieren / zitieren --> Unities abgeben: Nur für MaKollin
Zitat: Original erstellt von MaKollin: Gibts da irgendwo eine Auflistung sämtlicher Active-x Befehlen (wie z.B.: vla-get-...) mit ihren Bedeutungen.
Die allerbeste Anlaufstelle dafür ist die Online-Hilfe von AutoCAD. Allerdings hilft das nicht bei Objekten von Drittanbietern. Hier haben mir immer folgende Funktionen weitergeholfen (thanx to Axel "mapcar" R.I.P.): Code:
;| CAD.de Beispielfunktionen zur Ermittlung von Symbolen aus der atoms-family Vgl. hierzu Online Hilfe: atoms-family |; ;| Beispielanwendung: (setq retval (atoms-like "vla-get*")) => Damit kriegst du alles, was mit 'ac' anfängt .... |; (defun ATOMS-LIKE (PATTERN /) (vl-load-com) (vl-remove-if-not ;_ lösche alle Werte aus der Liste die folgende Bedingung NICHT erfüllen: (function (lambda (N /) (wcmatch (strcase N) (strcase PATTERN))) ) (atoms-family 1) ) ) ;| Funktion gibt eine sortierte Liste aller Symbole (jeweils als String), die mit VLA- beginnen zurück Beispielanwendung: (setq retval (get-vla-functions)) |; (defun GET-VLA-FUNCTIONS (/ RL) (vl-load-com) (vl-sort (vl-remove-if-not (function (lambda (NAME /) (= (strcase (substr NAME 1 4)) "VLA-") ) ) (atoms-family 1) ) '< ) ) ;| Funktion gibt eine Liste aller Symbole (jeweils als Symbol) zurück, die mit VLA- beginnen und den als Argument übergebenen String enthalten Beispielanwendung: (setq retval (find-vla-functions "layer")) |; (defun FIND-VLA-FUNCTIONS (PATTERN /) (mapcar 'read (vl-remove-if-not (function (lambda (NAME /) (wcmatch NAME (strcat "*" (strcase PATTERN) "*") ) ) ) (GET-VLA-FUNCTIONS) ) ) )
...------------------ Ciao, Marc Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
MaKollin Mitglied Konstrukteur
Beiträge: 8 Registriert: 09.07.2009
|
erstellt am: 10. Dez. 2009 15:31 <-- editieren / zitieren --> Unities abgeben:
Danke nochmals für eure guten Tipps. gehört vielleicht nicht gerade hier her, aber trotzdem bitte ich euch nochamls um eure Hilfe: (command "-Werkzeugkasten" "Bemaßung" "Oben" "0,0") Möchte aber gerne den Werkzeugkasten mit der Power Bemaßung. Kommt aber die AutoCad Bemußung. Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
CADmium Moderator Maschinenbaukonstrukteur
Beiträge: 13527 Registriert: 30.11.2003 .
|
erstellt am: 10. Dez. 2009 15:45 <-- editieren / zitieren --> Unities abgeben: Nur für MaKollin
|
MaKollin Mitglied Konstrukteur
Beiträge: 8 Registriert: 09.07.2009
|
erstellt am: 10. Dez. 2009 16:04 <-- editieren / zitieren --> Unities abgeben:
|
wisch Mitglied
Beiträge: 78 Registriert: 22.05.2003 WIN 7 Prof. SP1 64Bit Intel i7 2,4GHz 8GB PDSU 2013 Vault Prof. 2013
|
erstellt am: 10. Dez. 2009 16:28 <-- editieren / zitieren --> Unities abgeben: Nur für MaKollin
|
MaKollin Mitglied Konstrukteur
Beiträge: 8 Registriert: 09.07.2009
|
erstellt am: 10. Dez. 2009 16:38 <-- editieren / zitieren --> Unities abgeben:
|
wisch Mitglied
Beiträge: 78 Registriert: 22.05.2003 WIN 7 Prof. SP1 64Bit Intel i7 2,4GHz 8GB PDSU 2013 Vault Prof. 2013
|
erstellt am: 10. Dez. 2009 16:49 <-- editieren / zitieren --> Unities abgeben: Nur für MaKollin
Gleicher Name für Werkzeugkästen ist in der Tat möglich, aber du solltest vielleicht über den Aliasnamen gehen, die sind meines erachtens eindeutig. Mit (showtoolbar "TB_AMDIM" "_top" "0,0" )solltest du weiterkommen (nicht getestet, da ich kein 2009er habe) ------------------ wisch PS: Hab natürlich die Grundfunktion vergessen, musst du entsprechend anpassen!
[Diese Nachricht wurde von wisch am 10. Dez. 2009 editiert.] Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
CADmium Moderator Maschinenbaukonstrukteur
Beiträge: 13527 Registriert: 30.11.2003 .
|
erstellt am: 10. Dez. 2009 17:01 <-- editieren / zitieren --> Unities abgeben: Nur für MaKollin
|
MaKollin Mitglied Konstrukteur
Beiträge: 8 Registriert: 09.07.2009
|
erstellt am: 11. Dez. 2009 12:09 <-- editieren / zitieren --> Unities abgeben:
Wenn man es ein zweites Mal ausführt, dann gibts eine Fehlermeldung: ; Fehler: Automatisierungsfehler Der Werkzeugkasten ist bereits auf derselben Seite fixiert Is aber kein Problem. Wird ja nur einmal ausgeführt und da funktioniert es. Danke nochmals für eure tollen tipps.
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
wisch Mitglied
Beiträge: 78 Registriert: 22.05.2003 WIN 7 Prof. SP1 64Bit Intel i7 2,4GHz 8GB PDSU 2013 Vault Prof. 2013
|
erstellt am: 11. Dez. 2009 12:13 <-- editieren / zitieren --> Unities abgeben: Nur für MaKollin
Da könnte dir der mittlere Teil in meiner LISP helfen (siehe vorherigen Beitrag von mir), indem du vorher alle Werkzeugkästen abschaltest, du musst natürlich die Menübezeichnungen anpassen! ------------------ wisch Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
CADmium Moderator Maschinenbaukonstrukteur
Beiträge: 13527 Registriert: 30.11.2003 .
|
erstellt am: 11. Dez. 2009 12:19 <-- editieren / zitieren --> Unities abgeben: Nur für MaKollin
|