홈/ 질문/Q 111562
다음
진행 중
Lv.0
등록일: 2019-07-19T08:43:07+09:00 카테고리:

문자 가로줄이기

드림에서 속성도곽내용일괄수정으로 엑셀에서 수정을 봤습니다
캐드로 돌아와 도곽을 보니 박스밖으로 글씨가 나가버립니다.
그 글씨 폭을 도곽내용일괄수정처럼 글씨폭이나 크기등 일괄수정으로 처리할 수 있는 명령어가 있는걸로 아는데 그게 뭔지 아시는분 있음 알려주세요                                                                                                                                                                                              

Symbol  문자스타일에는 없는데 이 문자가 있다고 없애는방법없나요
공유

    관련 있는 질문들

    2 답변

    1. aalan

    2. 드림MAT

      • 0
    3. Lv.0

      저도 리습 초보이지만 쓰고있는 리습 조심스래 올려봅니다.

      택스트 사이즈 지정
      ; CHANGE TEXT LISP PROGRAM
      (DEFUN *ERROR* (MSG)
       (PRINC “ERROR : “)
       (PRINC MSG)
       (TERPRI)
       (PRINC)
      );ERROR MSG
      (DEFUN C:Cth ()
       (SETVAR “CMDECHO” 0)
       (PROMPT “nChange All text lisp program …”)
       (setq X:1 (SSGET)
             X:2 (GETREAL “n Enter new text height : “)
             X:3 (SSLENGTH X:1)
             N:O 0
             X:4 (entget (SSNAME X:1 N:O))
             x:5 (cdr (assoc 0 x:4))
       );setq close
       (WHILE (/= N:O X:3)
        (if (or (= “TEXT” x:5) (= “ATTDEF” x:5))
         (progn
          (setq x:6 (assoc 40 x:4)
                x:7 (cons ’40 x:2)
          );set close
          (entmod (SUBST x:7 x:6 x:4))
          (SETQ N:O (1+ N:O)
                x:4 (entget (SSNAME X:1 N:O))
                X:5 (CDR (ASSOC 0 X:4))
          );setq close
         );progn close
         (progn
          (setq n:o (1+ n:o)
                x:4 (entget (ssname x:1 n:o))
                X:5 (CDR (ASSOC 0 X:4))
          );setq close
         );progn close
        );if close
       );while close
       (PRIN1)
      );defun close
      택스트 폭 지정
      (DEFUN C:CTW()
           (SETQ SS (SSGET)
                 SL (SSLENGTH SS)
                 A 0 LST ‘() LLST'()
                 H (GETREAL “N Text Width : “)
           );SETQ CLOSE
           (REPEAT SL
              (SETQ SEN (ENTGET (SSNAME SS A))
                    t (assoc 41 sen)
                    lst (cons ’41 h)
              );SETQ CLOSE
              (entmod (SUBST lst t sen))
              (SETQ A (1+ A))
           );REPEAT CLOSE
           (PRIN1)
      );DEFUN CLOSE
      • 0