Source position: dbgrids.pas line 102
type TDrawColumnCellEvent = procedure(
Sender: TObject;
const Rect: TRect;
DataCol: Integer;
Column: TColumn;
State: TGridDrawState
) of object;