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.