FiveTech Software tech support forums

Dear Antonio,

I try to use BITMAP and BTNBMP and both has an weak and good point ( I've only few knowledge ).
- BITMAP
- Nice but No Motion when Click
- BTNBMP
- Nice and Motion but cannot TRANSPARENT.
1.) Can I make Motion on BITMAP ON CLICK as iPhone. Change Bitmap back when click as iPhone
2.) Can I Transparent BTNBMP background.

Dutch,

Please email me the button image that it is inside the red circle and also the image that you want to show when it is clicked, thanks

Dutch,

Please try this example:

Code: Select all  Expand view

#include "FWCE.ch"

function Main()

   local oWnd, oBmp

   DEFINE WINDOW oWnd

   @ 10, 10 BITMAP oBmp FILE CurDir() + "\find.bmp" NOBORDER
   
   oBmp:bLClicked  = { || DeleteObject( oBmp:hBitmap ), oBmp:hBitmap := PalBmpRead( 0, CurDir() + "\find3.bmp" )[ 1 ], oBmp:Refresh() }
   oBmp:bLButtonUp = { || DeleteObject( oBmp:hBitmap ), oBmp:hBitmap := PalBmpRead( 0, CurDir() + "\find.bmp" )[ 1 ], oBmp:Refresh() }

   ACTIVATE WINDOW oWnd

return nil