홈/ 질문/Q 88419
다음
진행 중
Lv.0
등록일: 2010-08-11T11:12:01+09:00 카테고리:

객체선택하면 레이어 자동으로 변하는 현상

캐드 2010사용중입니다.

기본레이어가 “0”으로 맞춰져 있다고 하면

작업하다보면 레이어가 자동으로 다른레이어로 바뀌어 있던데

이거 왜이런걸까요?

은근 귀찮네요 ㅡ.,ㅡ;

공유

    관련 있는 질문들

    2 답변

    1. aalan

    2. 명령어는 qw <–바꾸셔도 되구요..

      레이어 변경 리습 입니다.

      • 0

    3.  (defun c:qw(/ ent ed la en cdim h-name h-scal h-ang cts)
       (setq ent (car (entsel “레이어변경:”)))
       (if ent
         (progn
          (setq ed (entget ent))
          (setq la (cdr (assoc 8 ed)))
          (setq en (cdr (assoc 0 ed)))
          (setvar “clayer” la)
          (cond ((or (= en “dimension”) (= en “leader”))
                 (setq cdim (cdr (assoc 3 ed)))
                 (command “dimstyle” “r” cdim)
                )
                ((or (= en “text”) (= en “mtext”))
                 (setq cts (cdr (assoc 7 ed)))
                 (setvar “textstyle” cts)
                )
                ((= en “hatch”)
                 (setq h-name (cdr (assoc 2 ed)))
                 (setvar “hpname” h-name)
                 (if (/= h=name “solid”)
                  (progn
                   (setq h-scal (cdr (assoc 41 ed)))
                   (setq h-ang (cdr (assoc 52 ed)))
                   (setvar “hpscale” h-scal)
                   (setvar “hpang” h-ang)
                  )
                 )
                )
           )
           (princ “Wn레이어변경”)
           (cond ((/= cdim nil) (princ ” & 치수스타일변경”))
                 ((/= h-name nil) (princ ” & 해치스타일변경”))
                 ((/= cts nil) (princ ” & 문자스타일변경”))
           )
          )
        )
        (princ)
        )

      • 0