DimensionAngular.Units property - Developer Area

API Documentation > CorelDRAW > 2021.5 > DimensionAngular > IVGDimensionAngular

DimensionAngular.Units property

Specifies the unit of measurement for the number

Syntax:

Property Get Units() As cdrDimensionAngularUnits
Property Let Units(ByVal Value As cdrDimensionAngularUnits)

Remarks:

The Units property specifies the unit of measurement for a dimension value. The default value is the same as the unit of measure for the parent document.

For the units to be displayed, the Dimension.ShowUnits property must be set to True.

Examples:

The following VBA example initializes the snap points to which the dimension is attached and creates an angular dimension that is linked to the snap points. The dimension text is placed in the middle of the dimension arms, and the unit of measure is set to millimeters.

Sub Test()
  Dim shp1 As Shape
  Dim snpVer As New SnapPoint, snp1 As New SnapPoint, snp2 As New SnapPoint
  'Initialize the snap points; this placement should form a 45 degree measurement.
  snpVer.PositionX = 0.0
  snpVer.PositionY = 0.0
  snp1.PositionX = 10.0
  snp1.PositionY = 0.0
  snp2.PositionX = 10.0
  snp2.PositionY = 10.0
  Set shp1 = ActiveLayer.CreateAngularDimension(snpVer, snp1, snp2, 10.0, 5.0)
  shp1.Dimension.Angular.Units = cdrDimensionUnitMillimeters
End Sub

Version Information:

CorelDRAW:	X7.4, X7, X7.6, X8, 2017, 2018, 2019, 2019.2, 2020, 2021, 2020.1, 2021.5, 2022-v24, 2022-v24.1, 2022-v24.2, 2023-v24.3, 2023-v24.5, 2024-v25
Corel DESIGNER:	X7, 2017.1, 20.1, 2019.2, 2020.1, 2021.5, 2022-v24, 2022-v24.1, 2022-v24.2, 2023-v24.3, 2023-v24.5, 2024-v25