Angelo2449
Guest
Hallo alle,
mit diesem Code bitte ich, auf den internen Punkt eines geschlossenen Bereichs zu klicken, um mit dem gewünschten Dash fortzufahren.
Wie kann ich überprüfen, ob der geklickte Punkt tatsächlich in einem geschlossenen Bereich ist?
Danke.
mit diesem Code bitte ich, auf den internen Punkt eines geschlossenen Bereichs zu klicken, um mit dem gewünschten Dash fortzufahren.
Wie kann ich überprüfen, ob der geklickte Punkt tatsächlich in einem geschlossenen Bereich ist?
Danke.
Code:
(setq puntoins (getpoint "\nclicca il punto interno di un'area chiusa"))
(wenn Puntoine
(Prog.)
(setq ctrllayer (tblsearch "layer" colorei))
(wenn (= ctrllayer nil)
(Befehl "_layer" "_new" colorei "_color" colorei "")
; falls
(cond)
((und (= cods "s") (= codt "s"))
(Befehl "_bhatch" "_pr" "_s" puntoins "")
; falls
(und (= Kods "n") (= Kodt "s"))
(Befehl "_bhatch" "_pr" "_s" puntoins "")
; falls
((und (= cods "s") (= codt "t")) ;; stringa tratteggio
(Befehl "_bhatch" "_pr" "ansi31" (atof distx) angolou puntoins "") ;; 0.31496 3.175 0.07874
; falls
),
(Befehl "_change" "_last" "" "_p" "_layer" colorei "")
),
; falls