Page 1 of 1

Bitmap

PostPosted: Sun Feb 26, 2006 9:08 am
by pawelu
Antonio,

I create bitmap from resource like this:

Code: Select all  Expand view
Function TestBmp ()

   Local oWnd := Nil

   Define Window oWnd
   @ 78, 20 BitMap oBmp Resource 'Info' Size 130, 78 Pixel
   Activate Window oWnd

Return .T.


Bitmap is not properly displayed. Bitmap size is about 10kB. I send for You original bitmap file and screen from PocketPC.

Regards
Pawel

PostPosted: Sun Feb 26, 2006 11:18 am
by Antonio Linares
Pawel,

The bitmap color located at the pixel 0, 0 is used to select the transparent color. As you are using black at 0, 0 in your bitmap, then all black color is made transparent.

Change your bitmap color at 0, 0, in example, like this:
Image

and if you use the clause NOBORDER also:
@ 78, 20 BitMap Resource 'Info' Size 130, 78 Pixel NOBORDER

then it looks like this:
Image

PostPosted: Sun Feb 26, 2006 11:38 am
by pawelu
Antonio,

thanks

Pawel