| |
| Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für Autodesk Produkte |
Autor
|
Thema: Civil labels von (COM) (1293 mal gelesen)
|
cadplayer Ehrenmitglied CADniker
Beiträge: 1832 Registriert: 28.04.2009
|
erstellt am: 18. Sep. 2015 14:52 <-- editieren / zitieren --> Unities abgeben:
leider ist es nicht möglich CivilElevationLabels über com auszulesen, schade! Meine Frage zum undo-command 1) wenn auf start stelle => Begin undo 2) wenn auf end stelle => End undo Daraus folgt bei (command "_undo" "_b" "_y") müsste doch wieder an den Stand vor undo - start zurückgehen Bei mir wird aus unerklärlichen Grund noch ein Zoom durchgeführt Ich möchte jedoch mit undo arbeiten, um die Datenbank sauber zu bereinigen...
Code:
(defun c:xx(/ vent ent txt) (command "_undo" "_be" ) (setq vent (vlax-ename->vla-object (setq ent (car (entsel "\nSelect")))) ) (cond ((= "AECC_STATION_OFFSET_LABEL" (cdr (assoc 0 (entget ent)))) (vla-copy vent) ; Zerlegt Label ; 1. Block ; 2. Circle + Mtext ; 3. Text (repeat 3 (vl-cmdf "_explode" (entlast)) ) (command "_undo" "_e" ) (repeat 3 (if (= "TEXT" (cdr (assoc 0 (setq txt (entget (entlast)))))) (progn (setq txt (cdr (assoc 1 txt))) ) ) ) (command "_undo" "_b" "_y") (princ (strcat "\nElevation: " txt)) ) (T (princ "\ngewähltes Objekt war kein ElevationLabel!")) ) (princ) )
------------------ Gruss Dirk Blog | Adolf Spende | Infra-Feed | ÅF AB
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
CAD-Huebner Ehrenmitglied V.I.P. h.c. Verm.- Ing., ATC-Trainer
Beiträge: 9732 Registriert: 01.12.2003 One AutoCAD 2.5 - 2023, Civil 3D, Win10/win11
|
erstellt am: 18. Sep. 2015 17:05 <-- editieren / zitieren --> Unities abgeben: Nur für cadplayer
|
cadplayer Ehrenmitglied CADniker
Beiträge: 1832 Registriert: 28.04.2009
|
erstellt am: 18. Sep. 2015 17:20 <-- editieren / zitieren --> Unities abgeben:
|
CAD-Huebner Ehrenmitglied V.I.P. h.c. Verm.- Ing., ATC-Trainer
Beiträge: 9732 Registriert: 01.12.2003 One AutoCAD 2.5 - 2023, Civil 3D, Win10/win11
|
erstellt am: 18. Sep. 2015 18:00 <-- editieren / zitieren --> Unities abgeben: Nur für cadplayer
Zitat: Original erstellt von cadplayer: [B]...leider ist es nicht möglich CivilElevationLabels über com auszulesen, schade!...
Alle sagten: Das geht nicht. Dann kam einer, der wusste das nicht und hat's einfach gemacht.
------------------ Mit freundlichem Gruß Udo Hübner www.CAD-Huebner.de Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
cadplayer Ehrenmitglied CADniker
Beiträge: 1832 Registriert: 28.04.2009
|
erstellt am: 18. Sep. 2015 18:07 <-- editieren / zitieren --> Unities abgeben:
|
CAD-Huebner Ehrenmitglied V.I.P. h.c. Verm.- Ing., ATC-Trainer
Beiträge: 9732 Registriert: 01.12.2003 One AutoCAD 2.5 - 2023, Civil 3D, Win10/win11
|
erstellt am: 18. Sep. 2015 18:12 <-- editieren / zitieren --> Unities abgeben: Nur für cadplayer
Um welchen Wert in welchem Objekt geht es denn? Den Höhenwert im SURFACE_ELEVATION_LABEL kann man auslesen, ohne das Objekt aufzulösen. Wenn du eigentliche Aufgabe beschreibst, kann ich dir vielleicht einen Tipp geben oder einen besseren Workaround empfehlen. ------------------ Mit freundlichem Gruß Udo Hübner www.CAD-Huebner.de Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
cadplayer Ehrenmitglied CADniker
Beiträge: 1832 Registriert: 28.04.2009
|
erstellt am: 19. Sep. 2015 09:45 <-- editieren / zitieren --> Unities abgeben:
|
CAD-Huebner Ehrenmitglied V.I.P. h.c. Verm.- Ing., ATC-Trainer
Beiträge: 9732 Registriert: 01.12.2003 One AutoCAD 2.5 - 2023, Civil 3D, Win10/win11
|
erstellt am: 19. Sep. 2015 12:39 <-- editieren / zitieren --> Unities abgeben: Nur für cadplayer
|
cadplayer Ehrenmitglied CADniker
Beiträge: 1832 Registriert: 28.04.2009
|
erstellt am: 19. Sep. 2015 12:53 <-- editieren / zitieren --> Unities abgeben:
|
| Technischer Zeichner (m/w/d) - Technischer Produktdesigner (m/w/d) | ibb, der Engineering Spezialist. Wir entwickeln und konstruieren Produkte, Anlagen, Betriebsmittel und Werkzeuge. Wir optimieren mit FEM Analysen und Simulationen. Wir unterstützen Prozesse von der Arbeitsvorbereitung, Fertigung bis hin zum Qualitätsmanagement. CAD Aus- und Weiterbildungen als zertifizierter Bildungsträger runden unser Portfolio ab. Wir möchten unser Team erweitern und entwickeln.... | Anzeige ansehen | Technischer Zeichner, Bauzeichner |
|
CAD-Huebner Ehrenmitglied V.I.P. h.c. Verm.- Ing., ATC-Trainer
Beiträge: 9732 Registriert: 01.12.2003 One AutoCAD 2.5 - 2023, Civil 3D, Win10/win11
|
erstellt am: 19. Sep. 2015 16:30 <-- editieren / zitieren --> Unities abgeben: Nur für cadplayer
Du könntest natürlich die 2D Position ermitteln und zu dann eine Z-Höhe in einem beliebigen DGM ermitteln. Oder dir Station und Versatz zur beschrifteten Achse anzeigen. Nur Höhe geht nicht, da das Objekt prinzipbedingt gar keine Höhe hat. Vielleicht musst du doch andere Beschriftungsobjekte verwenden? ------------------ Mit freundlichem Gruß Udo Hübner www.CAD-Huebner.de Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |