Thanks All!
But Sastaxi, it doesn't seem to be working. This is more-or-less what I did.
VB Code:
picBuffer.Cls 'My BitBlting 'Imagine much code here 'displays everything 'All I did was change the destination hDC to picbuffer.hDC from 'frmMain.hDC. But the rest of the code is the same. RetVal = BitBlt(frmMain.hDC, 0, 0, 400, 600, picBuffer.hDC, 0, 0, SRCCOPY)
I made a picture box called picBuffer gave it the redraw property. Made it also the size of the form and made it invisible. Its left/top properties are both 0. As my code said I just changed all the frmMain.hDC to picBuffer.hDC. Then added the two lines you see above. What did I forget?
NOMAD




Reply With Quote