Topspeed_JPI/TS-V3/REP16/EDITOR.DEF

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.