如何获取CAD左下角的比例值？

lxw320

LSP中怎样获取CAD左下角的比例值？ 找了很久都没有办法

tryhi

2. (setq bilichi (getvar "userr1"))
   
3. (princ (strcat "当前的比例为1："(rtos bilichi 2 2)))

(setq bilichi (getvar "userr1"))<br /> (princ (strcat "当前的比例为1："(rtos bilichi 2 2)))

lxw320

我终于找到间接的方法了。

2. (defun c:2 ()
   
3.    (setq bilichi (getvar "hpscale"))
   
4.    (princ (strcat "当前的比例为1：" (rtos bilichi 2 0)))
   
5.    (princ)
   
6. ) ;_ end defun
   

(defun c:2 ()<br />    (setq bilichi (getvar "hpscale"))<br />    (princ (strcat "当前的比例为1：" (rtos bilichi 2 0)))<br />    (princ)<br /> ) ;_ end defun<br />

lxw320

tryhi 发表于 2015-10-17 17:57

感谢你的热心，不过这方法不行。  我自己研究出来了

冰之绝恋

楼上好样的

dingtiedt

lxw320 发表于 2015-10-17 19:36
我终于找到间接的方法了。

"hpscale"，是填充比例