Dear friends
i have developed ArcMap desktop tool which overrides existing (using sample code)Arcmap identify tool where some layers excluded for displaying information.The code works fine without any error but the issue is old identify window shows up which does not have sorting and other options in the window.Kindly help me for this issue.
Public Sub DoIdentify(ByVal x As System.Int32, ByVal y As System.Int32)
Dim pMxdoc As IMxDocument
Dim activeView As IActiveView
Dim trackCancel As ITrackCancel = New CancelTrackerClass()
pMxdoc = m_application.Document
activeView = pMxdoc.ActiveView
If activeView Is Nothing Then
Return
End If
Dim map As IMap = activeView.FocusMap
Dim identifyDialog As IIdentifyDialog = New IdentifyDialog
identifyDialog.Map = map
'Clear the dialog on each mouse click
identifyDialog.ClearLayers()
Dim screenDisplay As ESRI.ArcGIS.Display.IScreenDisplay = activeView.ScreenDisplay
Dim display As ESRI.ArcGIS.Display.IDisplay = screenDisplay ' Implicit Cast
identifyDialog.Display = display
Dim identifyDialogProps As IIdentifyDialogProps = CType(identifyDialog, IIdentifyDialogProps) ' Explicit Cast
Dim enumLayer As ESRI.ArcGIS.Carto.IEnumLayer = identifyDialogProps.Layers
enumLayer.Reset()
Dim layer As ESRI.ArcGIS.Carto.ILayer = enumLayer.Next
'
Do While Not (layer Is Nothing)
If CheckLayerCantainsInLayerList(layer) = False Then
identifyDialog.AddLayerIdentifyPoint(layer, x, y)
End If
layer = enumLayer.Next()
Loop
identifyDialog.Show()
End Sub
