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.