| |
| Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für Autodesk Produkte |
Autor
|
Thema: Solid-Schraffuren NUR in Blöcken löschen (1381 / mal gelesen)
|
archi.archi Mitglied
Beiträge: 77 Registriert: 08.10.2010
|
erstellt am: 22. Okt. 2019 16:02 <-- editieren / zitieren --> Unities abgeben:
Hallo Forumer, es sollen NUR in Blöcken Schraffuren vom Typ Solid gelöscht werden. Zum Löschen ALLER Solid-Schraffuren habe ich hier z.B. gefunden: Code:
(defun C:DEL-SOLID( / BLOCK ) (vl-load-com) (vlax-for LAYOUT (vla-get-layouts(vla-get-activedocument(vlax-get-acad-object))) (vlax-for ITEM (setq BLOCK (vla-get-Block LAYOUT)) (if(and(=(strcase(vla-get-objectname ITEM))(strcase "AcDbHatch")) (wcmatch (strcase(vla-get-PatternName ITEM)) "SOLID*") ) (vl-catch-all-error-p (vl-catch-all-apply 'vla-delete (list ITEM) ) ) ) ) ) (vlax-for BLOCK (vla-get-blocks(vla-get-activedocument(vlax-get-acad-object))) (vlax-for ITEM BLOCK (if(and(=(strcase(vla-get-objectname ITEM))(strcase "AcDbHatch")) (wcmatch (strcase(vla-get-PatternName ITEM)) "SOLID*") ) (vl-catch-all-error-p (vl-catch-all-apply 'vla-delete (list ITEM) ) ) ) ) ) (vla-regen(vla-get-activedocument (vlax-get-acad-object)) acAllViewports) )
Leider ist mir die Begrenzung der Auswahl nur auf Blöcke bisher nicht gelungen. Wo bzw. wie muss der Code geändert werden, damit nur die Schraffuren in Blöcken gelöscht werden? Dankbarer Gruß archi Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
cadffm Moderator 良い精神
Beiträge: 21533 Registriert: 03.06.2002 System: F1 und Google
|
erstellt am: 22. Okt. 2019 16:14 <-- editieren / zitieren --> Unities abgeben: Nur für archi.archi
Also nur die Blöcke durchgehen und dabei Modell&Layouts ausschließen (vlax-for BLOCK (vla-get-blocks(vla-get-activedocument(vlax-get-acad-object))) (if (= (vla-get-isLayout BLOCK) :vlax-false) (vlax-for ITEM BLOCK (if(and(=(strcase(vla-get-objectname ITEM))(strcase "AcDbHatch")) (wcmatch (strcase(vla-get-PatternName ITEM)) "SOLID*") ) (vl-catch-all-error-p (vl-catch-all-apply 'vla-delete (list ITEM) ) ) ) ) ) ) ACHTUNG: Das Muster steht auf SOLID*, also alle Schraffurmuster die mit "SOLID" beginnen!
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
| Technischer Produktdesigner (m/w/d) Maschinen- und Anlagenkonstruktion | Die besten Köpfe für die unterschiedlichsten Aufgaben zu finden sowie Menschen und Technologien zu verbinden, und zwar täglich aufs Neue - dafür schätzen unsere Kunden FERCHAU. Unterstütze uns: als ambitionierte:r Mitarbeitende:r für einen unserer Kunden. Du weißt genau, was du technologisch auf dem Kasten hast? Du suchst einen Arbeitgeber, der das genau erkennt, der dein Engagement wertschätzt und ... | Anzeige ansehen | Produktdesign, Industriedesign |
|
archi.archi Mitglied
Beiträge: 77 Registriert: 08.10.2010
|
erstellt am: 23. Okt. 2019 11:14 <-- editieren / zitieren --> Unities abgeben:
Hallo cadffm, zum Glück immer wieder die selben "Verdächtigen" - du bist hier wirklich ein 良い精神! Und mit deinen Antwortzeiten können sich die Supports dieser Welt mal messen. Wissen ist immer noch durch nichts zu ersetzen. Dank deiner Hilfe können wir jetzt eingehende Referenzdateien schneller bereinigen. Vielen Dank und sicher gibt es ein nächstes Mal archi Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |