MouseWheel()
Syntaxe
Resultat = MouseWheel()Description
Teste la molette centrale de la souris.
Arguments
Aucun.
Valeur de retour
Renvoie le nombre de "ticks" (unité pas-à-pas du système) réalisé par la molette de la souris depuis le dernier appel de cette fonction.
Remarques
La valeur est positive si la molette a été déplacée vers l'avant et négative si la molette a été déplacée vers l'arrière.
ExamineMouse() doit être appelé avant cette fonction pour mettre les informations sur la souris à jour.
Exemple
; Initialisation du monde 2D InitSprite() InitKeyboard() InitMouse() ; Ouverture de la fenêtre OpenWindow(0,0,0,800,600,"Souris - Utiliser la molette",#PB_Window_ScreenCentered|#PB_Window_SystemMenu) OpenWindowedScreen(WindowID(0),0,0,800,600,1,0,0) ; Gestion de la fenêtre et de l'écran Repeat Repeat ; Gestion de la fenêtre Event = WindowEvent() Until Event = 0 ExamineMouse() ; Etat de la souris ; Molette de la souris = Rotation du curseur tiks = MouseWheel() ; Affichage de l'état des boutons de la souris StartDrawing(ScreenOutput()) DrawText(10,10, "Appuyer sur une touche du clavier pour quitter.", RGB(255,255,0)) DrawText(250,180, "Utilisez la molette centrale de la souris.", RGB(255,0,0),RGB(255,255,0)) If tiks > 0 DrawText(250,230, "Molette vers le haut" , RGB(255,0,0), RGB(255,255,0)) Delay(100) ElseIf tiks < 0 DrawText(450,230, "Molette vers le bas" , RGB(255,0,0), RGB(255,255,0)) Delay(100) Else DrawText(350,230, "Molette au repos" , RGB(255,255,255)) EndIf StopDrawing() FlipBuffers() ClearScreen(RGB(0,0,0)) ExamineKeyboard() Until KeyboardPushed(#PB_Key_All) End
Voir aussi
ExamineMouse()
OS Supportés
Windows