Source position: kgrids.pas line 683
type TKGridCellHintEvent = procedure(
Sender: TObject;
ACol: Integer;
ARow: Integer;
AShow: Boolean
) of object;