| |
| 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: Blockbearbeitung ohne Auflösung (443 mal gelesen)
|
itzefitz Mitglied Techn. Zeichnerin
Beiträge: 17 Registriert: 23.12.2004 ACAD 2000 und ACAD 2002 Win 98 und Win XP
|
erstellt am: 15. Feb. 2005 08:37 <-- editieren / zitieren --> Unities abgeben:
Guten Morgen, ich arbeite mit ACAD2002, ich möchte gerne aus bestehenden Blöcken, ohne sie aufzulösen, von einenm bestimmten Layer befreien. Das heißt: ich habe div. 2D-Blöcke, erzeugt aus einer 3D-Zeichnung, erhalten. Jetzt ist in den Blöcken ein Layer den ich nicht gebrauchen kann. Gibt es eine Möglichkeit diesen für mich überflüssigen Layer zu löschen ohne die Blöcke zu zerlegen? (Mit Schnellauswahl oder so) Gruß Itzefitz Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
charlieBV Ehrenmitglied V.I.P. h.c. Bauzeichnerin
Beiträge: 9319 Registriert: 28.08.2003
|
erstellt am: 15. Feb. 2005 08:45 <-- editieren / zitieren --> Unities abgeben: Nur für itzefitz
Hi, es gitb das Lisp Nuke, downzuloaden bei www.cadwiesel.de das schiebt alles innerhalb eines ausgewählten (oder auch aller) Blöcke auf den Layer 0. Sonst, wenn es sich nur um einen Block handelt mittels Xref und Block in Zeichnung bearbeiten, das händisch tun (wenn Blöcke Layer in sich behalten sollen und nur einer raus soll). ------------------ Gruß Yvonne 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: 15. Feb. 2005 09:03 <-- editieren / zitieren --> Unities abgeben: Nur für itzefitz
|
CADwiesel Moderator CAD4FM UG
Beiträge: 1989 Registriert: 05.09.2000 AutoCAD, Bricscad Wir machen das Mögliche unmöglich
|
erstellt am: 15. Feb. 2005 09:13 <-- editieren / zitieren --> Unities abgeben: Nur für itzefitz
|
itzefitz Mitglied Techn. Zeichnerin
Beiträge: 17 Registriert: 23.12.2004 ACAD 2000 und ACAD 2002 Win 98 und Win XP
|
erstellt am: 15. Feb. 2005 09:23 <-- editieren / zitieren --> Unities abgeben:
|
AsSchu Ehrenmitglied Konstrukteur
Beiträge: 1632 Registriert: 27.06.2003 ACAD 2012
|
erstellt am: 15. Feb. 2005 10:41 <-- editieren / zitieren --> Unities abgeben: Nur für itzefitz
Moin, du warst bei cadwiesel auf der Seite. Dann hättest du dir doch das EXPRESS downloaden können. Versuche doch aber zunächst einmal etwas einfaches :-). Refbearbeiten, und dann das Objekt oder die Objekte auf eunen anderen Layer legen. Danach bereinigen. Dann ist der Layer auch weg. Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
itzefitz Mitglied Techn. Zeichnerin
Beiträge: 17 Registriert: 23.12.2004 ACAD 2000 und ACAD 2002 Win 98 und Win XP
|
erstellt am: 15. Feb. 2005 13:15 <-- editieren / zitieren --> Unities abgeben:
@AsSchu: Danke für deinen Tipp, mit XRef-bearbeiten erreiche ich mein Ziel. Das mit dem Expresstool runterladen ist bei uns in der Firma nicht so einfach, denn ich habe keine Rechte ;-( aber Pflichten ------------------ Gruß Itzefitz Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Engel07 Mitglied Tech. Redakteur
Beiträge: 110 Registriert: 31.01.2005 Intel Pentium 4 CPU 2.80 GHz 1,00 GB RAM Windows XP ------------------- AutoCad 2004 MD 2004 DX Express-Tools
|
erstellt am: 15. Feb. 2005 16:48 <-- editieren / zitieren --> Unities abgeben: Nur für itzefitz
Hi itzefitz ! Also eigentlich sind die Expresstools Bestandteil der AUTOCAD-Lizenz. Bei mir war und ist dies jedenfalls so!!! Frage mal eure Admins oder Systemies ob die vielleicht auf der AUTOCAD-CD drauf sind. (könnte ja sein... ) Wenn nicht, dann haben wir vielleicht andere Lizenzen. Aber anzuraten wäre, die Expresstools zu besorgen, gibt schöne Befehle dort. Grüße Engel07 ************************************************************************************************* Damit das Mögliche entsteht, muss immer wieder das Unmögliche versucht werden. ************************************************************************************************* 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: 15. Feb. 2005 21:16 <-- editieren / zitieren --> Unities abgeben: Nur für itzefitz
Ansonsten: Code:
(defun C:DELLAYERINBLOCK( / AUSWAHL INSERT BLOCK OBJ OBJLAYER) (vl-load-com) (if(and(or(setq AUSWAHL (ssget "I" '((0 . "INSERT")))) (setq AUSWAHL (ssget '((0 . "INSERT")))) ) (setq INSERT (ssname AUSWAHL 0)) (setq BLOCK(vla-item(vla-get-blocks (vla-get-ActiveDocument (vlax-get-acad-object) ) ) (cdr(assoc 2(entget INSERT))) ) ) (or (/=(setq OBJLAYER (getstring "\nAuf welchem Layer sollen Blockelemente gelöscht werden <von Objekt>"))"") (and (setq OBJ(car(nentsel))) (setq OBJLAYER(cdr(assoc 8 (entget OBJ)))) ) ) (tblsearch "LAYER" OBJLAYER) ) (vlax-for Item BLOCK (if (=(strcase(vla-get-layer ITEM))(strcase OBJLAYER)) (vla-delete ITEM) ) ) ) (vla-Regen(vla-get-activedocument(vlax-get-acad-object))acAllViewports) )
------------------ - Thomas - "Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits mehr als die Hälfte der Lösung desselben."[Diese Nachricht wurde von CADmium am 16. Feb. 2005 editiert.] Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
itzefitz Mitglied Techn. Zeichnerin
Beiträge: 17 Registriert: 23.12.2004 ACAD 2000 und ACAD 2002 Win 98 und Win XP
|
erstellt am: 16. Feb. 2005 08:13 <-- editieren / zitieren --> Unities abgeben:
|
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: 16. Feb. 2005 08:20 <-- editieren / zitieren --> Unities abgeben: Nur für itzefitz
DELLAYERINBLOCK in der Befehlszeile! Ansonsten findest du hier eine Anleitung für den Umgang mit Lisp-Tools. ------------------ - 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 |
itzefitz Mitglied Techn. Zeichnerin
Beiträge: 17 Registriert: 23.12.2004 ACAD 2000 und ACAD 2002 Win 98 und Win XP
|
erstellt am: 16. Feb. 2005 08:21 <-- editieren / zitieren --> Unities abgeben:
|