ProgressBar fluide [Résolu]

Signaler
Messages postés
16
Date d'inscription
mercredi 20 avril 2016
Statut
Membre
Dernière intervention
5 juillet 2016
-
Messages postés
2171
Date d'inscription
samedi 11 janvier 2014
Statut
Contributeur
Dernière intervention
11 juillet 2020
-
Bonjour à tous! :-)


J'ai créer un logiciel qui comporte, entre autres, une progressBar et un label.
Il contient aussi le bout de code suivant qui sert de timer :

    Friend Sub hbwait(ByVal ms_to_wait As Long)
Dim endwait As Double
endwait = Environment.TickCount + ms_to_wait
While Environment.TickCount < endwait
System.Threading.Thread.Sleep(1)
Application.DoEvents()
End While
End Sub


En fait, la barre de progression se met à jour grâce à un code qui utilise ma fonction hbwait. Seulement, le scintillement de la progressBar se bloque à certains endroit : ce qui rend la chose... graphiquement moche.

J'ai tenté de fluidifier ma progressBar en ajoutant des points, toujours le même problème.
Puis, j'ai analysé le code hbwait, "sleep". J'ai donc suspecté cette mise en veille du code de "mêtre en veille" du scintillement de la progresse bar.

Question dans un premier temps : mon raisonnement est-il juste? Est-ce bien à cause du Sleep?


Deuxième question :

J'ai tenté de supprimer cette ligne (étant donné que je n'ai en fait pas besoin d'endormir le programme). Mais il se passe quelque chose d'étrange : la mise à jour du label ne se fait pas ou est très mauvaise. Par exemple : si mon premier mot affiché est plus long que le second mot affiché, la fin du premier mot est affiché en même temps que le second mot.
De plus, je n'ai plus le scintillement de la progressBar (mais ça, c'est moins grave.)

Pourquoi?


Je vous remercie d'avance de votre réponse! :-)

3 réponses

Messages postés
2171
Date d'inscription
samedi 11 janvier 2014
Statut
Contributeur
Dernière intervention
11 juillet 2020
110
Bonjour
Lorsque tu fais la mise à jour du label fais-tu un
Label.Refresh()

Messages postés
16
Date d'inscription
mercredi 20 avril 2016
Statut
Membre
Dernière intervention
5 juillet 2016

Bonjour vb95 et merci de ta réponse!

J'ai testé de mettre un refresh après chaque changement de texte. Malheureusement, j'ai toujours le mot1 en arrière plan..
Messages postés
2171
Date d'inscription
samedi 11 janvier 2014
Statut
Contributeur
Dernière intervention
11 juillet 2020
110
Tu aurais donc 2 mots qui se chevauchent sur le même label ?
Messages postés
16
Date d'inscription
mercredi 20 avril 2016
Statut
Membre
Dernière intervention
5 juillet 2016

Tout à fait, c'est étrange, comme si j'avais mon mot1 puis j'avais collé une étiquette avec le mot 2 par dessus! Et donc si le mot1 est plus long que le mot2, on voit la fin du mot1...
Messages postés
2171
Date d'inscription
samedi 11 janvier 2014
Statut
Contributeur
Dernière intervention
11 juillet 2020
110 >
Messages postés
16
Date d'inscription
mercredi 20 avril 2016
Statut
Membre
Dernière intervention
5 juillet 2016

Tu n'aurais pas 2 label qui sont à la même position mais avec celui en premier plan qui aurait comme couleur Transparent
Messages postés
16
Date d'inscription
mercredi 20 avril 2016
Statut
Membre
Dernière intervention
5 juillet 2016

Mmmh, je viens de remarquer le problème du label...
En fait, je mets aussi 'Application.DoEvents()' du programme de hbwait en commentaire.
Donc si je le place avant de refresh le label, ça marche.

Mais je ne comprend pas son implication, pourquoi il agit sur ce qui est en dehors du programme?
Messages postés
2171
Date d'inscription
samedi 11 janvier 2014
Statut
Contributeur
Dernière intervention
11 juillet 2020
110
Je t'avoue que je n'arrive ni à comprendre le problème exact ni la solution que tu y as apportée !
Je ne suis pas devant ton application !
Messages postés
16
Date d'inscription
mercredi 20 avril 2016
Statut
Membre
Dernière intervention
5 juillet 2016

Je te remercie de t'être penché sur le problème en tout cas! :-)
Messages postés
2171
Date d'inscription
samedi 11 janvier 2014
Statut
Contributeur
Dernière intervention
11 juillet 2020
110 >
Messages postés
16
Date d'inscription
mercredi 20 avril 2016
Statut
Membre
Dernière intervention
5 juillet 2016

De rien