DashStyle.SetDashGap returns NotImplemented error

Genius
Genius

The SetDashGap method of DashStyle object throws a "not implemented exception".

Here is a code snippet that will demonstrate.

        Dim DashStyle As SolidEdgeFramework.DashStyle = SEDft.DashStyles.item("Dot")
        Dim DashGapCount As Long = DashStyle.DashGapCount
        Dim DashGap(DashGapCount - 1) As Double

        DashStyle.GetDashGap(DashGapCount, DashGap)
        For ii = 0 To UBound(DashGap)
            DashGap(ii) = 2 * DashGap(ii)
        Next
        Try
            DashStyle.SetDashGap(DashGapCount, DashGap)
        Catch ex As Exception
            Console.WriteLine(ex.ToString)
        End Try

 
Any help will be greatly appreciated.
Gerald

1 REPLY

Re: DashStyle.SetDashGap returns NotImplemented error

Genius
Genius

Solution: The method is only available for new DashStyles.

 

regards Gerald