begin process at 2008 07 20 13:11:06
1 213 234 membres
151 nouveaux aujourd'hui
14 166 membres club

Vous ne trouvez pas de réponse à votre problème ? Alors posez la question dans le forum.
Souvenez-vous qu'il n'y a jamais de question bête, mais rester dans l'ignorance parce que l'on n'ose pas poser une question, ça c'est une erreur !

Sujet : rafraichissement images en direct live [ Archives Visual Basic / J'AI BESOIN D'AIDE !!!! :) ] (sly63)

rafraichissement images en direct live le 14/01/2004 12:05:15

sly63
Bonjour,
Simplification du pb:
j'ai une application VB6, avec 3 images (img1, img2, img3) accompagnees de 3 labels (etape1, etape 2, etape 3) et un command button. Au demarrage, les labels sont presents et les images ont la prop visible=false.

Je voudrais que les images apparaissent apres que chaque etape soit realisee, pour montrer la progression du programme. (un peu comme lorsque vous installez un programme)
J'ai donc ecrit un code du style

apres etape1
img1.visible=true
apres etape2
img2.visible=true
apres etape3
img3.visible=true

mon appli est assez rapide (moins d'une minute), et le pb c'est que les images n'apparaissent que quand tout est termine.
J'ai essaye des prop du style refresh, cls, mais ca ne change rien.

Merci de votre aide


Re : rafraichissement images en direct live le 14/01/2004 12:20:10

DARKSIDIOUS
Membre Club
(Admin CS)
Si tes étapes sont dans une boucle, il est possible que ton programme prenne trop de ressources systèmes pour effectuer un affichage des images. A ce moment là, il suffit de mettre un Do Events dans chaque tour de boucle.

DarK Sidious

[Responsable de la rubrique API et responsable VB du site www.ProgOtoP.com]

Re : rafraichissement images en direct live le 14/01/2004 13:16:49

labout

labout
Mets l'instruction
DoEvents
Dans ta boucle et cela devrait marcher.

exemple
Private Sub Command1_Click()
Dim i As Integer
For i = 1 To 32000
DoEvents
If i = 10000 Then
Image1.Visible = True
End If
If i = 20000 Then
Image2.Visible = True
End If
If i = 30000 Then
Image3.Visible = True
End If
Next
End Sub


Classé sous : images, true, visible, apres, etape

Participer à cet échange

Pub



Appels d'offres

Dessins techniques
Budget : 60€
Animation Flash - Doma...
Budget : 370€
Application flash medi...
Budget : 1 000€

CalendriCode

Juillet 2008
LMMJVSD
 123456
78910111213
14151617181920
21222324252627
28293031   

VS Express FR Gratuit !

VS Express en français et 100% gratuit !

Téléchargements

Logiciels à télécharger sur le même thème :

Boutique

Boutique de goodies CodeS-SourceS