La Web del Programador: Comunidad de Programadores
 
    Pregunta:  13283 - "LEYENDO TECLAS"
Autor:  Javier Cruz
Necesito saber si hay alguna funcion en Visual Foxpro para leer teclas que no me genere una repetición en pantalla (Algo así como getch() en Turbo C), espero respuesta, !Gracias¡

  Respuesta:  Jose Samper
en el metodo keypress de todos los objetos puedes controlar lo que quieres que haga el objeto al presionar determinada tecla. si no quieres que se repita una tecla programa algo asi

metodo keypress
LPARAMETERS nKeyCode, nShiftAltCtrl
if type('ltecla')='U'
public ltecla
ltecla=nKeyCode
dodefault()
else
if ltecla=nKeyCode
nodefault
return
endif
endif
dodefault()