TOnDrawCell = procedure (Sender: TObject; aCol, aRow: Integer; aRect: TRect; aState: TGridDrawState)
Параметры: