---

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

---

Um welche Beschriftungen geht es denn hier beim Stichwort "ElevationLabel" ?
AECC_STATION_OFFSET_LABEL wie im Programm vermerkt oder doch
AECC_SURFACE_ELEVATION_LABEL

------------------
Mit freundlichem Gruß

Udo Hübner
www.CAD-Huebner.de

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

das ist eigentl. zweierlei. es geht ja drum ein label aufzubrechen den wert im text auslesen und dann das gesprengte label zu löschen. undo tut nur nicht so wie ich will. nämlich alle ellemente (text und kreis) zu löschen

------------------
Gruss Dirk
Blog | Adolf Spende | Infra-Feed | ÅF AB

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

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

---

Kann deinem Gedankengang grad nicht folgen - oder was wolltest du sagen

------------------
Gruss Dirk
Blog | Adolf Spende | Infra-Feed | ÅF AB

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

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

---

AECC_STATION_OFFSET_LABEL dessen elevation möchte ich auslesen

------------------
Gruss Dirk
Blog | Adolf Spende | Infra-Feed | ÅF AB

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Da kann ich doch nicht helfen, AECC_STATION_OFFSET_LABEL ist eine reine 2D Beschriftung und hat keine Erhebung/Höhe/Elevation.

------------------
Mit freundlichem Gruß

Udo Hübner
www.CAD-Huebner.de

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

trotzdem danke Udo

------------------
Gruss Dirk
Blog | Adolf Spende | Infra-Feed | ÅF AB

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

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