celleventinfoty

type celleventinfoty = record

  cell: gridcoordty;

  grid: tcustomgrid;

  case eventkind: celleventkindty of

    cek_exit, cek_enter, cek_focusedcellchanged: (

        cellbefore: gridcoordty;

        newcell: gridcoordty;

        selectaction: focuscellactionty;

      );

    cek_select: (

        selected: Boolean;

        accept: Boolean;

      );

    cek_mousemove, cek_mousepark, cek_firstmousepark, cek_buttonpress, cek_buttonrelease: (

        zone: cellzonety;

        mouseeventinfopo: pmouseeventinfoty;

        gridmousepos: pointty;

      );

    cek_keydown, cek_keyup: (

        keyeventinfopo: pkeyeventinfoty;

      );

end;