如何获得标注对像的精度？ 我查看了标注对像定义数据，没有找到控制其精度的组码。

clh521

终于zml84的博客找到了，谢谢自贡黄明儒和zml84；本人将程序改为函数如下：

;;;功能：尝试获取    标注尺寸的小数位数http://zml84.blog.sohu.com/251579063.html
;;;日期：zml84 于 2013-01-08
;;例：(setq en (car (entsel)))
;;(dimdigits en)
(defun dimdigits (en / en ent tmp str)
  (if (and en
           (setq ent (entget en '("ACAD"))
           )
      )
    (cond
      ;;
      ((and
         (setq tmp (cadr (assoc -3 ent)))
         (setq tmp (member (cons 1070 271) tmp))
       )
       (cdadr tmp)
      )
      ;;
      ((and (setq str (cdr (assoc 3 ent)))
            (setq tmp (tblsearch "DIMstyle" str))
       )
       (cdr (assoc 271 tmp))
      )
      ;;
      ((member '(0 . "DIMENSION") ent)
       (getvar "DIMDEC")
      )
      ;;
      (t nil)
    )
  )
)