[原创]检查那个尺寸的值被改动过啦和非1：1画的图

龙龙仔

那我先補一個

(defun KO->SS-2LST (SS / N LST)
  (setq N 0)
  (repeat (sslength SS)
    (setq LST (cons (ssname SS N) LST))
    (setq N (1+ N))
  )
  LST
)

龙龙仔

(defun KO->GET-DIMDXFVAL (ENA DXF);;改用VLISP
  (vla-get-linearscalefactor (vlax-ename->vla-object ENA))
)

(defun KO->LSTPRINC (LST)
  (foreach L LST
    (princ L)
  )
)

(defun KO->LSTALERT (STR LST)
  (foreach L LST
    (setq STR (strcat STR L))
  )
  (alert STR)
)

;;看不出能有甚麼用的函數!!

樓主程序有支持R2006以上嗎?

龙龙仔

R2006以上好像方法不一樣,你確定程序能在R2006以上使用

(strcat "\n"
   MODE_MSG
   "了"
   (itoa (+ II II_SUM))
   "個同時具備內容被替換、測量因子非1的兩個條件的尺寸對像"
  )

(+ II II_SUM)===>為甚麼它會=>同時具備內容被替換、測量因子非1的兩個條件的尺寸對像