Source position: grids.pas line 307
type TUserCheckBoxBitmapEvent = procedure(
Sender: TObject;
const CheckedState: TCheckBoxState;
ABitmap: TBitmap
) of object;