Buchempfehlung
Windows-Programmierung. Das Entwicklerhandbuch zur WIN32-API
Windows-Programmierung. Das Entwicklerhandbuch zur WIN32-API
"Der" Petzold, das über 1000 Seiten starke Standardwerk zum Win32-API - besonders nützlich u. a. bei der GUI-Programmierung in FreeBASIC! [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 - GETMOUSE

Referenz-Navigation

 

Syntax: GETMOUSE x, y[, [Rad][, [Buttons][, [Clip]]]]
Typ: Funktion
Kategorie: Benutzereingabe

GETMOUSE liefert die Position der Maus und den Status der Buttons, des Mausrads und des Clipping-Status zurück.

Da beim Bewegen der Maus aus dem Grafikfenster heraus alle Werte auf -1 gesetzt werden und dies im Zusammenhang mit der Button- und Mausrad-Abfrage zu Fehlinterpretationen führen kann, sollte immer der Rückgabewert der Funktion geprüft werden.

Beispiel:

Dim As Integer x, y, buttons, Ergebnis

' Grafikfenster 320x200x8 setzen
Screenres 320, 200

Do
    ' Lade Mauskoordinaten ohne Mausrad:
    Ergebnis = GetMouse (x, y, , buttons)
    ' Mauskoordinaten ermittelt. Informationen ausgeben:
    Locate 1, 1
    If Ergebnis <> 0 Then
      Print "Maus nicht vorhanden/nicht im Fenster"
    Else
      Print Using "Maus-Position: ###:###  Buttons: "; x; y;
      ' Es koennen mehrere Maustasten gleichzeitig gedrueckt sein.
      ' Der Status aller Maustasten liegt zusammengefasst als Bitmaske
      ' in der Variable "buttons" vor. Im Folgenden werden die Status
      ' der einzelnen Tasten durch AND-Verknuepfung mit einstelligen
      ' Bitmasken isoliert:
      If buttons And 1 Then Print "L";
      If buttons And 2 Then Print "R";
      If buttons And 4 Then Print "M";
      If buttons And 8 Then Print "X1";
      If buttons And 16 Then Print "X2";
      Print Space(5)
    End If
    Sleep 1   'gegen hohe CPU-Auslastung
Loop While Inkey = ""
End

Unterschiede zu QB: neu in FreeBASIC

Plattformbedingte Unterschiede:

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

Unterschiede zu früheren Versionen von FreeBASIC:

Siehe auch:
BefehlsreferenzeintragSCREENRES, BefehlsreferenzeintragSETMOUSE, BefehlsreferenzeintragBenutzereingaben


Zusätzliche Informationen und Funktionen
  • Der Referenzeintrag wurde am 29.07.2007 von RedakteurJojo angelegt.
  • Die aktuellste Version wurde am 23.11.2016 von AdministratorSebastian gespeichert.
  Versionen Versionen