Lv.0 등록일: 2006-05-192006-05-19T14:15:39+09:00 2006-05-19T14:15:39+09:00카테고리: AutoCAD & CADian 글씨 합치는 기능이 있나요? 따로 떨어져 있는 글씨를 하나의 글씨로 합칠수 있는 기능이 있는지. jointext라는게 xpress에 있다는데 못찾겠더라구요.. 공유 Facebook 관련 있는 질문들 캐드 좌표값을 위경도값으로 산출 가능할까요? 캐드 좌표값을 위경도값으로 산출 가능할까요? 오토캐드 호그리기 질문 믹서드럼 9루베 ,6루베 통만 외형도 만 이라도괜찮습니다, 구할수있을까용? 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)
)
최신버전으로 업데이트하면 될겁니다:-))