Source position: grids.pas line 223
type TGridMessage = record
LclMsg: TLMessage;
Grid: TCustomGrid;
Col: Integer;
Row: Integer;
Value: string;
CellRect: TRect;
Options: Integer;
end;