Allows drawing a background of a toolbar button
TSRVDrawButtonEvent = procedure(Sender: TObject; ToolButton: TSRVToolButton;
ACanvas: TCanvas; const ARect: TRect; Selected: Boolean;
var DoDefault: Boolean) of object;
property OnDrawButtonBackground: TSRVDrawButtonEvent;
ToolButton – the button to draw (one of Buttons)
The button must be drawn in the rectangle ARect on ACanvas.
You can check if the button is pressed: ToolButton.Down. If the button is below the mouse pointer, Selected = True.
If you draw the button background yourself, assign DoDefault = False to cancel default drawing by the toolbar.