ENTER EN VEZ DE TAB

[Pedro de Leon Rodas]

Como puedo hacer para que en vez de que se pase al siguiente cuadro de texto
con tab se pase con enter
en un cuadro de texto uso lo giguente
METHOD cuentaChar( oSender, nKey, nFlags ) CLASS cuentas_plazos
IF Nkey=13 .or. Nkey=9
::DBF:Ordsetfocus("nombre")
SEEK ::cuenta:value
if found()
msginfo("El nombre de la cuenta ya existe")
return .f.
endif
::meses:lEnabled=.t.
::interes:lEnabled=.t.
::meses:setfocus() &&& de esta forma me posiciono en el siguiente
cuadro de texto
return .f.
endif
RETURN Nil
Pero no quiero estar haciendo todo esto en cada cuadro de texto.
Gracias por toda ayuda.
Desde Cuernavaca Mor., México

[Carlos Ortiz]

Agrega esto en el prg principal de tu aplicación.
Application:lUseReturn := .t.
------------------------------------------------------------ --------------------
Atte. Carlos Ortiz.
PD. Esta en un mensaje de este foro mas abajo, de ahi lo tome.
--