MOUSE Maus Window Turbo Pascal

aus Paswiki Turbo Pascal, der freien Wissensdatenbank

Beschreibung

Mit dieser Prozedur läßt sich das Bewegungsgebiet des Mauszeiger auf das mit x1|y1 (linke obere Ecke) und x2|y2 (rechte untere Ecke) angegebene Rechteck beschränken.

vgl. - Maus_SetZeiger

Deklaration

UNIT Mouse;
PROCEDURE Maus_Window(x1, y1, x2, y2 : Integer);

Beispiel

PROGRAM Test; 
USES GFX, Mouse, Crt;
BEGIN
  InitGraph(Mode800x600x16);  { Grafikmodus initialisieren }
  InitMaus;                   { Maus wird initialisiert }
  Maus_Window(300, 300, 400, 400);
  REPEAT                      { Schleife }
  UNTIL Maus_Click(0, 0, GetMaxX, GetMaxY, mb_left); { Schleife durchlaufen, bis mit der }
                                           { Maus links auf den Bildschirm geklickt wird } 
  DoneMaus;                   { Maus abschalten }
END.

---