((-1 . <Entity name: 286c430>)
(0 . “LWPOLYLINE”)
(10 0.0000 0.0000 0.0000)
(10 75.0000 0.0000 0.0000)
(10 75.0000 50.0000 0.0000)
(10 0.0000 50.0000 0.0000)
RECTANGLE의 DXF 코드값을 읽어 들여 보니 10번의 CODE가 각 포인트별로 네 개가 나오는데
첫번째 (0,0,0)에 해당하는 포인트가 아닌 두번째나 세번째 포인트를 선택하고자 할 경우에
어떻게 좌표를 얻을 수 있는지요
참고로 CAD LT를 사용중 이며 3rd PARTY로 LISP을 불러들여 사용하고 있는지라
VBA는 불러들여지지 않습니다.
예시로
(setq pt (list (cadr (assoc 10 c)) (cdr (assoc 10 c))))
로 좌표값을 추출 하고자 합니다.
양가야Lv.0
중복 dxf 코드 처리
공유