求助如何使用ObjectARX方法获取直径标注的精确距离及精度

革天明

如上图所示，如何求得当前所有直径标注（上图为普通标注）的精确尺寸和精度（上图为2位小数）？
我的环境为VS2010 objectarx2012 AutoCAD2012 64位
谢谢指教！本人初学ARX，想通过这个小例子学习一下选择集的过滤及对象属性的获取，lisp下通过DXF码过滤及获取，可实现此功能，但arx我不会，还望各位高手能来个教学，谢谢！

newer

用XDRX API帮你看下

命令: (xdrx_getpropertyvalue (entlast) "textstring")
nil

命令: (xdrx_getpropertyvalue (entlast))

Class AcDbRotatedDimension:

    ├─DimLinePoint
    ├─Oblique
    ├─Rotation
    ├─XLine1Point
    ├─XLine2Point

Class AcDbDimension:

    ├─DimBlockId
    ├─DimBlockPosition
    ├─DimensionStyle
    ├─DimensionText
    ├─Plane
    ├─HorizontalRotation
    ├─IsUsingDefaultTextPosition
    ├─Measurement
    ├─TextAttachment
    ├─TextBox
    ├─TextLineSpacingFactor
    ├─TextLineSpacingStyle
    ├─TextPosition
    ├─TextRotation

  Overide Method:(See Acad System Variable Help)
  ├─Dimadec       Dimalt      Dimaltd     Dimaltf     Dimaltrnd     Dimalttd
  ├─Dimalttz      Dimaltu     Dimaltz     Dimapost    Dimarcsym     Dimasz
  ├─Dimatfit      Dimaunit    Dimazin     Dimblk      Dimblk1       Dimblk2
  ├─Dimcen        Dimclrd     Dimclre     Dimclrt     Dimdec        Dimdle
  ├─Dimdli        Dimdsep     Dimexe      Dimexo      Dimfit        Dimfrac
  ├─Dimgap        Dimjust     Dimldrblk   Dimlfac     Dimlim        Dimlunit
  ├─Dimlwd        Dimlwe      Dimpost     Dimrnd      Dimsah        Dimscale
  ├─Dimsd1        Dimsd2      Dimse1      Dimse2      Dimsoxd       Dimtad
  ├─Dimtdec       Dimtfac     Dimtih      Dimtix      Dimtm         Dimtmove
  ├─Dimtofl       Dimtoh      Dimtol      Dimtolj     Dimtp         Dimtsz
  ├─Dimtvp      Dimtxsty    Dimtxt        Dimtzin     Dimupt        Dimzin

  ACAD2007+
    ├─ArrowFirstIsFlipped    ArrowSecondIsFlipped    Dimfxlen    DimfxlenOn
    ├─Dimjogang    Dimltex1  Dimltex2    Dimltype    Dimtfill    Dimtfillclr


Class AcDbEntity:

    ├─BoundingBox
    ├─Color
    ├─ECS
    ├─Layer
    ├─Layout
    ├─Linetype
    ├─LinetypeScale
    ├─LineWeight
    ├─Plane
    ├─PlotStyleName
    ├─StretchPoint
    ├─Transparency
    ├─Visibility

Class AcDbObject:
    ├─ClassName
    ├─ExtensionDictionary
    ├─FieldDictionary
    ├─IsA
    ├─IsAProxy
    ├─IsErased
    ├─IsReallyClosing
    ├─Handle
    ├─HasFields
    ├─HasPersistentReactor
    ├─MyParent
    ├─ObjectID
    ├─Owner


命令: (xdrx_getpropertyvalue (entlast) "DimensionText")
""

命令: (setq a (xdrx_getpropertyvalue (entlast) "Measurement"))
1048.07


命令: (rtos a 2 7)
"1048.0713995"