캐드 분류
문자만 삭제하는 리습과 치수선만 삭제하는 리습을 합치려고 하는데 어떻게 해야하나요?
컨텐츠 정보
- 192 조회
- 2 댓글
- 0 추천
- 0 비추천
-
목록
본문
안녕하세요
아래와 같이 두가지 리습 기능을 한가지로 합쳐서 사용 하려는데 어떻게 해야할지 모르겠네요…ㅠ
첫번째는 문자만 삭제되는 리습이며
(defun c:y()
(setq ss (ssget '((0 . "*TEXT")(1 . "*"))))
(vl-cmdf "erase" ss "")
)
두번째는 치수선만 삭제되는 리습이니다.
(defun c:ud ()
(if (setq ss (ssget (list (cons 0 "DIM*"))))
(command "erase" ss "")
)
)
아시는분은 도와주시면 감사하겠습니다.