| |
| Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für Autodesk Produkte |
Autor
|
Thema: 2D-(LW)Ploylinie nach 3D-Ploylinie (1060 mal gelesen)
|
Geos Mitglied Vermessungstechniker i.R.
Beiträge: 1017 Registriert: 21.09.2001 ACAD Map 2010, Win 7 Pro eigene Lisp's<P>HW: Core i7 860, 2.8 GHz 3.3 GB, NVIDIA GeForce GTS 250
|
erstellt am: 06. Nov. 2006 16:59 <-- editieren / zitieren --> Unities abgeben:
Servus Ich hab schon wieder eine Frage: In einer Zeichnung gibt es tausende 2D-Polylinien. Daraus sollen 3D-Polylinien gemacht werden. Es geht nur um die Umwandlung, daher bleiben die Z-Koordinaten vorerst auf 0.00. Ich rätsel, wie ich mit dem mehrfach vorhandenen Gruppencode 100 umgehe. (100 . "AcDbEntity") (100 . "AcDb3dPolyline") Oder wäre es besser, die Punkte auszulesen und die 3D-Poly (mit command) neu zu zeichnen. Bitte holt mich von der Leitung.
------------------ Schöne Grüße Ernst Meine Homepage Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
CADmium Moderator Maschinenbaukonstrukteur
Beiträge: 13508 Registriert: 30.11.2003 .
|
erstellt am: 06. Nov. 2006 17:06 <-- editieren / zitieren --> Unities abgeben: Nur für Geos
|
Geos Mitglied Vermessungstechniker i.R.
Beiträge: 1017 Registriert: 21.09.2001 ACAD Map 2010, Win 7 Pro eigene Lisp's<P>HW: Core i7 860, 2.8 GHz 3.3 GB, NVIDIA GeForce GTS 250
|
erstellt am: 06. Nov. 2006 19:46 <-- editieren / zitieren --> Unities abgeben:
Danke Thomas - gleich das fertige Programm. Es steht zwar in den Sternen, wann wir sowas wieder brauchen. Trotzdem interessiert es mich, wie man mit diesen 2 100er Gruppencodes umgeht. Und gäbs da auch was besseres, was mit "vl" beginnt Will ja auch was lernen! ------------------ Schöne Grüße Ernst Meine Homepage Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
CADmium Moderator Maschinenbaukonstrukteur
Beiträge: 13508 Registriert: 30.11.2003 .
|
erstellt am: 06. Nov. 2006 20:54 <-- editieren / zitieren --> Unities abgeben: Nur für Geos
..das genannte Proggie liest die Koordianten aus, erstellt damit eine neue PL entsprechenden Typs und löscht die alte. Das ganze ist über activex realisiert, da ich da auch einfach Objekte in Blöcken oder anderen Zeichnungen bearbeiten kann... das "neutrale" Koordiantenformat habe ich aufgrund der universellen Umwandelbarkeit gewählt. ..zu den mehrfach GC 100 .. eigentlich wär das ja Axels Job, aber ich versuchs mal: in der entget-liste kommen zuerst die allgemeinen Ident-GCs wie Objektnr, Handle.. dann der GC(100 . "AcDbEntity") mit darauffolgend die allgemeinen Objecteigenschaften wie Layer, Linientyp usw. dann der GC (100 . "AcDb3dPolyline") mit nachfolgend den Objekttypspezifischen GC's ... entmake verzeiht zwar eine Menge , aber grundsätzlich ist diese Reihenfolge bei entmod / entmake -Listen einzuhalten. eine einfache Konvertierung ala (and (setq 2dPL(car(entsel "\n2dPL wählen:"))) (setq 2dpl(entget 2dpl)) (setq 2dpl(subst '(100 . "AcDb3dPolyline")'(100 . "AcDb2dPolyline")2dpl)) (entmod 2dpl) (entupd (cdr(assoc -1 2dpl))) ) funktioniert IMHO nicht ------------------ - 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 |
Geos Mitglied Vermessungstechniker i.R.
Beiträge: 1017 Registriert: 21.09.2001 ACAD Map 2010, Win 7 Pro eigene Lisp's<P>HW: Core i7 860, 2.8 GHz 3.3 GB, NVIDIA GeForce GTS 250
|
erstellt am: 07. Nov. 2006 12:16 <-- editieren / zitieren --> Unities abgeben:
|
CADwiesel Moderator CAD4FM UG
Beiträge: 1968 Registriert: 05.09.2000 AutoCAD, Bricscad Wir machen das Mögliche unmöglich
|
erstellt am: 07. Nov. 2006 13:13 <-- editieren / zitieren --> Unities abgeben: Nur für Geos
|
Geos Mitglied Vermessungstechniker i.R.
Beiträge: 1017 Registriert: 21.09.2001 ACAD Map 2010, Win 7 Pro eigene Lisp's<P>HW: Core i7 860, 2.8 GHz 3.3 GB, NVIDIA GeForce GTS 250
|
erstellt am: 07. Nov. 2006 15:52 <-- editieren / zitieren --> Unities abgeben:
|