Source position: kgrids.pas line 748
type TKGridDrawCellEvent = procedure(
Sender: TObject;
ACol: Integer;
ARow: Integer;
R: TRect;
State: TKGridDrawState
) of object;