Feliz Navidad a todos y a todas
Me gustaria que en la pantalla principal, al hacer click con el boton derecho, me mostrase o bien el logo de la empresa, o bien un degradado. Hago lo siguiente y no me funciona
************************
Publicas:oWPpal:bRClicked:= {|hDC| cambialogo(hDC),.T. }
static function cambialogo(hdc)
local oBmp
if Publicas:logowp=.F.
DEFINE BITMAP oBmp RESOURCE "Logoacm" OF Publicas:oWPpal
Publicas:oWPpal:bPainted := {|hDC| PalBmpDraw( hDC, 100, 10,oBmp:hBitmap,, Publicas:oWPpal:nWidth/1.125, Publicas:oWPpal:nHeight/2,, .T.) }
Publicas:logowp:=.T.
else
degradado(hDC) // funcion de degradado
endif
return nil
************************
Se me queda pintada la pantalla con la que arranco.
Puede que sea que tenga que destruir la pantalla con lo que tenga y luego repintarla de nuevo?
Cómo lo hago?
Saludos
Jose Luis