Transformer le curseur de la souris en sablier ....
zekmek
-
13 juil. 2001 à 13:25
surfzoid
Messages postés463Date d'inscriptionvendredi 15 août 2003StatutMembreDernière intervention21 avril 2010
-
8 oct. 2003 à 00:00
J'ai 2 bouton, "executer" et "annuler". Comment puis je faire pour transformer le curseur de ma souris en sablier pendant le traitement (apres click sur "executer") ? Mais je voudrais que bien qu'il soit en sablier, je puisse clicker sur "annuler". Bien sur quand le traitement est fini, il faut qu'il redevienne normal ...
surfzoid
Messages postés463Date d'inscriptionvendredi 15 août 2003StatutMembreDernière intervention21 avril 2010 8 oct. 2003 à 00:00
c simple sur ton bouton executer la premiere action que tu fais c
Command1.Enabled = False
comme ca ton bouton devient disable (grisé) pas besoin d executé lorsqu on execute !!
ensuite sur tout les objets graphiques de ton apli qui se trouve autour du bouton annuler tu dis
dans leur evenements MouseMove (par ex :Form_MouseMove)
If Command1.Enabled = False Then
Screen.MousePointer = 11
Else
Screen.MousePointer = vbDefault
End If
ensuite tu l' aura deviner sur l evenement mousemove de ton bouton annule tu met tout simplement
Screen.MousePointer = vbDefault
pour resume quand tu execute ton bouton exec prend la valeur false et tout le temps qu il est a false si tu bouge ton curseur de souris sur le bouton annule tu as un vbdefault et sur tout le rest un 11(sablier)
parcontre n oublit pas a la fin de l execution de faire
Command1.Enabled = True
car sinon ton bouton exec restera disable
voila voili voilou Bonne prog et fait moi savoir si ca ta aidé
@+
:big)