home *** CD-ROM | disk | FTP | other *** search
/ Turbo Toolbox / Turbo_Toolbox.iso / 1987 / 08 / grafkurs / graftype.erw < prev    next >
Encoding:
Text File  |  1987-06-01  |  975 b   |  18 lines
  1. (*------------------------------------------------------------*)
  2. (*                     GRAFTYPE.ERW                           *)
  3. (* Erweiterung zu dem Typendefinitionsfile GRAFCONS.PAS der   *)
  4. (* Grafikserie, um Zeichenausgabe zu handhaben.               *)
  5.  
  6.   TCellElemIndex = 0..CellSize;            (* fuer Compiler-  *)
  7.   TCellIndex = CellMin..CellMax;           (* Range-Check     *)
  8.   TCellRow = ARRAY[TCellElemIndex] OF BOOLEAN; (* Zellenreihe *)
  9.   TCell = ARRAY[TCellElemIndex] OF TCellRow;  (* Zeichenzelle *)
  10.   TFont = ARRAY[TCellIndex] OF TCell;         (* Zeichensatz  *)
  11.                           (* Schreibmodus der Zeichenausgabe: *)
  12.   TWriteMode = (ReplaceMode,TransparentMode);
  13.   TGrafStr = STRING[255];  (* ggf. durch PACKED ARRAY OF CHAR *)
  14.                            (* ersetzen!                       *)
  15.  
  16. (*------------------------------------------------------------*)
  17. (*                  Ende GRAFTYPE.ERW                         *)
  18.