Solid Edge FrameworkSupport Type Library
RemoveSegmentedStyle Method
Specifies the index of the segmented style to be removed from the graphic object.
Description
Removes the segmented style at the specified index on the graphic.
Syntax
Visual Basic
Public Sub RemoveSegmentedStyle( _
   ByVal Index As Long _
) 
Parameters
Index
Specifies the index of the segmented style to be removed from the graphic object.
Remarks
Removing a segmented style does not remove the geometry. Instead, it removes the linear style applied to that section of the graphic object defined by the segment. If a segment is blank (for example, when the linear style is null), it reappears when the segment is removed.
Example
Private Sub Form_Load()
    Dim objApp As SolidEdgeFrameWork.Application
    Dim objDoc As SolidEdgeDraft.DraftDocument
    Dim objSheet As SolidEdgeDraft.Sheet
    ' Report errors
    Const PI = 3.14159265358979
    ' Create/get the application with specific settings
    On Error Resume Next
    Set objApp = GetObject(, "SolidEdge.Application")
    If Err Then
        Err.Clear
        Set objApp = CreateObject("SolidEdge.Application")
        Set objDoc = objApp.Documents.Add("SolidEdge.DraftDocument")
        objApp.Visible = True
    Else
        Set objDoc = objApp.ActiveDocument
    End If
    'getting the Active Sheet object
    Set objSheet = objDoc.ActiveSheet





    ' USER DISPLAY
    ' Release objects
    Set objApp = Nothing
    Set objDoc = Nothing
    Set objSheet = Nothing
End Sub
See Also

Point2d Object  | Point2d Members

Send comments on this topic.