캐드 분류
레이어 변경 리습 관련 명령어 질문입니다!
컨텐츠 정보
- 20 조회
- 3 댓글
- 0 추천
- 0 비추천
- 목록
본문
(defun c:1()
(setvar “cmdecho” 0)
(setq ent (ssget))
(command “change” ent “” “p” “la” “O_D” “c” “bylayer” “lt” “bylayer” “” )
(setvar “cmdecho” 1))
간단한 레이어 변경 리습입니다!
tblsearch 응용하여 선택된 객체가 없으면 현재 레이어를 변경하고 싶습니다!
도움 부탁드립니다!
관련자료
댓글 3
/ 1 페이지
오형석님의 댓글
수야12님 도움 주셔서 정말 고맙습니다! 선택객체가 없으면 이라는 뜻이 (setq ent(ssget))에 선택된 객체가 없다는 것이 맞습니다 테이블 검색 함수를 응용하려는 이유는 생성된 레이어가 없을 경우 레이어 생성을 하려고 의도하였으나 답변 주신대로 ent가 nil 이면 레이어를 변경하도록 간단하게 수정 할 수 있었습니다 다만, (setvar ‘layer “원하는 레이어”) 가 제 캐드 버전에서는 레이어 창만 띄우기에 (command “LAYER” “S” “레이어” “”)로 해결하였습니다 덕분에 많은 공부가 되었습니다! 좋은 하루 되세요!