AddPoint Method Example

The following example adds a point to the Polygon object Polygon1.

Dim iPoint as FixFloatPoint

Set iPoint = New FixFloatPoint

iPoint.x = 50.5

iPoint.y = 60.1

Polygon1.AddPoint iPoint