Source position: dbgrids.pas line 123
type TDbGridCellHintEvent = procedure(
Sender: TObject;
Column: TColumn;
var AText:
) of object;