UNIT CHKBOX;

(* ******************************************************************** *)
(* K L A S S E : CCheckBox                                              *)
(* -------------------------------------------------------------------- *)
(* Version     : 1.0                                                    *)
(* Autor       : S. Spolwig, OSZ-Handel I,  10997 Berlin                *)
(*                                                                      *)
(* Dateiname   : chkbox.pas                                             *)
(*                                                                      *)
(* Aufgabe     : JA/NEIN-Schalter mit den Tasten RETURN und ESC         *)
(*                                                                      *)
(* Compiler    : Turbo Pascal 7.0 / MSDOS                               *)
(* Aenderung   : 11-NOV-97                                              *)
(* ******************************************************************** *)

INTERFACE
(* ========================== Export ================================== *)

USES TXTBOX;

type
  CCheckBox = object (CTextbox)
                constructor Init (eineXPos, eineYPos, eineLaenge,eineHoehe,
                                  einRahmen : integer; einTitel : string);

                function AbbruchGedrueckt : boolean;
              end;

var Checkbox : CCheckbox;

(*  ----------------- B e s c h r e i b u n g -------------------------

Oberklasse    : TEXTBOX
Bezugsklassen : -
benutze Module: ASCII


Methoden
--------

Init (eineXPos, eineYPos, eineLaenge,eineHoehe,
     einRahmen : integer; einTitel : string);

   Aufgabe: initialisiert CTextbox und Farben
   vorher : -
   nachher: Textfarbe ist GELB, Hintergrundfarbe ist ROT


AbbruchGedrueckt : boolean

   Anfrage: Zeigen und anfragen, ob RETURN oder ESC gedrueckt wurde
   vorher : -
   nachher: AbbruchGedrueckt ist true, wenn ESC gedrueckt wurde

----------------------------------------------------------------------- *)

Zurück zur Startseite