AddPoint Method

Syntax

CWIMAQRegions.AddPoint Point

Return Type

CWIMAQRegion

The region object that was added.

Purpose

Adds a point region to the regions collection.

Remarks

This method makes a copy of the input point.

Parameters

Point As CWIMAQPoint

The point to add.

Example

Private Sub Run_Click()
    'Create a point
    Dim Point As New CWIMAQPoint
    Point.Initialize 100, 100
    
    'Add the point to the viewer's regions collection.
    CWIMAQViewer1.Regions.AddPoint Point

    If TypeName(Point) = "Nothing" Then
    MsgBox "Number of points exceeded!"
    Else
    MsgBox "You added a point." 
    End If
End Sub