Clipper/FiveWin - sobre keyboard() en fivewin

Cuando quiero ejecutar un programa demo en clipper siempre utilizé la función keyboard chr() pero Fivewin no me la reconoce. Tampoco me reconoce la función __Keyboard. Quién puede darme una mano?.Gracias.Alejandro.

Hola Alejandro:

Ya que tu no destrozas el kenguaje de Cervantes aquí tienes una
solución:

La mas fácil, usa __KEYBOARD(CHR()) ojo es doble subrayado (_ _)

La mas completa, (Recomedada por el Maestro René Flores),

FUNCTION MyKeyBoard(oWnd,nKey)
oWnd:SETFOCUS()
oWnd:POSTMSG(WM_KEYDOWN,nKey,0)
RETURN (NIL)

Recibe como parametros la ventana o dialogo sobre la cual quieres
mandar los pulsos de las teclas y el número de tecla virtual (revisa
el archivo VKEY.CH) que quieres enviar a dicha ventana o dialogo.

No utilices KEYBOARD() directamente desde FW, por ser windows un entorno multitareas, no puedes estar seguro a que ventana dirigiste el
KEYBOARD(), esto puede ocasionar que se te congele la aplicación.

Saludos desde México

Hola Armando, te agredecería si puedes enviarme un pequeño código de ejemplo para entender mejor lo que propone el maestro Flores.Muchas gracias.

Alejandro:

Es muy simple, supongamos que estas en un cuadro de dialogo asi,

DEFINE DIALOG oDlgPro RESOURCE "BusPro" OF ...

// y dentro de este dialogo tienes un boton
REDEFINE BUTTON oAceptar ID 901 OF oDlgPro;
ACTION (MyKeyBoard(oDlgPro,13),;
MESSAGE "Activa el teclado con CHR(13)"
// Observa que se ejecuta la función MyKeyBoard()

ACTIVATE DIALOG oDlgPro CENTERED

// Aqui esta la función que ejecuta un CHR(13) ENTER
FUNCTION MyKeyBoard(oWnd,nKey)
oWnd:SETFOCUS()
oWnd:POSTMSG(WM_KEYDOWN,nKey,0)
RETURN (NIL)

Espero haber sido claro, en caso contrario estoy a tus ordenes

Saludos desde México