FWH 8.08 - Nueva claúsula ACTION para los GETs

[Antonio Linares]

En FWH 8.08 la claúsula ACTION <expresion> puede ser usada con un GET, por ejemplo:

Code: Select all  Expand view  RUN

#include "FiveWin.ch"

function Main()

   local oWnd, cTest := "Hello world!"

   DEFINE WINDOW oWnd COLOR "N/W"

   @ 2, 2 GET cTest SIZE 100, 20 ACTION MsgInfo( "click" )

   ACTIVATE WINDOW oWnd

return nil


Ya no hay necesidad de usar la clase TBtnGet

[Antonio Linares]

[Antonio Linares]

Y con soporte de bitmaps en el botón y temas

[Antonio Linares]

Soporte de temas:

[Antonio Linares]

Con temas y bitmap:

[ronaldo]

è possivel adicionar imagens no GET com o action?

[Antonio Linares]

Ronaldo,

Te refieres a mostrar el bitmap sin el botón ?

[jose_murugosa]

Con temas y bitmap:

Excelente Antonio , el soporte de temas es esencial, ya que btnget32 no tenía soporte de temas......

Como sería el código cuando utilizas un botón con un bitmap?

p.s.: El link para ver como queda está roto.

[fgondi]

Antonio,

Sólo tengo tres palabras que decir

Excelente, Excelente y Excelente.

Poder no depender de btnget32 me parece uno de los mejores aciertos de Fivetech

[Antonio Linares]

José,

Code: Select all  Expand view  RUN

   @ 2, 2 GET cTest SIZE 110, 22 ;
      ACTION MsgInfo( "click" ) BITMAP "..\bitmaps\16x16\find.bmp"


[Antonio Linares]

Fernando,

Gracias!

[karinha]

José,

Code: Select all  Expand view  RUN

   @ 2, 2 GET cTest SIZE 110, 22 ;
      ACTION MsgInfo( "click" ) BITMAP "..\bitmaps\16x16\find.bmp"


Maestro, no uso CODIGO, siempre RECURSOS by Borland Resources WorkShop.exe, és posible como en la marabillosa BTNGET32.PRG??

Regards, saludos grand maestro.

[FiveWiDi]

José,

Code: Select all  Expand view  RUN

   @ 2, 2 GET cTest SIZE 110, 22 ;
      ACTION MsgInfo( "click" ) BITMAP "..\bitmaps\16x16\find.bmp"


Joder Antonio,

me lo estás poniendo difícil.
Tenía previsto actualizarme en octubre y no se si podré esperar.

Necesitaba un xBrowse, ya estas en ello; necesitaba mandar mails, también; necesitaba mejorar la apariencia, pués toma.

Como dicen en casa 'mola cacho'.

Saludos
Carlos G.

[Mike Serra]

Genial Antonio,

tenía un problema con tbntget con la 8.07, que me parece que lo voy a aparcar hasta la 8.08

3 preguntas Antonio:

1ª) Se pueden redefinir desde recursos?
2ª) La sintaxis para ponerle tooltips será añadiendole la clausula TOOLTIP
o oGet:cToolTip:=.....?
3ª) La ultima es doble ¿Se puede asignar una tecla para que ejecute esa accion?, Si se puede ¿Podemos cambiar la tecla, es decir, si fuera F2 cambiarla a F5, por ejemplo?

Independientemente de las respuesta, te felicito y muchas gracias

[Antonio Linares]

Mike,

> 1ª) Se pueden redefinir desde recursos?

Si

>
2ª) La sintaxis para ponerle tooltips será añadiendole la clausula TOOLTIP
o oGet:cToolTip:=.....?
>

Si, igual que se hace ahora.

>
3ª) La ultima es doble ¿Se puede asignar una tecla para que ejecute esa accion?, Si se puede ¿Podemos cambiar la tecla, es decir, si fuera F2 cambiarla a F5, por ejemplo?
>

Muy buena sugerencia. Vamos a pensar la forma de hacerlo