홈/ 질문/Q 105973
다음
진행 중
곰내
Lv.0
등록일: 2016-01-28T10:28:21+09:00 카테고리:

VT리습이 2015에서 멈춥니다 도와주세요.

현재 2015버전 캐드를 사용중입니다.

하위버전에서 잘 사용하던 면적구하는 리습 vt 가 
2015버전에서 사용하면 멈춰버리네요
찾아보니 command 를 -s 를 붙여 사용하면 가능하다 하여서
사용해 보았지만 같은 증상입니다.
도와주시면 감사하겠습니다.
공유

    관련 있는 질문들

    2 답변

    1. aalan
    2. Lv.21

       속편한게 어쩔수 없는거 아니면 command문 들어간 리습은 사용을 자재하는게 좋아요 

       이거 될랑가 모르겠습니다 ㅎㅎ;; (파일 첨부가 안되네요 ㅜ.ㅜ;;)

      (defun C:VT1( / total ss dum o ar tt len )(vl-load-com)
        (graphscr)
         (setq total 0 ss(ssadd))
      (while (setq dum (bpoly (getpoint “n Select pick point … : “)))
              (ssadd dum ss)
         (setq o(vlax-ename->vla-object dum))
      (setq ar(vlax-get o ‘AREA))
      (setq total (+ total ar))
      (princ (strcat “area ==>”(rtos total 2 2)))
      )
          (setq tt (entget(car(entsel “n>>Select change Text : “))))
      (entmod(subst(cons 1 (rtos (* total 1) 2 2))(assoc 1 tt)tt))
      (setq len (1- (sslength ss)))
      (while (>= len 0)
      (entdel (cdar (entget (ssname ss len))))
      (setq len (1- len))
      )
          (princ)
      )
      • 0
    3. Lv.0

      ㅠㅠ감사합니다…그런데 이것역시 사용하니 다운되네요 15버전 리습사용이 어렵네요..

      • 0