Segment.GetCopy method - Developer Area

API Documentation > Corel DESIGNER > 2019.2 > Segment > IVGSegment

Segment.GetCopy method

Returns a copy of the current segment as a separate curve

Syntax:

Function GetCopy() As Curve

Remarks:

The GetCopy method returns a copy of the active segment as a separate curve.

Examples:

The following VBA example creates a curve and copies its second segment to form a second curve. It then creates another shape from the second curve.

Sub Test()
  Dim s As Shape, s2 As Shape
  Dim sp As SubPath
  Dim crv As Curve, crv2 As Curve
  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.AppendCurveSegment 8, 2
  sp.AppendLineSegment 10, 5
  sp.Nodes(2).Type = cdrSmoothNode
  sp.Nodes(3).Type = cdrSmoothNode
  sp.Nodes(4).Type = cdrSymmetricalNode
  sp.Nodes(5).Type = cdrSmoothNode
  Set s = ActiveLayer.CreateCurve(crv)
  Set crv2 = s.Curve.Segments(2).GetCopy
  Set s2 = ActiveLayer.CreateCurve(crv2)
  s2.Move 0, 2
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