BtnGet

[Mike Serra]

Buenas foros, espero que os hayan traido muchas cosas los reyes magos, , yo me conformo con la clase btnget32. Me la bajé de http://www.box.net/shared/lck9effuyn#1:6315754, y tengo un problema, y es que cuando pulso sobre F2 que es la tecla que tiene asociada la ejecucion del ACTION, me ejecuta la funcion del action 2 veces, sin embargo si pulso el boton en vez del F2 funciona correctamente.

MUCHAS GRACIAS

FWH 7.12 + xHarbour

[Antonio Linares]

Mike,

Modifica esta línea en la clase TBtnGet:

::bKeyDown := { | nKey | If( nKey == VK_F2, ( Eval( ::bAction ), 0 ),) }

[Mike Serra]

Buenos Dias Antonio, y Gracias, funciono perfecto.

Saludos.