| |
| Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für Autodesk Produkte |
Autor
|
Thema: Befehl SECTION (294 mal gelesen)
|
CADBURY Mitglied Bau.-Ing.
Beiträge: 39 Registriert: 31.08.2004 Autocad 2000 - Servicepack 1 ELSA Synergy Grafikkarte 1 GB Hauptspeicher
|
erstellt am: 09. Mai. 2005 10:16 <-- editieren / zitieren --> Unities abgeben:
Hallo! Habe 2 Fragen: 1. Gibt es ein Programm, das den Befehl Section auch in Gruppen und Blöcken (XREF´s) anwendet? 2. Gibt es ein Programm, das den Inhalt von Layern jeweils in eine Datei (DWG) schreibt, die den gleichen Namen hat wie der Layer? Gruß Dieter Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
c@s Mitglied cad kommunikation
Beiträge: 269 Registriert: 07.08.2002 win 10<P> AutoCad 2018
|
erstellt am: 09. Mai. 2005 10:26 <-- editieren / zitieren --> Unities abgeben: Nur für CADBURY
|
captainfritz Mitglied Bauingenieur/Wasserbau
Beiträge: 270 Registriert: 07.05.2004 AutoCAD 2005/2006/2007 Map, AutoTerrain, bbsoft, Geotools, Windows XP
|
erstellt am: 09. Mai. 2005 10:29 <-- editieren / zitieren --> Unities abgeben: Nur für CADBURY
|
CADmium Moderator Maschinenbaukonstrukteur
Beiträge: 13508 Registriert: 30.11.2003 Hinweis: Meine Mitarbeit auf CAD.DE ist fakultativ, unentgeltlich und beruht nur auf einem ausgeprägtem Helfersyndrom.
|
erstellt am: 09. Mai. 2005 10:42 <-- editieren / zitieren --> Unities abgeben: Nur für CADBURY
zu 2. mal ganz primi ohne alles: (defun c:LAYEROUT( / NAME AWS) (if(and(setq NAME(getstring "\nLAYERNAME:")) (tblobjname "LAYER" NAME) (setq AWS(ssget "_x" (list (cons 8 NAME)))) ) (progn (command "_copy" AWS "" '(0 0 0)'(0 0 0)) (command "_wblock" NAME "" '(0 0 0) AWS "") ) ) ) ------------------ - 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 |
CADBURY Mitglied Bau.-Ing.
Beiträge: 39 Registriert: 31.08.2004 Autocad 2000 - Servicepack 1 ELSA Synergy Grafikkarte 1 GB Hauptspeicher
|
erstellt am: 09. Mai. 2005 13:44 <-- editieren / zitieren --> Unities abgeben:
Hallo Thomas! Danke für Deinen Beitrag! Funktioniert gut pro Layerabfrage. Nebeneffekt: alles wird auf Farbe vom eingegebenen Layer gestellt. Wie groß ist der Aufwand, alle Layer automatisch auszulesen und dann deine Routine in einer Schleife abarbeiten zu lassen? Gruß Dieter Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
CADBURY Mitglied Bau.-Ing.
Beiträge: 39 Registriert: 31.08.2004 Autocad 2000 - Servicepack 1 ELSA Synergy Grafikkarte 1 GB Hauptspeicher
|
erstellt am: 09. Mai. 2005 13:46 <-- editieren / zitieren --> Unities abgeben:
|
CADmium Moderator Maschinenbaukonstrukteur
Beiträge: 13508 Registriert: 30.11.2003 Hinweis: Meine Mitarbeit auf CAD.DE ist fakultativ, unentgeltlich und beruht nur auf einem ausgeprägtem Helfersyndrom.
|
erstellt am: 09. Mai. 2005 14:28 <-- editieren / zitieren --> Unities abgeben: Nur für CADBURY
für alle Layer: (defun c:LAYEROUT( / NAME AWS) (While (setq NAME (tblnext "LAYER" (null NAME))) (setq NAME(cdr(assoc 2 NAME))) (if(setq AWS(ssget "_x" (list (cons 8 NAME)))) (progn (command "_copy" AWS "" '(0 0 0)'(0 0 0)) (command "_wblock" NAME "" '(0 0 0) AWS "") ) ) ) ) ------------------ - 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 |
j-sc Ehrenmitglied
Beiträge: 1837 Registriert: 14.07.2003 W7 64Bit intel core I7 2,8GHz / 4GB ATI FIRE PRO V5800 acad2011 acad2015 acad2018 Athena Expresstools
|
erstellt am: 09. Mai. 2005 16:20 <-- editieren / zitieren --> Unities abgeben: Nur für CADBURY
High, ehe 1 total vergessen wird - _SECTION (QUERSCHNITT) funzt nur bei acad-Volumenkörpern, macht man aus denen Blöcke, sind's dann Blockrefenzen und keine Volumenkörper mehr ;-). Man bräuchte (zumindest temporär) 'ne Kopie sämtlicher Volumenkörper der Blocke und/oder Referenzen incl. Verschachtelungen. Was Fertiges ist mir dazu aber auch noch nirgends aufgefallen - Soll nicht heißen, dass es sowas nicht geben könnte. ------------------ Ciao J-SC ... geht's vielleicht doch? Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |