SegmentRange.RemoveRange method - Developer Area

API Documentation > Corel DESIGNER > 2019.2 > SegmentRange > IVGSegmentRange

SegmentRange.RemoveRange method

Removes the segments in the given range from the current range

Syntax:

Sub RemoveRange(ByVal SegmentRange As SegmentRange)

Parameters:

Name	Type	Description
SegmentRange	SegmentRange	Specifies the segment range to be removed

Remarks:

The RemoveRange method removes the segments in a specified range from the current range.

Examples:

The following VBA example creates a curve and two shape ranges. The first shape range contains all of the curve's segments, and the second range contains only the curved segments of the curve. The second range is then removed from the first range, leaving only the line segments in the first range.

Sub Test()
  Dim s As Shape
  Dim n As Node
  Dim sp As SubPath
  Dim crv As Curve
  Dim sg As Segment
  Dim sgr As SegmentRange
  Dim sgr2 As New SegmentRange
  Set crv = CreateCurve(ActiveDocument)
  ActiveDocument.ReferencePoint = cdrBottomLeft
  Set sp = crv.CreateSubPath(-1, 0.2)
  sp.AppendLineSegment 0.5, 1
  sp.AppendCurveSegment 2, 3
  sp.AppendCurveSegment 4, 1
  sp.AppendCurveSegment 5, 4
  sp.AppendCurveSegment 7, 2
  sp.AppendLineSegment 8, 5
  sp.AppendLineSegment 9, 1
  Set s = ActiveLayer.CreateCurve(crv)
  Set sgr = s.Curve.Segments.All
  For Each sg In s.Curve.Segments
    If sg.Type = cdrCurveSegment Then
      sgr2.Add sg
    End If
  Next sg
  sgr.RemoveRange sgr2
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