Source position: TplSearchPanelUnit.pas line 60
type TSearchEvent = procedure(
Sender: TObject;
incremental: Boolean;
backwards: Boolean
) of object;