home *** CD-ROM | disk | FTP | other *** search
/ Prima Shareware 3 / DuCom_Prima-Shareware-3_cd1.bin / PROGRAMO / PASCAL / TPTTOOL / MAUS.DOC < prev    next >
Encoding:
Text File  |  1992-10-28  |  1.8 KB  |  69 lines
  1.                           Anleitung zur Unit MAUS
  2.                           =======================
  3.  
  4.  
  5.   SCHAUEN SIE SICH DAS DEMO AN !
  6.   Denn: Dort werden eigentlich alle Befehle meisterhaft erklärt.
  7.   Weil manche Leute danach immernoch nicht wissen, wie's geht,
  8.   folgt hier eine UKA (Ultrakurzanleitung):
  9.  
  10.   Function Mausinit: Boolean;
  11.     Initialisiert Maus, wenn erfolgreich, dann true.
  12.  
  13.   Procedure Show;
  14.     Zeigt Mauszeiger.
  15.  
  16.   Procedure Hide;
  17.     Versteckt Mauszeiger.
  18.  
  19.   Function MausX: Byte;
  20.     X-Position des Mauszeigers.
  21.  
  22.   Function MausY: Byte;
  23.     Y-Position des Mauszeigers.
  24.  
  25.   Function MausPx: Integer;
  26.     X-Pos in Pixel.
  27.  
  28.   Function MausPy: Integer;
  29.     Y-Pos in Pixel.
  30.  
  31.  
  32.   Alles kapiert bis hier ? Ja? Dann weiter:
  33.  
  34.  
  35.   Function But: ShortInt;
  36.     Status der Knöpfe: 1=Linker Knopf, 2=rechter Knopf, 3=mittlerer Knopf
  37.     Reagiert, wenn Knopf gedrückt.
  38.  
  39.   Function Rel: ShortInt;
  40.     Wie But, doch reagiert diese Function, wenn der Knopf losgelassen wurde.
  41.  
  42.  
  43.   Jetzt kommt der LUXUS:
  44.  
  45.   Function ChkPos(x1,y1,x2,y2,Knopf: Byte): Boolean;
  46.     Diese Function ist true, wenn der Knopf "Knopf" innerhalb des Rechtecks
  47.     (x1,y1) (x2,y2) GEDRÜCKT wurde.
  48.  
  49.   Function RChkPos(x1,y2,x2,y2,Knopf: Byte): Boolean;
  50.     Wie ChkPos, doch reagiert diese Function auf losgelassene Knöpfe.
  51.  
  52.   Procedure SetXY(x1,y1,x2,y2: Byte);
  53.     Steckt den Mauszeiger ins Gefängnis. Im Klartext:
  54.     Setzt einen rechteckigen Bereich, den der Mauszeiger nicht mehr
  55.     verlassen kann (wie graußam, der arme kleine Mauszeiger).
  56.  
  57.   Procedure MausNorm;
  58.     Der Held ! Befreit den Mauszeiger aus seinem SETXY-Gefängnis.
  59.  
  60.   Procedure SetMausXY(x,y: Integer);
  61.     Macht dem Mauszeiger Beine und setzt ihn an die angegebene Position.
  62.  
  63.  
  64.  
  65.  So, daß war jetzt die UKA. Noch Fragen ? Dann DEMO anschauen !
  66.  
  67.  
  68.  
  69.