DEFINITION MODULE Editor; (* * REPERTOIRE * Release 1.6 * By Charles Bradford and Cole Brecheen * (c) Copyright 1985-1992 PMI * Green Bay, Wisconsin * All rights reserved * (414) 468-6040 * * $Header: D:/logfiles/defs/editor.dev 1.4 30 Dec 1990 18:00:06 coleb $ * *) IMPORT GenLists; IMPORT KbdInput; IMPORT MsColors; IMPORT ScrnTypes; IMPORT VEditor; VAR overwriting, DoCounting : BOOLEAN; MaxLines, EdLastKey, EntryBox, ExitBox, CountRow : CARDINAL; EntryForeColor, EntryBackColor, ExitForeColor, ExitBackColor, EntryForeBox, EntryBackBox, ExitForeBox, ExitBackBox, EdPromptFore, EdPromptBack: MsColors.AColor; EntryAttrib, ExitAttrib, EdPromptAttrib: MsColors.AMonoAttribute; PROCEDURE ScrnEdit(Col1, Row1, Col2, Row2 : CARDINAL; VAR TheList : GenLists.GenList; VAR TextRow1, CursorCol, CursorRow: CARDINAL; VAR ChangeMade: BOOLEAN; ReadOnly: BOOLEAN; VAR FrameRec: ScrnTypes.DisplayFrame): INTEGER; PROCEDURE DefaultEditor( VAR TheList: GenLists.GenList; VAR Rec: VEditor.AnEdControlRec); PROCEDURE Init(); END Editor.