(XD::Var:GetRatio)获得文字、标注等比例相关的实体的应该的放大系数

newer

1. (defun XD::Var:GetRatio ( / scl unit)
   
2.   (setq unit (XD::VAR:GetDrawingUnit)
   
3.         scl (XD::VAR:GetDrawingSCALE)
   
4.   )
   
5.   (if (= unit 0)
   
6.     (progn
   
7.       (/ scl 1000.0)
   
8.     )
   
9.     (* 100 (/ scl 100.0))
   
10.   )
    
11. )
    
12. 
    

(defun XD::Var:GetRatio ( / scl unit)<br />   (setq unit (XD::VAR:GetDrawingUnit)<br />         scl (XD::VAR:GetDrawingSCALE)<br />   )<br />   (if (= unit 0)<br />     (progn<br />       (/ scl 1000.0)<br />     )<br />     (* 100 (/ scl 100.0))<br />   )<br /> )<br /> <br />

liuyj

XD::VAR:GetDrawingSCALE函数没有发布过吧？