TKGridRect

type TKGridRect = record

  case Integer of

    0: (

        Col1: Integer;

        Row1: Integer;

        Col2: Integer;

        Row2: Integer;

      );

    1: (

        Cell1: TKGridCoord;

        Cell2: TKGridCoord;

      );

end;