본문 바로가기

분류 전체보기126

AutoCAD .NET Developer's Guide .NET 도움말은 AutoCAD Help 폴더에는 없습니다.온라인으로 공개되어 있습니다.AutoCAD .NET Developer's Guide 클릭 2012. 8. 16.
[Layer] 레이어 목록을 입력 후 목록으로 레이어 관리하는 방법 대부분이 레이어이름이나 화면에서 선택한 값으로 관리를 하고 있습니다.작업을 하다보면 특정 레리어목록으로 레이어를 조정할 경우가 많이 있습니다. 레이어목록으로 관리하는 작업자들이 대부분 레이어필터를 사용하여 레이어를 관리하고 있습니다.필터로 관리하는 것은 각각의 필터에 대한 규칙을 만들고 그 규칙에 맞게 모든 반영이 되어야 하며필터의 구성에 따라서 레이어명의 조정도 필요합니다.그리고 다른 파일에 특정레이어목록을 보낸다는 것도 힘든 부분입니다. 그래서 쉽게 레이어목록을 제작하여서 관리하는 방법으로 생각해보았습니다.작업중 Off된 레이어나 Lock걸린 레이어나 동결된 레이어들을 기록을 해두고레이어를 켜서 작업을 하고 다시 원래상태로 돌리는 방식으로 접근을 하였습니다. 기록된 레이어명이 다른파일을 열어서 작업을.. 2012. 8. 16.
two-element array of doubles 과 three-element array of doubles . 어제 작업중 분명히 좌표가 Variant값인데 오류가 발생하여 한참을 고민하였습니다. 나중에 알고보니 double 2-요소 배열과 double 3-요소 배열의 차이때문에 오류가 ㅎㅎㅎ 그래서 그냥 서브루틴을 만든것을 올립니다. Variant도 다 같은 Variant이 아닌라는 것을 참조하세요^^ (defun TwoElementArray (VariantPt / ListPt) (setq ListPt (trans (vlax-safearray->list VariantPt) 0 3)) (vlax-make-variant (vlax-safearray-fill (vlax-make-safearray vlax-vbdouble '(0 . 1)) (list (car ListPt) (cadr ListPt)) ) ) ) (def.. 2012. 8. 16.
삼각함수 The Well 중에서 acad.lsp에서 발췌하였습니다. 자주 사용하지는 않지만 필요하신분들이 계실것 같아서 올립니다^^ ;TANGENT FUNCTION (defun Tan (x) (cond ((= (cos x) 0.0)(if (minusp x) -1.0E200 1.0E200)) (t (/ (sin x) (cos x))) ) ) ;SECANT FUNCTION (defun Sec (x) (if (= (cos x) 0) (if (minusp x) -1.0E200 1.0E200) (/ 1.0 (cos x)) ) ) ;;COSECANT FUNCTION (defun CoSec (x) (if (= (sin x) 0) (if (minusp x) -1.0E200 1.0E200) (/ 1.0 (sin x)) ) ) ;.. 2012. 8. 16.

티스토리툴바