Name 

Description 

 

TJamSearchEdit = class(TCustomButtonedEdit); 

A TJamSearchEdit is an edit field with an optional button on the right side.
The icons are created from a font symbol (using Segoe UI Symbol if available, else WingDings).
The action executed with the button has to be implemented in the TJamSearchEdit.OnInvokeSearch event. Using TJamSearchEdit.QuickSearch the action will be called automatically while typing after a short delay.  

Name 

Description 

TOnInvokeSearch = procedure (Sender: TObject; const Query: string) of object; 

The event is triggered when the action should take place.