[求助]autolisp如何获得标注文本前缀状态?

ttmc

我遇到一个难题,我想写一个自动加注公差的程序.我选择的先取得数据,然后取消尺寸关联,再写入内容.可是,当选择一个直径尺寸文本后,却将尺寸前缀%%c给清除了.请大侠指点,如何在autolisp中知道一个尺寸值是否带有%%c的前缀呢?
2 q+ n5 l5 T3 ?4 v& t3 L
我知道dimpost是关于全局的前后缀的变量名,可如何反映所选择的某一个尺寸文本的值呢?
$ ]! s5 e0 @, K7 g3 t( G
; s2 a2 ?( }" k1 @7 y6 m我查了很多资料,可没有介绍autolisp这方面的知识,有一些是vlisp的,我看不懂.请高手们指点一下,在下不胜感激!

ttmc

解决了,感谢晓东CAD的qjcpj 和kohi 两位网友,还有明经通道的一位网友(明经忽然上不去了,没办法知道好心人的名字)的解答.
4 z' ?) H; k% M/ L6 L, W  i4 D1 t3 D

( P/ [( @, d) B  G  a(defun c:test ()
/ d( _: D4 d5 O0 _  (setq ent (entsel "/nPick a Dimension:"))
  (setq obj (vlax-ename->vla-object (car ent)))
5 d$ }3 l( v! }& ?5 j  (vla-get-textprefix obj)
$ A0 g, }2 R+ J' X+ b& }, I1 v$ c; ~3 |)

ttmc

解决了,感谢晓东CAD的qjcpj 和kohi 两位网友,还有明经通道的一位网友(明经忽然上不去了,没办法知道好心人的名字)的解答.


(defun c:test ()
  (setq ent (entsel "/nPick a Dimension:"))
  (setq obj (vlax-ename->vla-object (car ent)))
  (vla-get-textprefix obj)
3 g1 n8 w6 X" G( _5 v! v)