Community
오토캐드 AutoCAD - 한국어
프로그램에 관한 사용 방법, 기술, 정보 등을 검색하고, 질문을 통해 서로 도움을 주고 받을 수 있습니다.
cancel
Showing results for 
Show  only  | Search instead for 
Did you mean: 

AutoLISP(1): Lock Layer Not Select

2 REPLIES 2
SOLVED
Reply
Message 1 of 3
WeTanks
286 Views, 2 Replies

AutoLISP(1): Lock Layer Not Select

WeTanks
Mentor
Mentor

WeTanks_0-1717807341189.png

 

(sssetfirst nil (ssget ":l"))

 

 

We.Tanks

EESignature

A couple of Fusion improvement ideas that could your vote/support:
図面一括印刷

AutoLISP(1): Lock Layer Not Select

WeTanks_0-1717807341189.png

 

(sssetfirst nil (ssget ":l"))

 

 

We.Tanks

EESignature

A couple of Fusion improvement ideas that could your vote/support:
図面一括印刷

2 REPLIES 2
Message 2 of 3
exceeds
in reply to: WeTanks

exceeds
Enthusiast
Enthusiast
Accepted solution

한글로 설명을 붙이자면

 

해당 리습은 락이 걸려있지 않은 객체만 선택하는 일종의 필터로, 

(ssget ":l")

선택 영역 중, 레이어에 락이 걸려있지 않은 객체만 선택 세트에 추가하고,

 

(sssetfirst nil (ssget ":l"))

선택세트를 만들기만 해서는 화면에선 선택된 것으로 보이지 않으므로,

일반적으로 선택한 것과 같이 만들기 위해서, sssetfirst 로 해당 선택세트를 하이라이트합니다.

 

메뉴, 툴 바, 리본에 넣지 않고 툴 팔레트에 직접 코드를 넣어서

간단한 리습 구문을 사용하는 방법도 설명하고 있습니다.

 

툴 팔레트에 넣을만한 다른 코드로는

(entget (car (entsel)))

로 객체의 dxf 코드를 보거나 

(vl-load-com)(vlax-dump-object (vlax-ename->vla-object (car (entsel))) t)

으로 object를 dump 해보기도 할 수 있습니다.

(다른 visual lisp 코드를 사용중이라면 (vl-load-com)은 lsp 파일에서 실행헀을테니 여기선 삭제 가능)

한글로 설명을 붙이자면

 

해당 리습은 락이 걸려있지 않은 객체만 선택하는 일종의 필터로, 

(ssget ":l")

선택 영역 중, 레이어에 락이 걸려있지 않은 객체만 선택 세트에 추가하고,

 

(sssetfirst nil (ssget ":l"))

선택세트를 만들기만 해서는 화면에선 선택된 것으로 보이지 않으므로,

일반적으로 선택한 것과 같이 만들기 위해서, sssetfirst 로 해당 선택세트를 하이라이트합니다.

 

메뉴, 툴 바, 리본에 넣지 않고 툴 팔레트에 직접 코드를 넣어서

간단한 리습 구문을 사용하는 방법도 설명하고 있습니다.

 

툴 팔레트에 넣을만한 다른 코드로는

(entget (car (entsel)))

로 객체의 dxf 코드를 보거나 

(vl-load-com)(vlax-dump-object (vlax-ename->vla-object (car (entsel))) t)

으로 object를 dump 해보기도 할 수 있습니다.

(다른 visual lisp 코드를 사용중이라면 (vl-load-com)은 lsp 파일에서 실행헀을테니 여기선 삭제 가능)

Message 3 of 3
WeTanks
in reply to: exceeds

WeTanks
Mentor
Mentor
Accepted solution

Thank you very much for your reply in Korean.
I don't speak Korean, I can only help everyone understand through videos.
I hope that by publishing some practical programs,
this community can be loved by more people.

We.Tanks

EESignature

A couple of Fusion improvement ideas that could your vote/support:
図面一括印刷

Thank you very much for your reply in Korean.
I don't speak Korean, I can only help everyone understand through videos.
I hope that by publishing some practical programs,
this community can be loved by more people.

We.Tanks

EESignature

A couple of Fusion improvement ideas that could your vote/support:
図面一括印刷

Can't find what you're looking for? Ask the community or share your knowledge.

Post to forums