Description Checks if a node is a Detector Entity type.
Syntax deFlag = IsDetectorEntity( entNode )
Parameters deFlag (Boolean) Returned True if the entity being queried is a Detector Entity type. False otherwise.
entNode As Long Node number of the entity being checked.
Example The following example loops over entities in the document, checks to see if the current entity node is a Detector Entity type, issues a delete command and then prints the status of the deletion operation to the output window.
Sub Main
Dim ii As Long Dim success As Boolean Dim entName As String
For ii = GetEntityCount()-1 To 4 Step -1 If IsDetectorEntity( ii ) Then entName = GetFullName( ii ) success = DeleteEntity( ii ) If success Then Print "Entity " & entName & " was deleted from the document." Else Print "Entity " & entName & " failed to delete." End If End If Next ii
Update
End Sub
See Also
|