Segment.GetStartingControlPointPosition method - Developer Area

API Documentation > CorelDRAW > 2023-v24.3 > Segment > IVGSegment

Segment.GetStartingControlPointPosition method

Returns the starting control point position

Syntax:

Sub GetStartingControlPointPosition(ByRef PositionX As Double, ByRef PositionY As Double)

Parameters:

Name	Type	Description
PositionX	Double	Specifies the horizontal position
PositionY	Double	Specifies the vertical position

Remarks:

The GetStartingControlPointPosition method returns the position of the starting control point.

Examples:

The following VBA example creates a curve, and it sets the starting control point of the last segment to the same position as the starting control point for the second segment.

Sub Test()
  Dim s As Shape, s2 As Shape
  Dim sp As SubPath
  Dim crv As Curve, crv2 As Curve
  Dim seg As Segment, seg2 As Segment
  Dim x As Double, y As Double
  Set crv = CreateCurve(ActiveDocument)
  ActiveDocument.ReferencePoint = cdrBottomLeft
  Set sp = crv.CreateSubPath(1, 1)
  sp.AppendLineSegment 1, 1
  sp.AppendCurveSegment 3, 3
  sp.AppendCurveSegment 5, 1
  sp.AppendCurveSegment 6, 4
  sp.Nodes(2).Type = cdrSmoothNode
  sp.Nodes(3).Type = cdrSmoothNode
  Set s = ActiveLayer.CreateCurve(crv)
  Set seg = ActiveShape.Curve.Segments(2)
  seg.GetStartingControlPointPosition x, y
  Set seg2 = ActiveShape.Curve.Segments(ActiveShape.Curve.Segments.Count)
  seg2.SetStartingControlPointPosition x, y
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