Page 1 of 1

::lTransparent desde recursos

Posted: Mon Feb 20, 2006 11:30 am
by Carles
Hola a todos,

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

Code: Select all

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

Posted: Mon Feb 20, 2006 12:15 pm
by jlcapel
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

Posted: Mon Feb 20, 2006 12:43 pm
by astursoft
he añadido el metodo a window y he compilado y a mi no me resuelve el problema .

Posted: Mon Feb 20, 2006 12:54 pm
by 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

Posted: Mon Feb 20, 2006 3:24 pm
by 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.

Posted: Mon Feb 20, 2006 3:43 pm
by Carles
Hola Antonio,

Es posible que no fucncione el link de actualizacion ?


Saludos.
C.

Posted: Mon Feb 20, 2006 3:46 pm
by Antonio Linares
Carles,

Vuelve a intentarlo, gracias.

Posted: Mon Feb 20, 2006 3:50 pm
by Carles
Antonio,

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

Saludos.
C.

Posted: Tue Feb 21, 2006 7:23 am
by Carles
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.

Posted: Tue Feb 21, 2006 8:18 am
by 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.

Posted: Tue Feb 21, 2006 8:27 am
by Carles
Hola,

Efectivamente -> la CESHELL.LIB. Arrrg !


El tema del bitmap desde recurso -> ok

Gracias.
C.