Comment cacher le curseur de la souris?

0/5 (5 avis)

Snippet vu 23 163 fois - Téléchargée 88 fois

Contenu du snippet

Comment cacher le curseur de la souris?

C'est tout simple, il vous suffit de placer le code suivant, ainsi qu'un bouton, dans votre form:

Source / Exemple :


Private Declare Function ShowCursor Lib "user32" (ByVal bShow As Long) As Long

Private Sub Command1_Click()
     ShowCursor False
End Sub

Conclusion :


Voilà, il est caché!!!!
Pour le faire réaparaître, il suffit de mettre True (Il faut parfois un peu de persévérance, je ne sais pourquoi...)

A voir également

Ajouter un commentaire Commentaires
Seth77 Messages postés 572 Date d'inscription mardi 30 avril 2002 Statut Membre Dernière intervention 4 mai 2020 1
1 sept. 2005 à 22:28
je ne comprend pas ca ne marche pas ... c au niveau de :

while etat >= 0

et de

while etat < 0

???
BozzoDodo Messages postés 185 Date d'inscription vendredi 20 décembre 2002 Statut Membre Dernière intervention 10 janvier 2008
21 juil. 2005 à 19:22
Nan ca marche pas la bonne technique est celle de Khakahan.
bonne prog'
ckuron Messages postés 4 Date d'inscription dimanche 5 mai 2002 Statut Membre Dernière intervention 28 juillet 2003
28 juil. 2003 à 10:03
En fait, la fonction marche très bien,
sauf qu'il faut changer quelques trusc :

Comme tu lui envoi la valeur True ou False, il faut changer sa déclaration en :

Private Declare Function ShowCursor Lib "user32" (ByVal bShow As Boolean) As Boolean

Et voilà, maintenant vous pouvez faire ShowCursor True ou ShowCursor False autant de fois que vous le souhaitez...
cs_Khalahan Messages postés 7 Date d'inscription mercredi 11 septembre 2002 Statut Membre Dernière intervention 8 octobre 2002
12 sept. 2002 à 01:30
si tu le caches 2 fois de suite, tu dois l'afficher 2x de suite. Donc, pour bien utiliser cette fonction il faudrait mettre un :

' Masque le curseur
etat = Showcursor(False)
while etat >= 0
etat = Showcursor(False)
wend

' Affiche le curseur
etat = Showcursor(True)
while etat < 0
etat = Showcursor(True)
wend

ou alors il faudrait l'appeler qu'une seule fois :)
NeoFO Messages postés 30 Date d'inscription mardi 17 octobre 2000 Statut Membre Dernière intervention 18 juin 2002
14 avril 2002 à 10:29
C'est bien mais impossible de le cacher deux foix sans être obliger de redmarrer le prog

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.