MouseLocate()

Syntaxe

MouseLocate(X, Y)

Change la position absolue (en pixels) de la souris dans l'écran courant.

Arguments

X, Y	La nouvelle position du curseur.

Valeur de retour

Aucune.

Remarques

Principalement utilisé avec les commandes MouseX() et MouseY().

Exemple

  ; Initialisation du monde 2D
  InitSprite()
  InitKeyboard()
  InitMouse()
 
  ; Curseur de la souris
  CreateImage(0,20,20)
  StartDrawing(ImageOutput(0))
  Circle(10, 10, 10, RGB(255, 255, 0))
  StopDrawing()
  
  ; Ouverture de la fenêtre
  OpenWindow(0,0,0,800,600,"Souris - MouseLocate",#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
   
   ; 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(100,180, "Bougez la souris puis cliquez pour remettre le curseur au centre de l'écran.", RGB(255,0,0),RGB(255,255,0))
   
   DrawText(MouseX(), MouseY(), "["+Chr(164)+"]", RGB(255,255,0))
   
   If MouseButton(#PB_MouseButton_Left)
     MouseLocate(400, 300)
     DrawText(MouseX(), MouseY(), "["+Chr(164)+"]", RGB(255,255,0))
   EndIf
   
   StopDrawing()
   
   FlipBuffers()
   ClearScreen(RGB(0,0,0)) 
  
   ExamineKeyboard()
  Until KeyboardPushed(#PB_Key_All)
  End

Voir aussi

ExamineMouse(), MouseX(), MouseY()

OS Supportés

Tous