sivajish
asked on
How to place animated gif's on forms
Dear Sir,
I am not able to keep animated gif pictures on my form.Whenever i place a image box on my form and make its picture property point to an animated gif file , it doesn't work.The animated gif does not animate on the VB form. Can u please suggest me a way to animate the gif image on my form.
I would be very grateful..
Thanking You.
Sivajish.
I am not able to keep animated gif pictures on my form.Whenever i place a image box on my form and make its picture property point to an animated gif file , it doesn't work.The animated gif does not animate on the VB form. Can u please suggest me a way to animate the gif image on my form.
I would be very grateful..
Thanking You.
Sivajish.
ASKER CERTIFIED SOLUTION
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
SOLUTION
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
SOLUTION
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
Hi Sivajish,
THIS IS VERY, VERY EASY.
Just a few days ago I did what you need now, just go to www.gamani.com and download their software (you have a free functional trial) and dissasemble the gif file on various still pictures (after all animated gifs are nothing more than sets of multiple still gifs).
Once you have your picture files, insert a matrix of picture control (you know picture(x).visible... blah, blah, blah...)
And then just to make it work put a timer control and do a loop to make visible each of the pictures while the others are kept hidden.
here's a piece of my code...
I use a gif of then pics, and my image control is named my_image.
i call this function from a timer with an interval of +/- 200 miliseconds...
Private Sub animation()
If counter = 1 Then
my_image(10).Visible = False
my_image(1).Visible = True
counter = counter + 1
Else
If counter <= 10 Then
my_image(counter - 1).Visible = False
my_image(counter ).Visible = True
counter = counter + 1
Else
counter = 1
End If
End If
End Sub
Hope this code helps!
THIS IS VERY, VERY EASY.
Just a few days ago I did what you need now, just go to www.gamani.com and download their software (you have a free functional trial) and dissasemble the gif file on various still pictures (after all animated gifs are nothing more than sets of multiple still gifs).
Once you have your picture files, insert a matrix of picture control (you know picture(x).visible... blah, blah, blah...)
And then just to make it work put a timer control and do a loop to make visible each of the pictures while the others are kept hidden.
here's a piece of my code...
I use a gif of then pics, and my image control is named my_image.
i call this function from a timer with an interval of +/- 200 miliseconds...
Private Sub animation()
If counter = 1 Then
my_image(10).Visible = False
my_image(1).Visible = True
counter = counter + 1
Else
If counter <= 10 Then
my_image(counter - 1).Visible = False
my_image(counter ).Visible = True
counter = counter + 1
Else
counter = 1
End If
End If
End Sub
Hope this code helps!
SOLUTION
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
Plain and Simple
Add a text box (Text1), a Listbox (List1), label (Label1), three command buttons (Command1, Command2, Command3), and a Timer (Timer1) to a form. Add an image control, and set its Index property to 0 to create a control array. Add the following code to the form, then save the project and place some animated GIFs in the same folder as the project - it looks in the local folder as coded (see bottom of this page for a few to test with).
*** code removed at the request of its author by Netminder, Site Admin ***
*** to view the code, click the link in the post above, as that site is this post's source ***
Add a text box (Text1), a Listbox (List1), label (Label1), three command buttons (Command1, Command2, Command3), and a Timer (Timer1) to a form. Add an image control, and set its Index property to 0 to create a control array. Add the following code to the form, then save the project and place some animated GIFs in the same folder as the project - it looks in the local folder as coded (see bottom of this page for a few to test with).
*** code removed at the request of its author by Netminder, Site Admin ***
*** to view the code, click the link in the post above, as that site is this post's source ***
sivajish, are you aware that you need to close your questions when you get your answer? You do this by accepting a comment (by clicking the Accept button on the gray bar that splits comments).
Please maintain:
Questions Asked 3
Last 10 Grades Given
Question Grading Record 0 Answers Graded / 0 Answers Received
Please maintain:
Questions Asked 3
Last 10 Grades Given
Question Grading Record 0 Answers Graded / 0 Answers Received
sivajish:
This old question needs to be finalized -- accept an answer, split points, or get a refund. For information on your options, please click here-> http:/help/closing.jsp#1
EXPERTS:
Post your closing recommendations! No comment means you don't care.
This old question needs to be finalized -- accept an answer, split points, or get a refund. For information on your options, please click here-> http:/help/closing.jsp#1
EXPERTS:
Post your closing recommendations! No comment means you don't care.
My recommandation: split points between : emoreau, TimCottee, DocM, JackOfPH
Moderator, my recommended disposition is:
Split points between: emoreau and TimCottee and DocM and JackOfPH
DanRollins -- EE database cleanup volunteer
Split points between: emoreau and TimCottee and DocM and JackOfPH
DanRollins -- EE database cleanup volunteer
WebBrowser1.Document.write