making objects move with BitBlt

i've just learnt the basics of BitBlt but can't get anything to move.

say when a timer goes off you move a picture to the right a bit so it looks as if it's going along. what would the code be?

this should be the last of my BitBlt posts if it gets any answers that work

In an interval (ex. a Do... DoEvents... Loop or Timer), you can just change the X/Y values (and even the thing you are "blitting") to your BitBlt call. This way simple animation and moving (walking animations too ;)) can be achieved.

And don't forget that you have to refresh the form you're blitting to to see any movement...

thanks
this is part of my code:

VB Code:

Private Sub Timer1_Timer()
intChange = intChange + 10
BitBlt Picture2.hDC, intChange, 0, 1215, 1455, Picture1.hDC, 0, 0, SRCCOPY
Me.Refresh
End Sub

it loads a new pic in the picture2 every time
should a new one load every time and if yes how do i get rid of the old ones?

Try it this way:

Code:

---

retval = BitBlt(DestPicture.hDC, DestPictureUpperLeft,DestPictureX,DestPictureY, DestPictureWidth, DestPictureHeight, SourcePicture.hDC, SourcePictureLeftCorner,SourcePictureTopCorner, SRCCOPY)

---

Well basically, you need to store your X and Y coordinates in variables, and anytime you want to move the image, you just change the X and Y coordinates.

In the example above, if I wanted to move the picture to the right by 10 pixels I would use:

Code:

---

DestPictureX=DestPictureX+10
DestPictureY=DestPictureY+10

---

Then I'd call the function again, so it will redraw the picture in the new location.

Code:

---

retval = BitBlt(DestPicture.hDC, DestPictureUpperLeft,DestPictureX,DestPictureY, DestPictureWidth, DestPictureHeight, SourcePicture.hDC, SourcePictureLeftCorner,SourcePictureTopCorner, SRCCOPY)

---

To remove the old picture, use the .Cls method of the picturebox.

To get rid of the flickering that comes from this method, search the board for double buffering, or put the picbox on AutoRedraw and use .Refresh after your BitBlt call(s).