dps/src/DLWindow.i3


Copyright (C) 1994, Digital Equipment Corp.

INTERFACE DLWindow;

IMPORT DisplayList, DPS, DPSWindow;

TYPE T = DPSWindow.T OBJECT
   displayList: DisplayList.R;
  OVERRIDES
   Paint := Paint;
   Mouse := Mouse;
   Char := Char;
   Key := Key;
   KillInputFocus := KillInputFocus;
  END;
The first element in the list is the furthest from the user. The list is painted in normal order and mouse-scanned in reverse order.

CONST BackgroundGray = 1.00;

PROCEDURE Paint (t: T; box: DPS.Box; only: REFANY);
PROCEDURE Mouse (t: T; event: DPS.MouseEvent): BOOLEAN;
PROCEDURE Char (t: T; char: CHAR): BOOLEAN;

PROCEDURE Key (t: T; event: DPS.KeyEvent);

PROCEDURE KillInputFocus (t: T);

  END DLWindow.