<> <> <<>> <> DIRECTORY BiScrollers, Imager, ViewerClasses; BiScrollersExtras2: CEDAR DEFINITIONS = BEGIN OPEN BiScrollers; <> CreateDraw: PROC [viewerInfo: ViewerClasses.ViewerRec, bs: BiScroller, font: Imager.Font _ NIL] RETURNS [button: Viewer]; ToIP: PUBLIC PROC [bs: BiScroller, fileName, defaultExtension: ROPE _ NIL] RETURNS [writtenName: ROPE, width, height: REAL]; END.