| | |
 | Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für Autodesk Produkte |
| | |
 | 2D- und 3D-Bauvisionen in der Revit Weiterbildung mit IHK-Zertifizierung , ein Kurs (bis zu 100% förderbar mit Bildungsgutschein)
|
|
Autor
|
Thema: Linien und Polylinien anhand vom Winkel auswählen (1161 / mal gelesen)
|
werner210365 Mitglied Bautechniker

 Beiträge: 24 Registriert: 25.05.2011 AutoCAD 2021 AutoCAD Architecture 2021 PERICAD DOKACAD
|
erstellt am: 21. Apr. 2023 10:59 <-- editieren / zitieren --> Unities abgeben:         
Hallo zusammen gibt es per LISP eine Möglichkeit alle Linien (eventuell auch Polylinien) auszuwählen, die ungleich dem Winkel 0,90,180 und 270 sind. Das Problem hat man immer wenn man DWGs bekommt, wo die Schraffuren zerlegt sind. Es ist immer mühselig diese Linien händisch zu löschen Es geht zwar mit der Schnellauswahl, aber da kann man meines Wissens immer nur einen Winkel angeben Bei Polylinien geht es gar nicht, weil da in der Schnellauswahl kein Winkel angezeigt wird. Danke im Voraus
------------------ Gruß Werner Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
cadffm Moderator 良い精神
       

 Beiträge: 22689 Registriert: 03.06.2002 Alles
|
erstellt am: 21. Apr. 2023 11:13 <-- editieren / zitieren --> Unities abgeben:          Nur für werner210365
|
Andreas Kraus Ehrenmitglied Elektrotechniker
    
 Beiträge: 1519 Registriert: 11.01.2006 WIN 11 ACAD 2022 BricsCAD V25.1.07
|
erstellt am: 21. Apr. 2023 14:50 <-- editieren / zitieren --> Unities abgeben:          Nur für werner210365
Damit bekommst du Linien mit Toleranzwinkel in einer Liste zurück. Der Winkel kann natürlich auch 0.0 sein. Code: (setq toleranzwinkel 0.001) ; im Bogenmaß (vl-remove-if-not '(lambda (obj) (vl-every 'null (mapcar '(lambda (w) (equal (vla-get-angle obj) w toleranzwinkel) ) (list 0.0 (* pi 0.5) pi (* pi 1.5)) ) ) ) (k_satz->objlist (ssget "x" '((0 . "LINE")))) )
------------------ Geht nicht, gibts nicht Gruß Andreas http://kraus-cad.de Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |

| | Anzeige: | Infos zum Werbeplatz >> | GeoTools CAD APP für Tiefbau, Facility Management, GIS, Vermessung und Kartografie GeoTools is a geo-data application that is useful to view, create, modify, analyze and report on CAD data that is geographic in nature. Useful for GIS data creation, surveying, mapping, facilities management, infrastructure, landscape development, city planning or similar, workflows.
|
|
werner210365 Mitglied Bautechniker

 Beiträge: 24 Registriert: 25.05.2011 AutoCAD 2021 AutoCAD Architecture 2021 PERICAD DOKACAD
|
erstellt am: 24. Apr. 2023 16:51 <-- editieren / zitieren --> Unities abgeben:         
Hallo cadffm der Beispielcode von Lee Mac funktioniert einwandfrei. Ich wähle jetzt die "geraden" Linien aus und verschiebe die dann um ein bestimmtes Maß. Dann wähle ich die restlichen Linien über die Schnellauswahl in dem bestimmten Bereich aus (das sind dann alle Linien die einen anderen Winkel haben) und lösche diese. Somit habe ich mein Ziel über einen kleinen Umweg erreicht. Programmiertechnisch kriege ich das nicht anders hin, aber das passt ja so für mich. Polylinien mit ungeradem Winkel lassen sich wohl nicht so einfach auswählen? Danke für deine Hilfe Ich bin schon viele Jahre "stiller" Gast in diesem Forum und frage mich immer wieder, wie man soviel über AutoCAD wissen kann ------------------ Gruß Werner Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |