캐드 분류
문자폭 요인 바꾸기 mtext객체선택질문
컨텐츠 정보
- 212 조회
- 0 추천
- 0 비추천
- 목록
본문
아래 리습을 사용하였는데 mtext 선택이 안되네요.
mtext 문자가 선택 가능하게 수정하능한가요?
(defun c:tww(/ ss tg1 ed k x41)
(princ " -> Text Width Factor")
(prompt "n>>>> 문자 폭 요인 바꾸기(Text Width Factor)…")
(setq ss (ssget (list (cons 0 "text"))))
(if (not tg) (setq tg 1.00))
(setq tg1 (getreal (strcat "n문자 폭 용인 입력 <" (rtos tg 2 2) " >:")))
(if tg1 (setq tg tg1))
(setq k 0)
(repeat (sslength ss)
(setq ed (entget (ssname ss k)))
(setq x41 (cdr (assoc 41 ed)))
(entmod (subst (cons 41 tg) (assoc 41 ed) ed))
(setq k (1+ k))
)
(princ)
)
관련자료
댓글 0
/ 1 페이지
등록된 댓글이 없습니다.