Source position: grids.pas line 351
type TOnSelectEvent = procedure(
Sender: TObject;
aCol: Integer;
aRow: Integer
) of object;