Re:열린구간 체크하는 리습구합니다

[행복한하루]

(defun c:opp(/ os lts ss k q en ed x70 stp enp)
(vl-load-com)
(setq os (getvar "osmode"))
(setq lts (getvar "ltscale"))
(setq ss (ssget "x" (list (cons 0 "lwpolyline"))))
(setq k 0 q 0)
(command "undo" "be")
(setvar "osmode" 0)
(repeat (sslength ss)
  (setq en (ssname ss k)
        ed (entget en)
        x70 (cdr (assoc 70 ed)))
  (if (= x70 0)
   (progn
    (setq stp (vlax-curve-getstartpoint en))
    (setq enp (vlax-curve-getendpoint en))
    (command "circle" stp lts)
    (command "circle" enp lts)  
    (command "change" en "" "p" "c" "yellow" "")
    (setq q (1+ q))
   ) ;progn
  ) ;if
  (setq k (1+ k))
) ;repeat
(princ "\n->총 ") (princ q) (princ " 개 가 열려있습니다.")
(princ)
) ;defun

[행복한하루]

열린폴리선 색이 변하면서.. 폴리선 시작/끝점에 원을 그려줍니다..원의 크기는..(setq lts (getvar "ltscale")) 에 의해서 좌우됩니다.. 지정할려면...(setq lts 100) 이런식으로 변경하면...반지름 100짜리가 그려지겠져..

[3:16]

와~이런 리습도 다 있군요^^* 좋다...이거..^^*ㅎㅎㅎ

[노마크]

이거 쓸곳이 많을 것 같네요~잘쓰겠습니다~!!^^

[행복한하루]

이렇게 하면 작업이 불편할듯... 레이어를 아예 다른걸로 만들어서.. 해당 레이어만 켜놓고 작업하고.. 레이어를 다시 일괄변경하는게.. 좋지 않나여..^^;

[3:16]

음...역시...그런 방법두 있네요..^^;;; 근데 머...나름 저렇게 해야 하는 이유가 있겠죠 머^0^;;;;

[회탈리카]

이리습이 저도있습니다.그런데 단점이 도곽에 붙은 선들이 다열려있다고 나오더군요.제가 설명을 잘못했군요.미안합니다. 수정이 가능할까요.제가원하는것은 다시말씀을드리자면 해당레이어만 켜놓고 그것을 드래그 해서 선택해서 검사하게 만들수는없는지요.예를들어 건물만 띄어놓고(따로 도면을 만드는것이아니라 레이어 온,오프를이용해서)그것으르드래그 하면 열린부분에 동그라미가 나타나게말입니다.

[회탈리카]

아니면 특정레이어를 제가 리습안에다가 넣고나서 그 레이어만 검사해서 닫혀있어야 하고 조인이 되어있어서 면이 형성이 되어야 하는데 안되있는 것만 동그라미로 나타냈으면합니다.사실 그냥 특정레이어를 제가 구별해서 리습안에다가 미리넣어두고 사용하는것이 좀더 좋을듯싶은데요..부탁드립니다.도면은 많은데 검수하기가 쉽지않군요.레이어도 많고......

[행복한하루]

무슨말씀이신 이해가 안되네여..

[회탈리카]

예를들어 건물과 과수원경계 논경계등은 폐합이 되어있어야 하거든요.그런데 지금 도곽에 붙어있는 등고선이라던가 기타 다른선들은그냥 선이거든요.면이 아니고요 즉 폴리건이 아니라는말입니다.그래서 폴리건이 되어야 하는것들은 제가 레이어를 알거든요.그래서 그레이어를 리습을 만들어주시면(사용자가 원하는레이어를 넣고 사용하는리습)제가 레이어를 넣고 돌리면 해당레이어만 쭈욱검사해서 폴리건이 형성되어있나검사하고 또한 클로즈가 되어있나 검사를하는것입니다. 도와주세요.뭔넘에 사업이 데이타 검수도 빡세서요.ㅠㅠㅠ

[회탈리카]

한마디로 어느도면에 블럭도있고 선도 있고 폴리건이 형성된 것들이 있고 레이어도 수십가지입니다.이럴때 제가 검사하기 원하는 레이어만 검사해서 폴리건이 형성되있나 보는거죠.오류부분에 동그라미가 나오구요.

[거북이]

GIS쪽 일 하시나 보네요 ㅎㅎ 저두 GIS쪽 일하는데..정위치편집 할때 에러 잡기 힘드시져 ㅎㅎ 답변은 아니지만 같은쪽 일 하시는거 같아서 반가워서 ^^;; 우리회사도 사장님 졸라서 검수 프로그램 하나 샀다는 ㅡㅡ;; 폴리곤 만 잡아서 위상 돌리면 되긴한데 시간이 오래걸리져 ^^;;

[회탈리카]

반갑습,니다.지금 수치지도1대1000을 하는데 어렵네요

[BB대장]

도움이 될지 모르겠지만 우리 클박 gis자료실에 보면 캐드파일을 shp으로 바꾸는게 있는데 일괄 변한하셔서 캐드로 불러오는 방법도 있을거 같습니다. 대신 검수는 또 해야 되겠네요 ^^

[회탈리카]

무슨말인지......쉐입에서 검수를해준다는얘기인지요

[BB대장]

아뇨 캐드로 불러와서요, 폴리곤으로 불러오면 안되어있는건 전꺼와 색으로 비교해(겹쳐)보면 알거 같아서요

[거북이]

폴리곤 처리가 안된 것도 shp 넘어가나요??? 폴리곤 처리 안되면 shp으로 변환해도 폴리곤 처리만 된것만 들어오던데.. 폴리곤 처리가 안되있어도 shp으로 넘어간다면 shp로 갔다가 다시 불러 들이면 땡~~~~~ ㅎㅎ 저두 클박함 가봐야것네요