Page 1 of 1

problema con BUTTONBMP

Posted: Sat Sep 08, 2007 3:12 pm
by MOISES
Hola Antonio:

BUTTONBMP no muestra el MESSAGE. Es decir

samples\testbubm.prg

REDEFINE BUTTONBMP ID 10 OF oDlg ;
ACTION MsgInfo( "XP themes aware Button Bitmaps" ) ;
BITMAP "..\bitmaps\16x16\garrow.bmp" MESSAGE "TEST..."


En cambio en BTNBMP TOOLTIP si funciona adecuadamente.

Un saludo,

Posted: Sat Sep 08, 2007 5:06 pm
by Antonio Linares
Moises,

gracias!

Modifica este método en la clase TButtonBmp:

METHOD MouseMove( nRow, nCol, nFlags ) INLINE Super:MouseMove( nRow, nCol, nFlags ), ::oWnd:SetMsg( ::cMsg ), ::Refresh()

Posted: Sat Sep 08, 2007 5:44 pm
by MOISES
Hola:

¿Lo vas a meter en el build de sept?. Lo digo porque no me gusta añadir módulos de fwh a la aplicación, que luego con las actualizaciones es un lío.

Salu2

Posted: Sat Sep 08, 2007 7:31 pm
by Antonio Linares
Moises,

Si, ya lo hemos añadido al build de Septiembre :-)

Posted: Fri Sep 21, 2007 12:50 pm
by MOISES
Antonio,

Pues sigue sin ir. En este código, que es samples\testbubm.prg, pones el cursor encima del botón y NO se muestra el mensaje:


#include "FiveWin.ch"

#define COLOR_BTNFACE 15

//----------------------------------------------------------------------------//

function Main()

local oWnd, oBtnBmp

DEFINE WINDOW oWnd TITLE "FiveWin Xp Theme-aware bitmaped buttons" ;
COLOR 0, GetSysColor( COLOR_BTNFACE )


@ 2, 2 BUTTONBMP oBtnBmp OF oWnd ACTION MsgInfo( "XP themes aware Button Bitmaps" ) ;
BITMAP "..\bitmaps\16x16\garrow.bmp" MESSAGE "Calendario"


@ 6, 2 BUTTON "From Resources" OF oWnd SIZE 90, 25 ACTION nil MESSAGE "Calendario"

ACTIVATE WINDOW oWnd

return nil