ポイント グループを使用する

ポイント グループが作成されたら、そのグループ内のすべてのポイントに対して 1 つの操作でアクションを実行できます。ポイントの標高、説明、スタイル、およびラベル スタイルを変更することができます。

' Check to see if a particular point exists in the group.
If (oPtGroup.ContainsPoint(oPoint1.Number) = False) Then
    Debug.Print oPoint1.Name & " is not in the point group."
End If
 
' Set the elevation of all the points in the group to 100.
oPtGroup.Elevation = 100
oPtGroup.OverrideElevation = True

また、ポイント グループを使用して TIN サーフェスを定義または変更できます。AeccTinSurface.PointGroups プロパティは、ポイント グループのコレクションです。 ポイント グループがコレクションに追加されると、そのグループ内のすべてのポイントが TIN サーフェスに追加されます。

' oTinSurf is a valid object of type AeccTinSurface.
' oPointGroup is a valid object of type AeccPointGroup.
oTinSurf.PointGroups.Add oPointGroup