::lTransparent desde recursos

[Carles]

Hola a todos,

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

Code: Select all  Expand view

// 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]

Carles,

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

Code: Select all  Expand view

   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]

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

[jlcapel]

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

[Antonio Linares]

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]

Hola Antonio,

Es posible que no fucncione el link de actualizacion ?


Saludos.
C.

[Antonio Linares]

Carles,

Vuelve a intentarlo, gracias.

[Carles]

Antonio,

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

Saludos.
C.

[Carles]

Hola Antonio,

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

Code: Select all  Expand view

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]

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]

Hola,

Efectivamente -> la CESHELL.LIB. Arrrg !


El tema del bitmap desde recurso -> ok

Gracias.
C.