如何得到当前默认单位
大家好！一个简单的问题，我想在visual lisp里面如何得到当前CAD图的默认单位，如是毫米还是米等；同时如何改变他，运行程序后再恢复，非常感谢。
(setq ins '("无单位""英寸""英尺""英里""毫米""厘米""米""公里""微英寸""英里""码""埃""毫微米""微米""分米""十米""百米""百万公里""天文单位""光年" "秒差距"))
(alert(strcat"当前的图形单位为："(nth (getvar "INSUNITS")ins)))
(alert"将图形单位设置为：英寸")
(setvar "INSUNITS" 1)
) tryhi 发表于 2016-4-20 14:59 static/image/common/back.gif
有点不明白，我是想知道现在的单位，自己做一个判断，能否麻烦高手讲讲这代码啥意思啊。 金币不够不能评分，非常抱歉。
页:
[1]