Source position: bcimagebutton.pas line 40
type TOnRenderControl = procedure(
Sender: TObject;
Bitmap: TBGRABitmap;
State: TBCGraphicButtonState
) of object;