MapWinGIS:ShapeNetwork Close

From MapWindow GIS

Close

Closes the shape network.

VB.NET Usage

Function Close() As Boolean
            Parameters

Sample Code

    Private Sub CloseNetwork()
        Dim sf As New MapWinGIS.Shapefile()
        Dim shapenetwork As New MapWinGIS.ShapeNetwork()
        Dim result As Integer
        'Open a line shapefile
        sf.Open("C:\test.shp")
        'Build a shape network from the shapefile using shape 0 as the outlet shape and point 0 in shape 0 as the outlet point
        result = shapenetwork.Build(sf, 0, 0, 10, MapWinGIS.AmbiguityResolution.DISTANCE_TO_OUTLET)
        'Close the shape network
        shapenetwork.Close()
    End Sub
  

VB 6 Usage
Function Close() As Boolean
            Parameters

Sample Code

    Private Sub CloseNetwork()
        Dim sf As New MapWinGIS.Shapefile
        Dim shapenetwork As New MapWinGIS.shapenetwork
        Dim result As Long
        'Open a line shapefile
        sf.Open ("C:\test.shp")
        'Build a shape network from the shapefile using shape 0 as the outlet shape and point 0 in shape 0 as the outlet point
        result = shapenetwork.Build(sf, 0, 0, 10, MapWinGIS.AmbiguityResolution.DISTANCE_TO_OUTLET)
        'Close the shape network
        shapenetwork.Close
    End Sub