GIF ANIMÉS DANS UNE FORM [SANS DLL ET OCX]
cs_zerty
Messages postés
37
Date d'inscription
lundi 9 octobre 2000
Statut
Membre
Dernière intervention
1 juillet 2008
-
6 janv. 2002 à 18:30
cs_the_best Messages postés 212 Date d'inscription jeudi 13 novembre 2003 Statut Membre Dernière intervention 6 avril 2006 - 18 avril 2005 à 09:25
cs_the_best Messages postés 212 Date d'inscription jeudi 13 novembre 2003 Statut Membre Dernière intervention 6 avril 2006 - 18 avril 2005 à 09:25
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.
https://codes-sources.commentcamarche.net/source/2353-gif-animes-dans-une-form-sans-dll-et-ocx
https://codes-sources.commentcamarche.net/source/2353-gif-animes-dans-une-form-sans-dll-et-ocx
18 avril 2005 à 09:25
10 mars 2005 à 14:14
http://www.vbfrance.com/code.aspx?ID=24041
Je ne vois pas de différence ! Y en a t'il une ???
25 févr. 2005 à 17:05
A vous de voir si c'est OK.
A+
Private Sub tmrAnim_Timer()
Dim i As Integer
AnimatedGIF(FrameCount).Visible = False
If FrameCount < TotalFrames Then
FrameCount = FrameCount + 1
AnimatedGIF(FrameCount).Visible = True
tmrAnim.Interval = CLng(AnimatedGIF(FrameCount).Tag)
Else
AnimatedGIF(FrameCount).Visible = False
FrameCount = 0
AnimatedGIF(FrameCount).Visible = True
(FrameCount).Tag)
End If
End Sub
9 août 2004 à 23:39
Du coup, je cherche un truc plus standard (genre y a rien à faire du tout coté code).
Mais c'est clair que ce source est quand même pas mal du tout...
12 mars 2004 à 20:57
27 mars 2002 à 23:37
27 mars 2002 à 22:58