비밀번호를 잊으셨나요?

비밀번호를 잊으셨나요? 비밀번호를 재설정하려면 이메일 주소를 입력해주세요.

계정이 있나요? 로그인

You must login to ask a question.

비밀번호를 잊으셨나요?

아직 계정이 없으신가요? 회원가입 하기

해당 질문을 신고하는 이유를 간단히 입력해주세요.

해당 답변을 신고하는 이유를 간단히 입력해주세요.

해당 유저를 신고하는 이유를 간단히 입력해주세요.

로그인회원가입

고캐드 – 캐드(CAD) 정보의 중심

고캐드 – 캐드(CAD) 정보의 중심 Logo 고캐드 – 캐드(CAD) 정보의 중심 Logo

고캐드 – 캐드(CAD) 정보의 중심 Navigation

  • Q&A
    • AutoCAD & CADian
    • Inventor & Solidworks
    • Revit & ArchiCAD
    • 자유질문
    • 기타
  • 커뮤니티
    • 오늘의이슈
    • 자유게시판
    • 익명게시판
    • 건의게시판
  • 자료실
    • 자료요청
    • 일반파일
    • 도면샘플
    • 유틸리티
    • 기타
  • 작품 갤러리
    • 그래픽
    • 캐드도면
    • 3D모델
    • 기타
  • 뉴스&이벤트
    • 공지사항
    • 뉴스
    • 전시/행사
    • 이벤트
    • 기타
검색
질문하기

Mobile menu

닫기
질문하기
  • 홈
  • 카테고리
    • AutoCAD & CADian
    • Inventor & Solidworks
    • Revit & ArchiCAD
    • 자유질문
    • 기타
  • 투표
  • 커뮤니티 그룹
  • Q&A
    • AutoCAD & CADian
    • Inventor & Solidworks
    • Revit & ArchiCAD
    • 자유질문
    • 기타
  • 커뮤니티
    • 오늘의이슈
    • 자유게시판
    • 익명게시판
    • 건의게시판
  • 자료실
    • 자료요청
    • 일반파일
    • 도면샘플
    • 유틸리티
    • 기타
  • 작품 갤러리
    • 그래픽
    • 캐드도면
    • 3D모델
    • 기타
  • 뉴스&이벤트
    • 공지사항
    • 뉴스
    • 전시/행사
    • 이벤트
    • 기타
홈/ 질문/Q 98321
다음
캐드3d만19년째
캐드3d만19년째Lv.0
등록일: 2013-05-242013-05-24T15:04:57+09:00 2013-05-24T15:04:57+09:00카테고리: AutoCAD & CADian

레이어명에 앞쪽에 추가로 레이어명을 더 넣는 리습은 없나요??

예를 들어

LA 라는 레이어로 되어 있는 선이 있으면

명령어 실행 -> 선 클릭    (엔터)

P- 라는 글씨 커멘트창에 쓰고 (엔터)

하면

LA라는 레이어로 되어 있는 선이
P-LA라는 레이어를 같는 선으로 변경되는것입니다.

기존의 정보는 그대로 가져가도 레이어만 앞에 입력한것을 넣어서 새로운 레이어로 변경되는것입니다.

이때  LA라는 레이어로 되어 있는 클릭하지 않은 다른 선들도 모두 함께
P-LA 라는 레이어를 같는 선으로 변경되는 것입니다.

아무리 노력해도 답이 안보여서 글올려 봅니다 ^^
————————————————————————————————
1번 방법

(defun c:1111 ( / hsame1 hname ent)


(setq hsame1 “MP-“)
 (princ “레이어명에 추가할 레이어명은? (prefix) <“)(princ hsame1)(princ “> :”)
    (setq hsame1 (getstring))
    (if (= hsame1 “”) (setq hsame1 “MP-“))



 (vl-load-com)


 (and
(setq ss (ssget))


(setq hname (strcat hsame1 (itoa ss)))



;(setq hlayer “point”) point 레이어 생성
       (if (= (tblsearch “layer” hname) nil) (command “‘_layer” “n” hname hname “”))



;(princ hsame1)
;(princ ss)
;(princ hsame)



   (foreach ob (mapcar ‘vlax-ename->vla-object (vl-remove-if ‘listp (mapcar ‘cadr (ssnamex hname))))
   (vlax-put ob ‘layer hname)))



;(command “change” ent “” “p” “la” hname  “c” “bylayer” “”)



(princ “### Complete !!! ###”)(princ)
————————————————————————————————
2번 방법
(defun c:1111 ( / hsame1 hname ss)


(setq hsame1 “MP-“)
 (princ “레이어명에 추가할 레이어명은? (prefix) <“)(princ hsame1)(princ “> :”)
    (setq hsame1 (getstring))
    (if (= hsame1 “”) (setq hsame1 “MP-“))



 (vl-load-com)


 (and
(setq ss (ssget))


(setq hname (strcat hsame1 (itoa ss))))


(command “-rename” “LA” ss hname)



(princ “### Complete !!! ###”)(princ)
  )       

2번이 조금 더 가까운거 같은데 오류가 나네요 ㅠㅠ

  • 0
  • 13 조회
공유
  • Facebook

    관련 있는 질문들

    • insert 삽입할때 레이어도 같이 변경가능할까요?
    • 캐드 파일을 PDF로 변환 할 때 문제점 도와주세요 ㅠ
    • 질문오토캐드 라인타입이 너무 많은데 어떻게 정리하나요..
    • 질문오토캐드 라인타입이 너무 많은데 어떻게 정리하나요..

    Sidebar

    질문하기
    공지사항

    • AI CAD의 미래! 캐디안 2025 1+1 프로모션 안내 2025-05-14

    Adv 234x60

    aalan

    Adv 234x60

    aalan

    Adv 120x600

    aalan

    Explore

    • 홈
    • 카테고리
      • AutoCAD & CADian
      • Inventor & Solidworks
      • Revit & ArchiCAD
      • 자유질문
      • 기타
    • 투표
    • 커뮤니티 그룹
    aalan

    Footer

    Support

    • 회사 및 서비스 소개
    • 자주 묻는 질문
    • 문의하기

    Guide

    • 제휴/협업 안내
    • 광고 서비스 안내

    Policy

    • 서비스 이용약관
    • 개인정보 처리방침
    • 광고성 정보 수신 동의

    Contents

    • 고밍스토리
    • 리습 시리즈

    정소프트 | 사업자등록번호 : 677-40-00198 | 대표 : 정은숙 | 이메일 : gocad.manager@gmail.com
    주소 : 서울특별시 강서구 양천로 400-12, 6층 614,615,617호(등촌동, 더리브골드타워)
    Copyright. 2012-2024 GOCAD All rights reserved