GefPolylineFormat.GetVertex (method)

Gets the postion of a point on the poly object.

Syntax:

Boolean = object.GetVertex ( Index, X, Y )

Parameters:

Index As long -

X As long* -

Y As long* -

Description:

The GetVertex method gets the location of a point on the poly object.

Example:

Sub PolylineFormat_GetVertex()

Dim oCimObj As GefObject

    Dim oCimPolyFmt As
GefPolylineFormat

    Dim nXCord As Long
    Dim nYCord As Long

    Set oCimObj = CimGetObject

    Set oCimPolyFmt =
oCimObj.PolylineFormat

    If Not oCimPolyFmt Is Nothing
Then

        If
oCimPolyFmt.GetVertex(oCimPolyFmt.VertexCount - 1, nXCord, nYCord)
= True Then

            MsgBox
"The postion on the screen for the last point is " & nXCord /
20 & ", " & nYCord / 20

        End
If

End If

End Sub