Soporte de AlphaBlend en Windows Mobile y WinCE

Posts: 44158

Joined: Thu Oct 06, 2005 05:47 PM

Soporte de AlphaBlend en Windows Mobile y WinCE
Posted: Sat Apr 11, 2009 09:49 AM

Hemos comprobado que algunas versiones de Windows Mobile y WinCE soportan AlphaBlend().

Para comprobar si esta soportada en vuestra versión, por favor probad el siguiente ejemplo. Un valor cero significa que no esta soportado. Gracias,

test.prg

Code (fw): Select all Collapse

#include "FWCE.ch"

function Main()

   MsgInfo( Test() )

return nil

#pragma BEGINDUMP


#include <hbapi.h>
#include <windows.h>

LPWSTR AnsiToWide( char * );

HMODULE GetProcAddressW( HMODULE, LPWSTR );

HB_FUNC( TEST )
{
  LPWSTR pW1 = AnsiToWide( "coredll.dll" );
  LPWSTR pW2 = AnsiToWide( "AlphaBlend" );
  HMODULE hDll = LoadLibrary( pW1 );

  hb_retnl( ( LONG ) GetProcAddressW( hDll, pW2 ) );

  hb_xfree( pW1 );
  hb_xfree( pW2 );
  FreeLibrary( hDll );
}

#pragma ENDDUMP

regards, saludos

Antonio Linares
www.fivetechsoft.com

Antonio Linares

Posts: 44158

Joined: Thu Oct 06, 2005 05:47 PM

Re: Soporte de AlphaBlend en Windows Mobile y WinCE
Posted: Sat Apr 11, 2009 01:49 PM

Finalmente hemos conseguido soporte de AlphaBlend sin importar si esta soportado por Windows Mobile ó WinCE!

FWPPC tiene FWH ABPaint() tambien

TestAB.prg

Code (fw): Select all Collapse

#include "FWCE.ch"

function Main()

   local oWnd, oBmp, oBmp2

   DEFINE BITMAP oBmp FILENAME CurDir() + "\Trash.bmp"

   DEFINE BITMAP oBmp2 FILENAME CurDir() + "\paper2.bmp"
   
   DEFINE WINDOW oWnd
   
   ACTIVATE WINDOW oWnd ;
      ON PAINT ( DrawBitmap( hDC, oBmp2:hBitmap, 0, 0 ), ABPaint( hDC, 10, 10, oBmp:hBitmap, 255 ) )

return nil

In Windows Mobile:

In Windows CE:

regards, saludos

Antonio Linares
www.fivetechsoft.com

FiveTech Support Forums

Continue the discussion