Help... for a begginer! please!!!

[Arie]

Hi, Everybody!

I'm a begginer and I have a problem:
Why when I do like this:
**Example**
Sub Timer1()

Image1.Picture = Image2(x).Picture
x = x + 1
If x = 3 then x = 0

End Sub
** End **

Then When it works, it does some background color flashes
within the image1.
It interupt the animation.
I know you would recommand me BitBlt.
But I want to know if there is any way to fix it.

Anyway Thank you all,
Arie.

Visit: http://www.nip.to/camel2000

[parksie]

Not really. The problem is that what happens is this:

1. Image1 has an image
2. Clear Image1
3. Paint new image on Image1

You need to cut out stage 2, and BitBlt is the easiest way of doing this. (sorry)

I tried your code and it didn't work. Reason being is you didn't declare X as Static.


Private Sub Timer1_Timer()

Static x
Image1.Picture = Image2(x).Picture
x = x + 1
If x = 3 Then x = 0

End Sub


Also, try setting the AutoRedraw property to True.