Imports Infragistics.Windows
Imports Infragistics.Windows.Controls
Imports Infragistics.Windows.Editors
Imports Infragistics.Windows.DataPresenter
Imports Infragistics.Windows.DataPresenter.Events
Private Sub Dp_CustomFilterSelectionControlOpening(ByVal sender As Object, ByVal e As CustomFilterSelectionControlOpeningEventArgs)
' RecordFilter returns the filter that is to be manipulated by the custom
' filter dialog.
Dim filter As RecordFilter = e.RecordFilter
' You can get the field for which the custom filter dialog is opening by
' using the RecordFilter's Field property.
Dim field As Field = filter.Field
' Control property returns the CustomFilterSelectionControl that will
' be displayed.
Dim customFilterControl As CustomFilterSelectionControl = e.Control
' Print a message.
Debug.WriteLine("Custom filter dialog is being displayed for field " & field.Name)
' You can set Cancel to true to prevent the data presenter from displaying
' the custom filter dialog.
e.Cancel = True
' Setting Cancel to true lets you display display your own custom filter
' dialog. All you need to do is update the e.RecordFilter with the conditions
' that the user selects from your custom dialog.
End Sub