CrossPoint.PositionX property - Developer Area

API Documentation > CorelDRAW > 2017 > CrossPoint > IVGCrossPoint

CrossPoint.PositionX property

Horizontal coordinate of intersection

Syntax:

Property Get PositionX() As Double

Remarks:

The PositionX property returns the x-coordinate of the point of intersection of curve segments.

Examples:

The following VBA example creates two intersecting ellipses and combines them into a single curve. At the intersections of the ellipses (now subpaths), small circles are created.

Sub XPosition()
  Dim s1 As Shape, sr As New ShapeRange
  Dim s As Shape
  Dim cps As CrossPoints
  Dim cp As CrossPoint
  sr.Add ActiveLayer.CreateEllipse2(4, 4, 3)
  sr.Add ActiveLayer.CreateEllipse2(5, 3, 2)
  Set s = sr.Combine
  Set cps = s.Curve.Subpaths(1).GetIntersections(s.Curve.Subpaths(2))
  For Each cp In cps
    ActiveLayer.CreateEllipse2 cp.PositionX, cp.PositionY, 0.1
  Next cp
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