(setq pt1 (getpoint “n 폴리곤 내의 점을 지정하시오. “))
(command “-boundary” pt1 “”)
이렇게 실행하면 0 번 레이에어 폴리건이 생성되는데
아래처럼
(defun c:a ()
(setq ent (ssget “x” ‘((0 . “lwpolyline”) (8 . “abc”))))
(setq ent_num (sslength ent))
(setq i 0)
(while (< i ent_num)
(setq ent_name (ssname ent i))
(setq ent_list (entget ent_name))
(setq cp_pt_10 (cdr(assoc 10 ent_list)))
(command “-boundary” cp_pt_10 “”)
(setq i (+ i 1))
);while
)
위의방법처럼 폴리라인을 가져와서 그 폴리라인의 좌표를 가져와서
(command “-boundary” cp_pt_10 “”) 하면 폴리건이 생성이 안되는데요
boundary 를 사용할려면 꼭 마우스로 포인터를 찍어줘야만 사용이 가능한건가요?
마우스 포인트로 일일이 찍어주지 않고
선택한 폴리라인의 첫점영역에 폴리건이 생성되게 하는 방법은 없는건가요?