홈/ 질문/Q 105492
다음
진행 중
Lv.0
등록일: 2015-11-18T13:36:06+09:00 카테고리:

글자 자리맞춤 리습좀 수정해주실수있으신지..

(defun c:ttm()
    (prompt “njustify text middle”)
    (setq a(ssget ‘((0 . “text”))))
    (command “justifytext” a “” “m”)
  (princ)
) ;if



(defun c:ttl()
    (prompt “njustify text left”)
    (setq a(ssget ‘((0 . “text”))))
    (command “justifytext” a “” “l”)
  (princ)
) ;if


(defun c:ttr()
    (prompt “njustify text rihgt”)
    (setq a(ssget ‘((0 . “text”))))
    (command “justifytext” a “” “r”)
  (princ)
) ;if


———–텍스트 자리맞춤 리습인데요
현재 저렇게 로드를하면 글자 기준점이 그냥 왼쪽/중간/오른쪽
이렇게 정의가 되있는데

중간왼쪽/중간중심/중간오른쪽

이렇게 리습을 수정할수있나요 ?


 

공유

    관련 있는 질문들

    3 답변

    1. aalan
    2. Lv.2

      중간왼쪽 ==>ML
      중간중심 ==>MC
      중간오른쪽 ==> MR

      (defun c:ttm()
          (prompt “njustify text middle“)   ===> 중간       고쳐쓰세요
          (setq a(ssget ‘((0 . “text”))))
          (command “justifytext” a “” “m“)   ===>  M (중간)     고쳐쓰세요
        (princ)
      ) ;if

      • 0

    3. 자리맞춤 옵션 입력
      [왼쪽(L)/정렬(A)/맞춤(F)/중심(C)/중간(M)/오른쪽(R)/맨위왼쪽(TL)/맨위중심(TC)/맨위오른쪽(TR)/중간왼쪽(ML)/중간중심(MC)/중간오른쪽(MR)/맨위왼쪽(BL)/맨위중심(BC)/맨위오른쪽(BR)]

      리습들 끝자락에 보이는  “m”)     “l”)     “r”)
      를 ml mc mr 로 하시면 되겠네요.

      • 0

    4. 감사합니다

      • 0