Trouble working with transparent gif images
Posted: Wed Dec 06, 2006 9:32 pm
I am trying to layer 3 different gif images on a vb form to make 1 picture. I have one gif image that is in the vb examples folder working, but I cant get any other gif image to work. When I paint the gif image on the form, the transparent areas come up red and the whole image seems blended with the background. Has anybody run into this, am I missing something, please help. Below is the code I am using.
Error = gflLoadBitmap(App.Path & "\clock2.gif", PtrBitmap, LoadParams, FileInfo) 'Load picture
extGetGflBitmapFromPtr PtrBitmap, GflBitmap 'Get the picture data
extShowTransparencyBitmapOnDCEx GflBitmap, Me.hdc, vbRed 'Display picture on the DC with the red color for mask
Error = gflLoadBitmap(App.Path & "\clock2.gif", PtrBitmap, LoadParams, FileInfo) 'Load picture
extGetGflBitmapFromPtr PtrBitmap, GflBitmap 'Get the picture data
extShowTransparencyBitmapOnDCEx GflBitmap, Me.hdc, vbRed 'Display picture on the DC with the red color for mask