::lTransparent desde recursos

Carles · Post by **Carles** » Mon Feb 20, 2006 11:30 am

Hola a todos,

La clausula ::lTransparent, no funciona con bmp en recursos.

// Using bitmaps from resources

#include "FWCE.ch"

function Main()

   local oWnd, oBmp, oBmp2

   DEFINE WINDOW oWnd TITLE "Bmp-Res"

   @ 5, 5 BITMAP oBmp FILENAME CURDIR() + "\users.bmp" NOBORDER

   oBmp:lTransparent = .t.

   @ 8, 5 BITMAP oBmp2 NAME "users" NOBORDER

   oBmp2:lTransparent = .t.


   ACTIVATE WINDOW oWnd ;
      ON CLICK MsgInfo( "click!" )

return nil

Alguna solucion ?

Saludos.
C.

jlcapel · Post by **jlcapel** » Mon Feb 20, 2006 12:15 pm

Carles,

Creo que con esta modificación en la clase window.prg queda arreglado.

Code: Select all

   METHOD SetBrush( oBrush ) INLINE If( ::oBrush != nil, ::oBrush:End(),),;
                                    ::oBrush := oBrush, oBrush:nCount++, ::Refresh()

Dime si ésto te soluciona el problema.

Saludos,
José Luis Capel

astursoft · Post by **astursoft** » Mon Feb 20, 2006 12:43 pm

he añadido el metodo a window y he compilado y a mi no me resuelve el problema .

jlcapel · Post by **jlcapel** » Mon Feb 20, 2006 12:54 pm

José Luis,

he añadido el metodo a window y he compilado y a mi no me resuelve el problema .

Cierto... parece ser que he confundido la pregunta. Lo que he indicado solo resuelve el problema en grupos creados desde código cuando lTransparent := .T.

Saludos,
José Luis Capel

Post by **Antonio Linares** » Mon Feb 20, 2006 3:24 pm

Carles, Jose Luis,

Acabamos de publicar un nuevo build de FWPPC que soluciona el problema. No es definitivo porque fallará con zoom ó imágenes estiradas, pero de momento está solucionado.

Carles · Post by **Carles** » Mon Feb 20, 2006 3:43 pm

Hola Antonio,

Es posible que no fucncione el link de actualizacion ?

Saludos.
C.

Post by **Antonio Linares** » Mon Feb 20, 2006 3:46 pm

Carles,

Vuelve a intentarlo, gracias.

Carles · Post by **Carles** » Mon Feb 20, 2006 3:50 pm

Antonio,

Ok. Ya va. El pastel debia estar 'calentito'

Saludos.
C.

Carles · Post by **Carles** » Tue Feb 21, 2006 7:23 am

Hola Antonio,

El nuevo build (20.02.2006) me arroja este error al compilar

Code: Select all

FiveCEC.lib(AYGSHELL.obj) : error LNK2019: unresolved external symbol SHGetDocum
entsFolder referenced in function "void __cdecl HB_FUN_SHGETDOCUMENTSFOLDER(void
)" (?HB_FUN_SHGETDOCUMENTSFOLDER@@YAXXZ)

Si dejo la libreria del build del 17.02.2006 va Ok.

Saludos.
C.

astursoft · Post by **astursoft** » Tue Feb 21, 2006 8:18 am

Carles , se ha añadido una libreria en el buildce.bat , copia el que tienes en samples , o miralo y añade la libreria al archivo de linkado .
Saludso.

Carles · Post by **Carles** » Tue Feb 21, 2006 8:27 am

Hola,

Efectivamente -> la CESHELL.LIB. Arrrg !

El tema del bitmap desde recurso -> ok

Gracias.
C.