home *** CD-ROM | disk | FTP | other *** search
/ Turbo Toolbox / Turbo_Toolbox.iso / 1987 / 09 / grafik6 / grafvar.pas < prev    next >
Encoding:
Pascal/Delphi Source File  |  1987-08-09  |  1.3 KB  |  34 lines
  1. (*------------------------------------------------------------*)
  2. (*                        GRAFVAR.PAS                         *)
  3. (*           Globale Variablen fuer die Grafikserie           *)
  4. (*------------------------------------------------------------*)
  5.  
  6. (* enthaelt die aktuelle Position unseres 'Zeichenstiftes':   *)
  7.   Pen_Xpos: x_Koord;
  8.   Pen_Ypos: y_Koord;
  9.  
  10. (* enthaelt die aktuelle Farbe des selbigen:                  *)
  11.   Pen_Color: Sys_Colors;
  12.  
  13. (*----------- Variablen fuer das Windowhandling --------------*)
  14.  
  15.   Window : WinFeld; (* Zeiger auf Daten der Fenster/Viewports *)
  16.   AktWin : WinNrBereich;   (* Nr des gerade aktuellen Fenster *)
  17.  
  18.  
  19. (*----------- Variablen fuer die Zeichenausgabe --------------*)
  20.  
  21.   Font : TFont;            (* Speicherplatz fuer Zeichensatz. *)
  22.   BoldFont, SmallFont,                 (* Flags fuer Schrift- *)
  23.   KursivFont, DoubleHighFont,          (* Attribute.          *)
  24.   DoubleWideFont              : boolean;
  25.   FontWriteMode : TWriteMode;
  26.  
  27. (*    Variablen fuer Bildsegmentierung (Display-Files).       *)
  28.  
  29.   DFInpArray : tDFArray;   (* Feld fuer Benutzereingaben *)
  30.   SegTab : tSegTab;        (* Die Segmenttabelle         *)
  31.  
  32. (*------------------------------------------------------------*)
  33. (*                  Ende von GRAFVAR.PAS                      *)
  34.