autolisp如何获得标注文本前缀状态?

ttmc

我遇到一个难题,我想写一个自动加注公差的程序.我选择的先取得数据,然后取消尺寸关联,再写入内容.可是,当选择一个直径尺寸文本后,却将尺寸前缀%%c给清除了.请大侠指点,如何在autolisp中知道一个尺寸值是否带有%%c的前缀呢?

我知道dimpost是关于全局的前后缀的变量名,可如何反映所选择的某一个尺寸文本的值呢?

我查了很多资料,可没有介绍autolisp这方面的知识,有一些是vlisp的,我看不懂.请高手们指点一下,在下不胜感激!

rongyifei

(and (= (vla-get-objectname
   (setq dimobj (vlax-ename->vla-object (car (entsel))))
 )
 "AcDbDiametricDimension"
     )
     (= (vla-get-TextPrefix dimobj) "")
)

当上式为T时,则可认为这个尺寸标注为直径尺寸并且有前缀%%c

ttmc

滔滔江水不能表达我对你的感激之情.太谢谢了,真是难者不会,会者不难,我苦恼了许多天的问题,解决了.侠之大者,正如rongyifei一般.

不好意思,我因为看不懂vlisp程序,还请帮助一下,如何判断普通线性标注已经加了%%c有直径类的自动加了%%c的标注尺寸呢,因为这两类我都希望取消关联时自动加上%%c.目前你写的上述这段话,对直径标注选取后返回T,选择普通线性直径加了%%c的尺寸,则返回nil.

另外,有Vla-get-***之类的,是vlisp的函数吧?

ttmc

哦,明白了,把再加一个 (= (vla-get-TextPrefix dimobj) "%%c")时就可以判断线性直径加%%C了,呵呵,真高兴啊.

是不是autolisp没有这种函数啊?