Click to See Complete Forum and Search --> : animated images


karthik6
October 8th, 2001, 08:27 AM
how do i put animated gifs or other files on my screen?

isit my site at http://in.members.tripodasia.com/karthik_immortal

Iouri
October 8th, 2001, 08:32 AM
Animated gif

There is a way to Fake it without any 3rd Party Controls, you can use the Microsoft Internet Controls
Webbrowser Control within a Picturebox.

Take a Form with the following controls and paste this code into it;
A CommonDialogbox, a Command Button, a Picturebox & WebBrowser Control (Drawn within the Picturebox
Container)..

private Sub Command1_Click()
on error GoTo UserCancelled
With CommonDialog1
.DialogTitle = "Select an Animated Gif.."
.Filter = "GIFs|*.gif"
.CancelError = true
.ShowOpen
WebBrowser1.Navigate .FileName
WebBrowser1.Move -ScaleX(12, vbPixels, vbTwips), -ScaleY(20, vbPixels, vbTwips), Screen.Width, Screen.Height
Picture1 = LoadPicture(.FileName)
Picture1.AutoSize = true
End With
UserCancelled:
End Sub


Iouri Boutchkine
iouri@hotsheet.com