bitblt - error!!!!

Hello all,

I seem to be having a little bit of a problem with bitblt - no pun intended!! Here is my call -->

Public Declare Function BitBlt Lib "gdi32" (ByVal hDestDC As Long, ByVal X As Long, ByVal Y As Long, ByVal nWidth As Long, ByVal nHeight As Long, ByVal hSrcDC As Long, ByVal xSrc As Long, ByVal ySrc As Long, ByVal dwRop As Long) As Long

Public Const SRCCOPY = &HCC0020

and here is how I'm trying to use it

Private Sub Command1_Click()
bitblt(picture2.hDC,0,0,32,32,picture1.hDC,0,0,srccopy)
End Sub

I keep getting an "expected: =" error... What do I need???

Thanx for the help!

Squirrelly1:D

You have to do:

VB Code:

temp = bitblt(picture2.hDC,0,0,32,32,picture1.hDC,0,0,srccopy)

Or

VB Code:

bitblt picture2.hDC,0,0,32,32,picture1.hDC,0,0,srccopy

:)

bitblt should work the way he had it. he just needed to leave the parenthesis off for it to work. other wise the computer thinks you're trying to assign the value returned by bitblt to something when it's clear that is not what you are doing.

hope this clarifies.


Drewski

Also use the vbSrcCopy constant instead of srccopy.
Looks better :)

Thank you every1 for your help...


Squirrelly1:D