It works, placing the red part on top of the Alpha-Bmp,
using a Button from Ribbonbar ...
...
...
//The Button comes from Ribbonbar :
@ 160, 728 RBBTN oBmp OF oWnd BITMAP "Red.BMP" ;
SIZE 40, 40 PROMPT "" TOP TRANSPARENT ;
ACTION MsgAlert( "Red Button clicked", "Attention" )
...
...
// Background-Image and Alpha-Blended-BMP on Top
// ----------------------------------------------------------
ACTIVATE WINDOW oWnd MAXIMIZED ;
ON PAINT ( DRAWBITMAP( hdc, oBMP1:hbitmap, 0, 0,;
nWidth, nHeight ), W_ALPHA( oWnd, hDC, "Ampel.bmp", 620, 120 ) )
RETURN NIL
-----------------
FUNCTION W_ALPHA( oWnd, hDC, cFile, nTop, nLeft )
LOCAL oImage
DEFINE BITMAP oImage FILENAME cFile
ABPaint( hDC, nTop, nLeft, oImage:hBitmap, 220 )
RETURN NIL
Best Regards
Uwe
