topic-35205

Posts: 7317

Joined: Thu Oct 18, 2012 07:17 PM

Abpaint
Posted: Tue Jan 30, 2018 05:48 PM

If Iuse Abpaint to draw a bitmap

ABPaint( ::hDC, y, x, v[1], 255)

the bitmap wich color must have on the background ?

I ask this because the bitmap is not transparent ( also with manifest) and I not understood why

Since from 1991/1992 ( fw for clipper Rel. 14.4 - Momos)

I use : FiveWin for Harbour March-April 2024 - Harbour 3.2.0dev (harbour_bcc770_32_20240309) - Bcc7.70 - xMate ver. 1.15.3 - PellesC - mail: silvio[dot]falconi[at]gmail[dot]com

karinha

Posts: 8515

Joined: Tue Dec 20, 2005 07:36 PM

Re: Abpaint
Posted: Tue Jan 30, 2018 06:07 PM

Normal,

Code (fw): Select all Collapse

// AlphaBlending transparencies support in FiveWin! \SAMPLES\TESTAB.PRG

#include "FiveWin.ch"

function Main()

   local oWnd, oBmp, oBrush

   DEFINE BITMAP oBmp FILENAME "..\bitmaps\AlphaBmp\Trash.bmp"

   DEFINE BRUSH oBrush FILENAME "..\bitmaps\backgrnd\paper2.bmp"

   DEFINE WINDOW oWnd TITLE "FWH 17.01 Transparencies" ;
      COLOR 0, "N/W" BRUSH oBrush

   ACTIVATE WINDOW oWnd ;
      ON PAINT ABPaint( hDC, 10, 10, oBmp:hBitmap, 220 ) // 0-255 transparency level

   oBrush:End()
   oBmp:End()

return nil

João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341

FiveTech Support Forums

Continue the discussion