[Resolved] Blit this foo! (Transparency Stuff)
I tried writing a TransBlt function, but it doesn't really work...
VB Code:
Private Sub TransBlt(hPicture As Long, iFromX As Integer, iFromY As Integer, _
hMask As Long, iFromMaskX As Integer, iFromMaskY As Integer, hTo As Long, _
x As Integer, y As Integer, iWidth As Integer, iHeight As Integer)
BitBlt hTo, x, y, iWidth, iHeight, hPicture, iFromX, iFromY, vbSrcPaint
BitBlt hTo, x, y, iWidth, iHeight, hMask, iFromX, iFromY, vbSrcAnd
End Sub
Where am I going wrong? :confused: