캐드 분류
모든선의 속성을 폴리선으로 한번에 바꿔주는 리습같은건 없을까요?
컨텐츠 정보
- 273 조회
- 5 댓글
- 0 추천
- 0 비추천
- 목록
본문
도면에 있는 수많은 선(선, 호, 스플라인등등)들을 모두선택해서 이 선들의 속성을 한방에 폴리선으로 바꿔주는 그런 리습이 필요해서요…;
'pe'쳐서 일일이 바꿔줄려니까 너무 힘드네요… ㅠ,ㅠ
왜냐하면 제가 최근에 GPS를 사용하는데 이안에 도면을 넣어서 새용해보니
선속성이 폴리선이 아니면 읽어지지가 않더라구요… ㅠ,ㅠ
그래서, 폴리선인거만 화면에 나타나고 그외의 것들은 표시가안되는데 일일이 폴리선으로 바꿔주려니
이건 완전 중노동이라…
살려주세요… ㅠ,ㅠ
관련자료
댓글 5
/ 1 페이지
장씨형님님의 댓글
아래 참조 하세요~ 폴리선 및 폴리선끼리 합쳐주는 리습이에요
(defun c:PP(/ ss k ed en q) (prompt "n>폴리라인으로 만들 객체를 선택 하세요..") (setq ss (ssget)) (setq k 0) (repeat (sslength ss) (setq ed (entget (ssname ss k)) en (cdr (assoc 0 ed))) (if (/= en "LWPOLYLINE") (setq q 1)) (setq k (1+ k)) );repeat (if q (command "pedit" "m" ss "" "y" "j" "" "") (command "pedit" "m" ss "" "j" "" "")) (princ) );defun