home *** CD-ROM | disk | FTP | other *** search
/ Turbo Toolbox / Turbo_Toolbox.iso / 1987 / 07 / grafik / grafvar.pas < prev    next >
Encoding:
Pascal/Delphi Source File  |  1994-03-29  |  1.1 KB  |  27 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.  
  14. (*-------------------------------------------------------------------------*)
  15. (*                            GRAFVAR.ERW                                  *)
  16. (*                Variablen fuer das Windowhandling                        *)
  17.  
  18.     Window : WinFeld;         (* Zeiger auf die Daten der Fenster/Viewports *)
  19.     AktWin : WinNrBereich;    (* Nr des gerade aktuellen Fenster *)
  20.  
  21. (*-------------------------------------------------------------------------*)
  22. (*                          Ende GRAFVAR.ERW                               *)
  23.  
  24.  
  25. (*------------------------------------------------------------*)
  26. (*                  Ende von GRAFVAR.PAS                      *)
  27.