File: BitMap3d.mesa
Last edited by Bier on August 1, 1985 2:30:25 pm PDT
Copyright © 1984 by Xerox Corporation. All rights reserved.
Created June 14, 1982 4:21 pm
Contents: calls to ImagerExtra.mesa to double buffer graphics.
DIRECTORY
Imager,
ImagerBackdoor,
ViewerClasses;
BitMap3d: DEFINITIONS =
BEGIN
We draw into the unseen bitmap and then draw that map onto our screen when we want to see the picture.
Bitmap: TYPE = ImagerBackdoor.Bitmap;
AlternateDisplayContext: TYPE = REF AlternateDisplayContextObj;
AlternateDisplayContextObj:
TYPE =
RECORD [
dc: Imager.Context,
bitMap: Bitmap];
Viewer: TYPE = ViewerClasses.Viewer;
DrawAltDisplayContext: PROC [dc: Imager.Context, altDC: AlternateDisplayContext];
GetAltDisplayContext: PROC RETURNS [altDC: AlternateDisplayContext];
ResizeBitMap: PROC [viewer: Viewer, altDC: AlternateDisplayContext]; -- must resize each time viewer changes size.
Erase: PROC [altDC: AlternateDisplayContext];
END.