MapWinGIS:ShapeNetwork AmbigShapeIndex

This is a back-up of the WIKI.
Not all links might work
We're working on a new wiki.

Main Page | Recent changes | View source | Page history | Log in / create account |

Printable version | Disclaimers | Privacy policy

AmbigShapeIndex

Gets the shape index of an ambiguous shape in the shape network. The first ambiguous shape is at index 0. If there are no ambiguous shapes, AmbigShapeIndex(0) will return -1. If AmbigShapeIndex returns -1 and the index you specified isn't 0, it means there are no more ambiguous shapes in the shape network.


VB.NET Usage

ReadOnly Property AmbigShapeIndex(Index As Integer) As Integer

            Parameters

Index

The index into the ambiguous shapes in the shape network.
ReturnValue The shape index of the ambiguous shape. Returns -1 if there isn't an ambiguous shape at the specified ambiguous shape index.

Sample Code

    Private Sub AmbiguousShape()
        Dim shapenetwork As New MapWinGIS.ShapeNetwork()
        Dim shapeindex As Integer, i As Integer
        'Initialize the shapeindex and i
        shapeindex = 0
        i = 0
        'Get all ambiguous shape indexes in the shape network
        While shapeindex <> -1
            'Get the next ambiguous shapeindex in the shape network
            shapeindex = shapenetwork.AmbigShapeIndex(i)
            'Output the shape index of the ambiguous shape in the shape network
            MsgBox("Ambiguous shape index: " + Str(shapeindex))
            'Increment i
            i = i + 1
        End While
    End Sub
  

VB 6 Usage
ReadOnly Property AmbigShapeIndex(Index As Long) As Long
            Parameters

Index

The index into the ambiguous shapes in the shape network.
ReturnValue The shape index of the ambiguous shape. Returns -1 if there isn't an ambiguous shape at the specified ambiguous shape index.

Sample Code

    Private Sub AmbiguousShape()
        Dim shapenetwork As New MapWinGIS.shapenetwork
        Dim shapeindex As Long, i As Long
        'Initialize the shapeindex and i
        shapeindex = 0
        i = 0
        'Get all ambiguous shape indexes in the shape network
        While shapeindex <> -1
            'Get the next ambiguous shapeindex in the shape network
            shapeindex = shapenetwork.AmbigShapeIndex(i)
            'Output the shape index of the ambiguous shape in the shape network
            MsgBox ("Ambiguous shape index: " + Str(shapeindex))
            'Increment i
            i = i + 1
        Wend
    End Sub

Retrieved from "http://mapwindow.org/wiki/index.php/MapWinGIS:ShapeNetwork_AmbigShapeIndex"

This page has been accessed 1,096 times. This page was last modified on 9 November 2005, at 17:06.