Buchempfehlung
Mikrocomputertechnik mit Controllern der Atmel AVR-RISC-Familie
Mikrocomputertechnik mit Controllern der Atmel AVR-RISC-Familie
Umfassend, aber leicht verständlich führt dieses Buch in die Programmierung von ATMEL AVR Mikrocontrollern ein. [Mehr Infos...]
FreeBASIC-Chat
Es sind Benutzer im FreeBASIC-Chat online.
(Stand:  )
FreeBASIC bei Twitter
Twitter FreeBASIC-Nachrichten jetzt auch über Twitter erhalten. Follow us!

Referenz - SETMOUSE

Referenz-Navigation

 

Syntax: SETMOUSE [x][,[y][, [cursor][, clip]]]
Typ: Anweisung
Kategorie: Benutzereingabe

SETMOUSE setzt die Koordinaten des Mauscursors und bestimmt, ob die Maus sichtbar oder unsichtbar ist.

Beispiel:

Dim As Integer x, y, buttons, clip
'erstellt eine Fenster 800x600, 32-Bit Farbe, 1 Seite
Screenres 800, 600, 32, 1

Do
  ' Mausposition ermitteln und ausgeben.
  GetMouse x, y , , buttons, clip
  Locate 1, 1
  PRINT x, y, Bin(buttons, 3), clip

  If buttons = 1 Then     'linke Maustaste
    SetMouse 400, 300, 1, 0 'Mauspfeil sichtbar und zentrieren
  End If
  If buttons = 2 Then     'rechte Maustaste
    SetMouse 400, 300,1,1 'Mauspfeil auf das Fenster begrenzt
  End If
  If buttons = 4 Then     'mittlere Maustaste
    SetMouse 400, 300, 0, 0 'Mauspfeil unsichtbar
  End If
Loop Until MultiKey(1)

Unterschiede zu QB: neu in FreeBASIC

Unterschiede zu früheren Versionen von FreeBASIC:

Unterschiede unter den FB-Dialektformen:
In der Dialektform Befehlsreferenzeintrag-lang qb steht SETMOUSE nicht zur Verfügung und kann nur über __SETMOUSE aufgerufen werden.

Siehe auch:
BefehlsreferenzeintragSCREENRES, BefehlsreferenzeintragGETMOUSE, BefehlsreferenzeintragBenutzereingaben


Zusätzliche Informationen und Funktionen
  • Der Referenzeintrag wurde am 02.08.2007 von Redakteurnemored angelegt.
  • Die aktuellste Version wurde am 22.12.2012 von Redakteurnemored gespeichert.
  Versionen Versionen