FiveTech Support Forums

Hola a todos;

Es una pregunta tonta, pero ahora mismo no se si es correcto, aunque me funciona bien, no se si se tiene que hacer asi.

En Resource WorkShop se definen igual los botones BUTTON que los BUTTONBAR ?

Hasta ahora los declaro en codigo asi:

  REDEFINE BUTTON oBotonBMP[1] ID 600 OF oDlg;
           ACTION If( Grabar(), ( cValid := .T., oDlg:End() ),;
                    ( cValid := .F., MiFoco( @oCampos, 1 ) )) ;
           MESSAGE "Aceptar"

Y probando ahora los BUTTONBMP, sin cambiar nada en el recurso, he hecho:

  REDEFINE BUTTONBMP oBotonBMP[1] ID 600 OF oDlg;
           ACTION If( Grabar(), ( cValid := .T., oDlg:End() ),;
                    ( cValid := .F., MiFoco( @oCampos, 1 ) )) ;
           PROMPT "Aceptar";
           BITMAP "VMenu_Nuevo" TEXTRIGHT;
           TOOLTIP "Aceptar000000"

Y funciona genial, usa el mismo control del boton que tenia para los BUTTON pero ahora con BUTTONBAR le añade una imagen al boton, sin controles Borland, genial, pero esto es correcto?

Tengo que cambiar algo en el recurso, o esto es correcto?

Un saludo
JLL

Saludos

Si es correcto, BUTTONBMP hereda de BUTTON esta a su vez crea el boton que nos brinda el API de window

La idea es BUTTONBMP es poder agregarle la imagen al boton que creamos con el API de window (con/sin temas activos en la aplicacion) que este no permite agregarle imagenes por default, simplemente se captura el mensaje WM_PAINT para poder hacer eso.

Muchas gracias Daniel.

Como siempre tan amable y apagando fuegos. Muchas gracias.

Un saludo
JLL