| |
| Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für Autodesk Produkte |
| |
| Ersatzteilwesen optimieren mit CIDEON Sparify, eine Pressemitteilung
|
Autor
|
Thema: Erweiterung für Eigenschaftenpinsel (503 mal gelesen)
|
Grebe Mitglied
Beiträge: 536 Registriert: 16.12.2002 LT-2021, Civil3D-2021, BricsCAD V18 HP-DesignJet T1200
|
erstellt am: 09. Nov. 2006 15:15 <-- editieren / zitieren --> Unities abgeben:
Ich hätte gerne eine "Erweiterung", mit der ich z.B. über Buttons einstellen kann, welche Eigenschaften der Eigenschaftenpinsel übertragen soll. Das Einstellen in der Dialogbox ist mir zu aufwändig. Leider poppt das Einstellungsfenster auch auf, wenn ich in FILEDIA und CMDDIA auf 0 setze. Hat da jemand eine Idee, wo und wie man diese Einstellungen vornehmen kann ?? Mathias Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
CADmium Moderator Maschinenbaukonstrukteur
Beiträge: 13527 Registriert: 30.11.2003 Hinweis: Meine Mitarbeit auf CAD.DE ist fakultativ, unentgeltlich und beruht nur auf einem ausgeprägtem Helfersyndrom.
|
erstellt am: 09. Nov. 2006 15:36 <-- editieren / zitieren --> Unities abgeben: Nur für Grebe
|
Grebe Mitglied
Beiträge: 536 Registriert: 16.12.2002 LT-2021, Civil3D-2021, BricsCAD V18 HP-DesignJet T1200
|
erstellt am: 09. Nov. 2006 16:35 <-- editieren / zitieren --> Unities abgeben:
Ich weiss nicht so ganz, wie mir das weiterhelfen soll. Dies setzt ja nur die Eigenschaften für neue Objekte. Ich möchte aber gerne mittels _matchprop nur bestimmte Eigenschaften auf andere Objekte übertragen - ohne über den Einstellungen-Dialog gehen zu müssen. Mathias Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
CADmium Moderator Maschinenbaukonstrukteur
Beiträge: 13527 Registriert: 30.11.2003 Hinweis: Meine Mitarbeit auf CAD.DE ist fakultativ, unentgeltlich und beruht nur auf einem ausgeprägtem Helfersyndrom.
|
erstellt am: 09. Nov. 2006 16:54 <-- editieren / zitieren --> Unities abgeben: Nur für Grebe
war nur ein Beispiel .. setzen wäre dann ein entmod in einer Schleife ( solange Objekt gewählt ) usw. .. sowas müßte IMHO auch im Forum rumschwirren direkt am ACAD-Befehl was Schrauben geht, denke ich, nicht ------------------ - Thomas - "Bei 99% aller Probleme 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 |
Grebe Mitglied
Beiträge: 536 Registriert: 16.12.2002 LT-2021, Civil3D-2021, BricsCAD V18 HP-DesignJet T1200
|
erstellt am: 10. Nov. 2006 11:34 <-- editieren / zitieren --> Unities abgeben:
Bin schon mächtig stolz auf mich !! Habe mir aus diversen Code-Schnipseln dies hier zusammen gebastelt: (defun c:layp (/ sa_var1 sa_var2) (if (not (setq sa_var1 (entsel "\nObjekt wählen, dessen Layer-Eigenschaften übertragen werden soll:"))) (progn (alert "NIX SELEKTIERT !") (c:layp) ) ) (setq sa_var2 (entget (car sa_var1))) (setq layer (cdr (assoc 8 sa_var2))) (princ "\nÄndere Layer auf: ") (princ layer) (princ "\n")
(princ "\nObjekt wählen, dessen Layer gesetzt werden soll:") (while and (setq OBJ(car(nentsel))) (setq OBJ (entget OBJ)) (assoc 8 OBJ) (setq OBJ (subst(cons 8 layer)(assoc 8 OBJ)OBJ)) (entmod OBJ) ) ) Leider setzt diese Funktion nur den Layer von Linien !?? Mathias P.S.: Kann mir mal jemand ein gutes Buch für AutoLISP empfehlen - bin noch blutiger Anfänger was LISP angeht. Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
CADmium Moderator Maschinenbaukonstrukteur
Beiträge: 13527 Registriert: 30.11.2003 Hinweis: Meine Mitarbeit auf CAD.DE ist fakultativ, unentgeltlich und beruht nur auf einem ausgeprägtem Helfersyndrom.
|
erstellt am: 10. Nov. 2006 11:44 <-- editieren / zitieren --> Unities abgeben: Nur für Grebe
Zitat: Original erstellt von Grebe: P.S.: Kann mir mal jemand ein gutes Buch für AutoLISP empfehlen - bin noch blutiger Anfänger was LISP angeht.
zum Code .. naja .. ist ein Anfang!!!! zu Lisp : guck dir mal die Tutorials von Mapcar an.
------------------ - Thomas - "Bei 99% aller Probleme 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 |
Grebe Mitglied
Beiträge: 536 Registriert: 16.12.2002 LT-2021, Civil3D-2021, BricsCAD V18 HP-DesignJet T1200
|
erstellt am: 10. Nov. 2006 12:05 <-- editieren / zitieren --> Unities abgeben:
|