ui/src/nt/NTScrnTpRep.i3


Copyright (C) 1994, Digital Equipment Corp.
 by Steve Glassman, Mark Manasse and Greg Nelson 

<*PRAGMA LL*>

UNSAFE INTERFACE NTScrnTpRep;

IMPORT NTScreenType, PaintPrivate, Rect, WinDef, WinGDI;

REVEAL
  NTScreenType.T <: Public;

TYPE
  Public = NTScreenType.Public OBJECT
             optable: REF ARRAY OF OpRecord;
             pmtable: REF ARRAY OF PixmapRecord;
             empty                                := 0
           END;

  (* If pm is a ScrnPixmap.T whose screentype is st, a T, then pm.id is
     either SolidPixmap, or pm.id is the index into st.pmtable of the
     PixmapRecord describing pm, unless st.bits = st, in which case
     SolidPixmap - pm.id is the index in st.bits.pmtable. *)

  OpRecord =
    RECORD
      bg, fg: INTEGER;
      bgMode: INTEGER := WinGDI.TRANSPARENT; (* WinGDI.OPAQUE or
                                                WinGDI.TRANSPARENT *)
      rop: INTEGER;              (* WinGDI.R2_BLACK ..  WinGDI.R2__LAST *)
    END;

  PixmapRecord = RECORD
                   pixmap: WinDef.HBITMAP;
                   domain: Rect.T;
                   depth : INTEGER
                 END;

CONST SolidPixmap: PaintPrivate.Pixmap = -1;

END NTScrnTpRep.