SubPath.AppendLineSegment method - Developer Area

API Documentation > CorelDRAW > 2017 > SubPath > IVGSubPath

SubPath.AppendLineSegment method

Appends a new line segment to this subpath

Syntax:

Function AppendLineSegment(ByVal x As Double, ByVal y As Double, Optional ByVal AppendAtBeginning As Boolean = False) As Segment

Parameters:

Name	Type	Description
x	Double	Specifies, in document units, the horizontal position of the new line segment to append to the subpath
y	Double	Specifies, in document units, the vertical position of the new line segment to append to the subpath
AppendAtBeginning	Boolean	Specifies whether the new line segment joins the subpath at the head of the subpath.

Remarks:

The AppendLineSegment method joins a new line segment to the beginning or the end of an open subpath.

Examples:

The following VBA example creates a closed curve and applies a fountain fill to it.

Sub Test()
  Dim s As Shape
  Dim crv As Curve
  Dim sp As SubPath
  Dim c As New Color
  Set crv = CreateCurve(ActiveDocument)
  Set sp = crv.CreateSubPath(0, 0)
  sp.AppendLineSegment 3.6, 0, False
  sp.AppendCurveSegment 3.6, 0.8, 0.43, 160, 0.43, -160, False
  sp.AppendLineSegment 0, 0.8, False
  sp.AppendCurveSegment 0, 0, 0.43, -20, 0.43, 20, False
  sp.Closed = True
  Set s = ActiveLayer.CreateCurve(crv)
  c.CMYKAssign 0, 0, 0, 100
  With s.Fill.ApplyFountainFill(c, c, , 90, , , , cdrCustomFountainFillBlend).Colors
    .Add CreateCMYKColor(0, 0, 0, 0), 70
  End With
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