반응형 dim text1 Fix Dimstyles After Revit exporting to Cad ;; 캐드 치수 한꺼번에 바꾸기 문자 초록, 천단위 콤마, 계단치수높이 2.4, 소수점 1자리표시, 주심도 치수높이 2.2;; 각자 스타일 보존(defun KM:setINI ( / ) (progn (setq _dimFont "돋움_1") ;; 치수 폰트 지정 (setq _cadDimstyle "SK_돋움_3") ; 치수스타일 지정 (setq _scale 1.0) ) ;progn ;;; set dimscle from sheet's scale (setq sheetblkname (ssname (ssget "_X" (list (cons 0 "INSERT") (cons 2 "Sheet_A1_R*"))) 0)) (setq _scale (cdr (assoc 41 (entget sheetblkname)))) (pr.. 2024. 8. 1. 이전 1 다음 반응형