1 unit uLandGraphics;

     1 unit uLandGraphics;

     2 interface

     2 interface

     3 

     4 

     4 type PRangeArray = ^TRangeArray;

     5 type PRangeArray = ^TRangeArray;

     5      TRangeArray = array[0..31] of record

     6      TRangeArray = array[0..31] of record

     6                                    Left, Right: integer;

     7                                    Left, Right: integer;

     7                                    end;

     8                                    end;