Document.ShapeEnumDirection property - Developer Area

API Documentation > Corel DESIGNER > X7 > Document > IVGDocument

Document.ShapeEnumDirection property

Returns or sets the order in which shapes in a collection are enumerated

Syntax:

Property Get ShapeEnumDirection() As cdrShapeEnumDirection
Property Let ShapeEnumDirection(ByVal Value As cdrShapeEnumDirection)

Remarks:

The ShapeEnumDirection property returns or specifies how shapes in the Shapes collection are enumerated. By default, the last-created shape has an index number of 1; that is, it is accessible as Shapes(1), and the value is set to cdrShapeEnumTopFirst. If the value is set to cdrShapeEnumBottomFirst, the first-created shape has an index number of 1.

Examples:

The following VBA example creates an ellipse, and then it creates an artistic text object in a new document and applies a red fill to the ellipse (the bottommost object).

Sub Test()
  Dim d As Document
  Set d = CreateDocument
  d.ShapeEnumDirection = cdrShapeEnumBottomFirst
  d.ActiveLayer.CreateEllipse2 4, 4, 2
  d.ActiveLayer.CreateArtisticText 0, 0, "Text"
  d.ActiveLayer.Shapes(1).Fill.UniformColor.RGBAssign 255, 0, 0
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