---

Hallo Leute,

gibt es eine Möglichkeit, abzufragen, ob ein Punkt innerhalb einer Umgrenzung (interner Punkt) liegt oder nicht. (Siehe z.B. Befehl SCHRAFFUR oder UMGRENZUNG)?

CU
Markus

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

---

point-in-curve.VLX.txt

Ja, das geht... hier mal ein paar Lösungen.

Im Anhang eine Umsetzung mit Lisp.

------------------
  - 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

---

Mit

(command "_.-boundary" "_a" "_i" "_n" "" "" PKT "")

erhält man
Punkt liegt außerhalb der Umgrenzung.  für PKT auserhalb
und
UMGRENZUNG hat 1 Polylinie erstellt.  für PKT innerhalb

als Rückmeldung.

Meine Frage: Kann ich diese Rückmeldung irgendwie abfragen?
Ich habs auch mit (vl-cmdf) probiert, hilft mir aber auch nicht recht weiter..

------------------
Markus Peer

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

---

eine Möglichkeit: Logfilemode auf 1 und überwachung der Logdatei. Oder - ungetestet - die Auswertung der SYSVAR "LASTPROPMT"

Was gefällt dir denn an den anderen aufgezeigten Lösungen 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

---

flac.VLX.txt

Die Lösungsansätze sind gut, bzw. die angehängete Datei tut ihren Dienst.
Ich bastle an einem Programm für die Flächenabfrage (siehe Anhang) und muss unter anderem erkennen ob eine Punkt innerhalb liegt, um Fehler zu vermeiden bzw. überhaupt eine Fläche zu erhalten. Da ich die Fläche mit Hilfe eines Punktes und UMGRENZUNG ermittle hilft mir dein Programm nicht recht.

 

------------------
Markus Peer

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

---

Jetzt klappt es:

(defun c:bd ()
  (setq pk (getpoint))

  (command "_.-boundary" "_a" "_i" "_n" "" "" pk "")

  (setq lp (getvar "lastprompt"))

  (if (/= lp "UMGRENZUNG hat 1 Polylinie erstellt.")
    (princ "extern")
    (princ "intern")
)
  (princ)

Danke nochmals..

------------------
Markus Peer

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