Copyright (C) 1994, Digital Equipment Corp.
Digital Internal Use Only
Created on Tue Jan 17 16:04:49 PST 1995 by najork
INTERFACEWinScrnFont ; IMPORT PaintPrivate, ScrnFont, WinDef; PROCEDURE NewOracle (): ScrnFont.Oracle;
Create a ScrnFont.Oracle suitable for accessing Windows fonts.
PROCEDURE FromFont (font: PaintPrivate.Font): WinDef.HFONT; END WinScrnFont.