Lv.0 등록일: 2006-05-192006-05-19T14:15:39+09:00 2006-05-19T14:15:39+09:00카테고리: AutoCAD & CADian 글씨 합치는 기능이 있나요? 따로 떨어져 있는 글씨를 하나의 글씨로 합칠수 있는 기능이 있는지. jointext라는게 xpress에 있다는데 못찾겠더라구요.. 공유 Facebook 관련 있는 질문들 메뉴 글자크기 조정 방법 40ft 컨테이너 캐드도면 40ft 컨테이너 캐드도면 오버헤드 천장크레인 10톤 캐드파일 구해봅니다. 3 답변 작성 순 최신 순 공감 순 [Deleted User] 2006-05-19T14:22:56+09:00답변 등록 답변 등록 일시 2006-05-19 2:22 pm AutoCAD에는 없는 기능의 명령일테니, 리습으로 구현 혹은 언급된 Xpress등의 유틸리티에서 제공하는 명령을 이용해야.. [Deleted User] 2006-05-19T15:14:00+09:00답변 등록 답변 등록 일시 2006-05-19 3:14 pm (defun C:TJ (/ t1 txt1 t2 txt2 txt) (setq t1 (entget (car (entsel “n 1st Joint Text : “)))) (setq txt1 (cdr (assoc 1 t1))) (setq t2 (entget (car (entsel “n 2nd Joint Text : “)))) (setq txt2 (cdr (assoc 1 t2))) (setq txt (strcat txt1 txt2)) (setq t1 (subst (cons 1 txt) (assoc 1 t1) t1)) (entmod t1) (entdel (cdr (car t2))) (prin1) ) [Deleted User] 2006-05-19T15:26:47+09:00답변 등록 답변 등록 일시 2006-05-19 3:26 pm 최신버전으로 업데이트하면 될겁니다:-))
AutoCAD에는 없는 기능의 명령일테니, 리습으로 구현 혹은 언급된 Xpress등의 유틸리티에서 제공하는 명령을 이용해야..
(defun C:TJ (/ t1 txt1 t2 txt2 txt)
(setq t1 (entget (car (entsel “n 1st Joint Text : “))))
(setq txt1 (cdr (assoc 1 t1)))
(setq t2 (entget (car (entsel “n 2nd Joint Text : “))))
(setq txt2 (cdr (assoc 1 t2)))
(setq txt (strcat txt1 txt2))
(setq t1 (subst (cons 1 txt) (assoc 1 t1) t1))
(entmod t1)
(entdel (cdr (car t2)))
(prin1)
)
최신버전으로 업데이트하면 될겁니다:-))