Objekte suchen ihn Zeichnung (Autodesk/Lisp)


	Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für Autodesk Produkte
Autor	Thema: Objekte suchen ihn Zeichnung (565 mal gelesen)
Dober Heinz Mitglied Technischer Zeichner Beiträge: 1143 Registriert: 20.12.2002 Autocad 2021/64B Win10 WORKSTATION Intel(R) CPU E5-1620 3.60GHz 32 GB Ram 64 Bit-Betriebssystem HP Designjet T7200 Grafik NVIDIA Quadro P4000 ZWCAD2021	erstellt am: 18. Okt. 2005 10:19 <-- editieren / zitieren --> Unities abgeben: Hallo Lispler ich habe mit diesem Befehl (setq (ssget)) ein Objekt gewählt, wie kann ich die Ganze Zeichnug durchsuchen nach gleichen Objekten. danke heinz ------------------ Heinz Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP
fuchsi Mitglied Programmierer c#.net Datawarehouse Beiträge: 1201 Registriert: 14.10.2003 AutoCad Version 2012 deu/enu <P>Windows 7 64bit	erstellt am: 18. Okt. 2005 10:25 <-- editieren / zitieren --> Unities abgeben: Nur für Dober Heinz Zitat: Original erstellt von Dober Heinz: Hallo Lispler ich habe mit diesem Befehl (setq (ssget)) ein Objekt gewählt, wie kann ich die Ganze Zeichnug durchsuchen nach gleichen Objekten. danke heinz ich würd das erste Objekt nicht mit SSGET wählen, sondern mit Entsel (ssget = Objkte wählten entsel = Objekt wählen) und dann z.B.: hiermit (setq en (car (entsel))) (setq ed (entget en)) (setq ss (ssget "X" (list (cons 0 (cdr (assoc 0 ed)))))) alle Elemente des gleichen Typs (z.B.: alle Linien) wählen ------------------ Ing. Anton Fuchs WWW.FFZELL.AT.TC Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP
Dober Heinz Mitglied Technischer Zeichner Beiträge: 1143 Registriert: 20.12.2002	erstellt am: 18. Okt. 2005 11:16 <-- editieren / zitieren --> Unities abgeben: @ Fuchs Danke dir mfg heinz ------------------ Heinz Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP
CADwiesel Moderator CAD4FM UG Beiträge: 1968 Registriert: 05.09.2000 AutoCAD, Bricscad Wir machen das Mögliche unmöglich	erstellt am: 18. Okt. 2005 12:36 <-- editieren / zitieren --> Unities abgeben: Nur für Dober Heinz ETools ssx das ist schon fertig ------------------ Gruß CADwiesel Besucht uns im CHAT Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP
Dober Heinz Mitglied Technischer Zeichner Beiträge: 1143 Registriert: 20.12.2002	erstellt am: 18. Okt. 2005 13:11 <-- editieren / zitieren --> Unities abgeben: @ cadw Ja weis ich, aber ich will mir die Objekte gleich auf einen Layer legen lassen. Danke für Hinweis mfg ------------------ Heinz Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP
cad-intensiv Mitglied CAD-Anbieter Beiträge: 31 Registriert: 14.06.2005	erstellt am: 18. Okt. 2005 22:01 <-- editieren / zitieren --> Unities abgeben: Nur für Dober Heinz Zitat: Original erstellt von fuchsi: (setq ss (ssget "X" (list (cons 0 (cdr (assoc 0 ed)))))) Warum nimmst du die 0 erst mit CDR weg, um sie dann wieder dran zu hängen? So ist das Beispiel sauber: (setq ss (ssget "X" (list (assoc 0 ed)))) Robert ------------------ Lisp-Seminare in Wien am 25. und 26. Sep 2005 und später in München, Frankfurt, Köln , Berlin ... -> Infos unter cad-intensiv@gmx.de Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP
fuchsi Mitglied Programmierer c#.net Datawarehouse Beiträge: 1201 Registriert: 14.10.2003 AutoCad Version 2012 deu/enu <P>Windows 7 64bit	erstellt am: 19. Okt. 2005 08:47 <-- editieren / zitieren --> Unities abgeben: Nur für Dober Heinz Zitat: So ist das Beispiel sauber: (setq ss (ssget "X" (list (assoc 0 ed)))) yepp, hast natürlich absolut recht ! ------------------ Ing. Anton Fuchs WWW.FFZELL.AT.TC Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

Anzeige.:
X

Anzeige: (Infos zum Werbeplatz >>)