본문 바로가기

AutoCAD36

[PLOT] vla-GetLocaleMediaName 메써드를 이용한 용지이름 가져오기 용지는 프린터를 지정후 가지고 오셔야 합니다. (setq AcDoc (vla-get-activedocument (vlax-get-acad-object))) (setq PlotList (vlax-safearray->list (vlax-variant-value (vla-GetPlotDeviceNames(vla-get-activelayout AcDoc))))) 프린터 목록을 만들어서 그중의 하나를 vla-put-configname 로 지정을 합니다. (setq PaperList (vlax-safearray->list(vlax-variant-value(vla-GetCanonicalMediaNames(vla-get-activelayout AcDoc))))) 그러나 위에서 가져온 것은 일반적으로 캐드를 출력할때 보.. 2011. 5. 12.
[LISP] vla-AddPolyline 함수 사용에서 VerticesList에 대해서 ... 만약 여러분이 vla-AddPolyline함수를 사용하여 폴리라인을 만들려고 생각을 하였다면 VerticesList에 대해서 한번은 고민하여 보았을 것입니다. 아래의 서브루틴은 좌표리스트를 VerticesList로 변경하는 루틴입니다. 아키모아에서 못 본것 같아서 올립니다. (defun safefill (PtList ) (vlax-safearray-fill (vlax-make-safearray vlax-vbDouble (cons 0 (1- (length (apply'append PtList))))) (apply 'append PtList) ) ) 사용하는 방법 (vl-load-com) (setq AcDoc (vla-get-activedocument (vlax-get-Acad-Object))) (cond .. 2011. 5. 12.
AutoCAD20XX cfg의 사용방법 및 파일위치에 대하여 ... 리습에서 변수값은 다른 파일로 받아오는 방법에는 몇가지가 있습니다. 일반적인 방법은 TXT파일을 이용하는 방법이 있으며 Excel이나 Access로 데이타를 관리하여서 변수값으로 가져와서 사용하시는 분도 계신다고 합니다. 여기서 이야기 하려는 것은 CFG파일입니다. 모든 AutoCAD의 버젼별로 CFG파일이 존재합니다. CFG파일에 데이타를 기록하는 방법은 setcfg 함수를 사용하는 것입니다. (setcfg cfgname cfgval) 사용예 (setcfg "AppData/ArchStuff/WallThk" "8") CFG파일에서 데이타을 가져오는 방법은 getcfg함수를 사용하는 것입니다. (getcfg cfgname) 사용예 (getcfg "AppData/ArchStuff/WallThk") 리습에서 .. 2011. 5. 12.
Auto Lisp으로 자동으로 FAS 컴파일하기 특별한 리습은 없지만 컴파일을 자주 사용하다보니 매번 변경으로 인한 귀차니즘으로 ... 리습의 vlisp-compile 함수를 사용하여 자동 Fas파일제작하기 (defun c:FAS ( / FilePath FileName LspName FasName RewFas) (setvar "cmdecho" 0) (setq FilePath "C:\\AutoCAD 2010\\My Lisp 2010\\") (setq FileName (getfiled "Select a Lisp File" FilePath "lsp" 8)) (setq LspName (strcat FilePath FileName)) (setq FasName (strcat FilePath (vl-filename-base FileName) ".FAS")) (if.. 2011. 5. 12.