TRect

type TRect = packed record

public

  constructor Create();

  class operator equal(TRect,TRect):Boolean();

  class operator notequal(TRect,TRect):Boolean();

  class operator add(TRect,TRect):TRect();

  class operator multiply(TRect,TRect):TRect();

  class function Empty;

  procedure NormalizeRect;

  function IsEmpty;

  function Contains();

  function IntersectsWith();

  class function Intersect();

  class function Union();

  procedure Offset();

  procedure SetLocation();

  procedure Inflate();

  function CenterPoint;

  function SplitRect();

  property Height: LongInt; [rw]

  property Width: LongInt; [rw]

  property Size: TSize; [rw]

  property Location: TPoint; [rw]

  case LongInt of

    0: (

        Left: LongInt;

Horizontal position of left edge

        Top: LongInt;

Vertical position of top edge

        Right: LongInt;

Horizontal position of right edge

        Bottom: LongInt;

Vertical position of bottom edge

      );

    1: (

        TopLeft: TPoint;

Position of top-left corner

        BottomRight: TPoint;

Position of bottom-right corner

      );

    2: (

        Vector: TArray4IntegerType;

      );

end;

TPoint

Point in a plane

TSize

Area size