Comment cacher le curseur de la souris?

Soyez le premier à donner votre avis sur cette source.

Snippet vu 21 670 fois - Téléchargée 85 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
Messages postés
572
Date d'inscription
mardi 30 avril 2002
Statut
Membre
Dernière intervention
4 mai 2020

je ne comprend pas ca ne marche pas ... c au niveau de :

while etat >= 0

et de

while etat < 0

???
Messages postés
185
Date d'inscription
vendredi 20 décembre 2002
Statut
Membre
Dernière intervention
10 janvier 2008

Nan ca marche pas la bonne technique est celle de Khakahan.
bonne prog'
Messages postés
4
Date d'inscription
dimanche 5 mai 2002
Statut
Membre
Dernière intervention
28 juillet 2003

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...
Messages postés
7
Date d'inscription
mercredi 11 septembre 2002
Statut
Membre
Dernière intervention
8 octobre 2002

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 :)
Messages postés
30
Date d'inscription
mardi 17 octobre 2000
Statut
Membre
Dernière intervention
18 juin 2002

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.