TDisplay

type TDisplay = class(TCustomDrivenDisplay)

public

const

  Nokia84x48 = record = (X: 84; Y: 48)

public

  X: Integer;

  Y: Integer;

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

  class operator subtract(TPoint2i,TPoint2i):TPoint2i();

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

  class operator divide(TPoint2i,TPoint2i):TPoint2i();

  class operator negative(TPoint2i):TPoint2i();

  class operator multiply(TPoint2i,VectorInt):TPoint2i();

  class operator multiply(VectorInt,TPoint2i):TPoint2i();

  class operator divide(TPoint2i,VectorInt):TPoint2i();

  class operator divide(TPoint2i,VectorFloat):TPoint2i();

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

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

  function Swap;

  function Empty;

  function Length;

  function Distance();

  function Angle;

  function Dot();

  function Cross();

  function Lerp();

  function InsideTriangle();

end;

protected

  procedure InitSequence; override;

  procedure PresentBuffer(); override;

  function ReadPixel(); override;

  procedure WritePixel(); override;

  function GetScanline(); override;

public

  constructor Create();

  property ScreenSize: TPoint2i; [r]

  property Contrast: Integer; [rw]

end;

TDisplay

TCustomDrivenDisplay

TCustomDisplay

TConceptualPixelSurface

TObject