Node info.
[Visual Basic .NET] Public Function get_NodeEditInfo ( _ ByVal nodeIndex As Integer _ ) As Integer
[C#] public int get_NodeEditInfo ( int nodeIndex );
[C++]
HRESULT get_NodeEditInfo(
long nodeIndex,
long* pInfo
);
[C++]Parameters
nodeIndex [in] nodeIndex is a parameter of type long pInfo [out, retval] pInfo is a parameter of type long
Product Availability
Available with ArcGIS Engine, ArcGIS Desktop, and ArcGIS Server.
Description
Returns a long that's used to provide information about the nature of the node (i.e. original, snapped, densified). The long is compared with a bitwise operator against esriTinNodeEditInfo enumeration values. This is done because a node may have multiple values at once. For example, a node may be considered densified because it was added by the software where two breaklines intersected. It is both a densified node and an intersection.
The node information is not persisted to disk. It exists while the TIN is being constructed and before it's saved. Once saved, the information is lost.
Public Sub ReportNodeInfo(pTinAdv As ITinAdvanced2, lNodeIndex As Long)
Dim pNodeInfo As ITinNodeInfo
Set pNodeInfo = pTinAdv
Dim sInfo As String
Dim lNodeInfo As Long
lNodeInfo = pNodeInfo.NodeEditInfo(lNodeIndex)
If ((lNodeInfo And esriTinNodeDensified)) Then
sInfo = sInfo & "Densified" & vbCrLf
End If
If ((lNodeInfo And esriTinNodeIntersection)) Then
sInfo = sInfo & "Intersection" & vbCrLf
End If
If ((lNodeInfo And esriTinNodeLineTouch)) Then
sInfo = sInfo & "LineTouch" & vbCrLf
End If
If ((lNodeInfo And esriTinNodeCoincident)) Then
sInfo = sInfo & "Coincident" & vbCrLf
End If
If ((lNodeInfo And esriTinNodeLineEnforce)) Then
sInfo = sInfo & "LineEnforce" & vbCrLf
End If
If ((lNodeInfo And esriTinNodeOriginal)) Then
sInfo = sInfo & "Original" & vbCrLf
End If
If ((lNodeInfo And esriTinNodeSnap)) Then
sInfo = sInfo & "Snap" & vbCrLf
End If
If ((lNodeInfo And esriTinNodeSuperNode)) Then
sInfo = sInfo & "SuperNode" & vbCrLf
End If
If ((lNodeInfo And esriTinNodeUnknown)) Then
sInfo = sInfo & "Unknown" & vbCrLf
End If
MsgBox sInfo
End Sub