GETMOUSEX |
Demande le X de la souris |
|---|---|
| Free Pascal | Mouse |
Syntaxe
| Function GetMouseX:Word; |
Description
Cette fonction permet de demander la position horizontal courante du pointeur de la souris.
Remarques
- Windows : Si vous développez vos programmes avec un «Target Win32», vous devriez plutôt utiliser l'unité WinMouse, voir la fonction WinMouse.GetMouseState.
- Terminal Linux : Si vous développez des applications sous le terminal Linux, vous devriez plutôt utiliser l'unité GPM et la bibliothèque «General Purpose Mouse interface».
Exemple
Voici un exemple d'utilisation de cette fonction :
- Program GetMouseXSamples;
-
- Uses Crt,mouse;
-
- Var
- X,OldX:Word;
-
- BEGIN
- InitMouse;
- ClrScr;
- GotoXY(1,1);
- WriteLn('Déplacer la souris pour voir GetMouseX bouger');
- WriteLn('Presse une touche clavier pour quitter');
- OldX := -1;
- Repeat
- X:=GetMouseX;
- If(OldX <> X)Then Begin
- GotoXY(1,4);
- Writeln('Position : Colonne texte = ',X:4);
- OldX := X;
- End;
- Until (GetMouseButtons<>0)or(Keypressed);
- DoneMouse;
- END.
Voir également
Langage de programmation - FreePascal - Référence procédures et fonctions - GetMouseButtons
Langage de programmation - FreePascal - Référence procédures et fonctions - GetMouseEvent
Langage de programmation - FreePascal - Référence procédures et fonctions - GetMouseY
Interruption 33h : Interface du pilote de souris
Technologie - Informatique - Souris
Dernière mise à jour : Samedi, le 13 février 2016