---

Moin!

ich habe da noch einmal eine Frage die meine Recherche bisher nicht beantworten konnte.

In LISP kann man eine Punktabfrage mit einer Option koppeln wie in dem nachfolgenden Beispiel:

Code:

---

  (initget "Arc")
  (setq LAST_PT (GetPoint "\nSpecify cloud starting point or [Arc length]: "))

  (if (= LAST_PT "Arc")
    (progn
      (initget 6)
      (setq TMP (getdist (strcat "\nSpecify arc length <" (rtos ARC_DIST 2 3) ">: ")))
      (if TMP
        (Progn
          (setq ARC_DIST TMP)
          (setenv "AC_Bonus_Revcloud_Bulge" (rtos (/ ARC_DIST DIM_SCALE) 2))
        )
      )
      (setq LAST_PT (getpoint "\nSpecify cloud start point: "))
    ) ;;end STR "RADIUS" test
  )

---

Kann mir einer von Euch sagen mit welchem Gerippe dieses in VB.net umgesetzt werden kann ?

Gruß Jan

------------------
jan :-)

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

---

siehe hierzu nun http://forums.autodesk.com/t5/net/integrate-options-into-getpoint-function/m-p/6464584#M49599

Gruß Jan

------------------
jan :-)

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