DIRECTORY GriffinStyle USING [InternalFont], StyleDefs USING [StyleHandle, Font], PointDefs USING [ScrPt,ObjPt], Rope USING [ROPE]; GriffinText: CEDAR DEFINITIONS ~ BEGIN ROPE: TYPE = Rope.ROPE; InternalFont: TYPE = GriffinStyle.InternalFont; ScrPt: TYPE = PointDefs.ScrPt; StyleHandle: TYPE = StyleDefs.StyleHandle; GetFileName: PROC[wDir: ROPE] RETURNS[ROPE]; GetCaption: PROC RETURNS[ROPE]; GetBoundingBox: PROC[text: ROPE, style: StyleHandle, anchor: PointDefs.ObjPt] RETURNS[tl,br: ScrPt]; EditCaption: PROC[caption: ROPE]; GetFont: PROC RETURNS[StyleDefs.Font]; SetFont: PROC [font: StyleDefs.Font]; END. ΊGriffinText.mesa Copyright c 1985 by Xerox Corporation. All rights reserved. Written by: Maureen Stone, September 20, 1985 1:15:31 pm PDT Called from PreStore and Restore. Return a full file path name Called by FileOps Called by Caption (DrawOps) Hand the selected caption to the editing routine. Called by Modify (DrawOps) called when? need to update current style when appropriate. Called by SetCurrentStyle (GriffinStyleImpl) Κc˜codešœ Οkœ™Kšœ Οmœ1™