---

Hallo,

in meiner Zeichnung ist ein Objekt Ellipse enthalten. Wenn ich dies beim AutoCAD2002-Befehl Liste wähle, erhalte ich im Textfenster folgende Informationen:
                  ELLIPSE  Layer: "A_schwarz_250"
                            Bereich: Modellbereich
                  Referenz = 9D2
                            Länge: 40.678
                      Mittelpunkt: X = 1516.015 , Y = 4710.211 , Z = 0.000
                      Hauptachse: X = 3.907    , Y = -22.158  , Z = 0.000
                      Nebenachse: X = 11.079  , Y = 1.954    , Z = 0.000
                      Startpunkt: X = 1505.631 , Y = 4705.021 , Z = 0.000
                        Endpunkt: X = 1527.645 , Y = 4701.698 , Z = 0.000
                      Startwinkel: 286.56
                        Endwinkel: 43.80
                  Radienverhältnis: 0.500

Wie kann ich in Lisp den Startpunkt und den Endpunkt ermitteln?

Danke im Voraus und viele Grüße
Bernd10

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

---

Hallo Bernd,

so:

Code:

---

(vl-load-com)
(setq el (car(entsel))
      el (vlax-ename->vla-object el)
      stpt (vlax-curve-getStartPoint el)
      ept (vlax-curve-getEndPoint el)
      )

---

Bei Fragen ...

Grüße Holger

------------------
Holger Brischke
(defun - Lisp over night!
AutoLISP-Programmierung für AutoCAD
Da weiß man, wann man's hat!

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

---

Hallo Holger,

hat super funktioniert.

Danke und viele Grüße
Bernd

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