Usar la tecla TAB tambien como si fuera el ENTER

560 views
Skip to first unread message

emr

unread,
Sep 29, 2010, 2:25:10 AM9/29/10
to Comunidad de Visual Foxpro en Español
Hola saludos a todos, mi duda es la siguiente:

un cliente que le hice un sistema, quiere que en los formularios de
captura poder usar la tecla TAB para aceptar los valores numericos,
alguien me puede decir como hago para que al estar capturando una
cantidad y presiono la tecla TAB se cambie al siguiente textbox como
si hubiera presionado la tecla ENTER.

en este momento si ya tengo en el textbox un valor ejem. 10.00 y
regreso a ese textbox a corregir la cantidad y escribo 20 y presiono
TAB me pone 2010.00 pero si presiono en lugar del TAB el ENTER me
pone 20.00 que es lo correcto.

Como puedo hacer para que el TAB haga lo mismo que el ENTER.

De antemano como siempre les agradezco mucho su ayuda.

Saludos a todos.

Enrique Martinez
Puerto Vallarta, Jalisco México

Ricardo Martinez

unread,
Sep 29, 2010, 4:33:50 AM9/29/10
to publice...@googlegroups.com
hola EMR
cuando regresas a corregir un TEXTBOX por ejemplo con SHIFT+TAB ,
debes asignarle al textbox en la propiedad FORMAT el valor "K",
eso significa que cuando ese formulario tiene el "FOCUS" o Enfoque su contenido se selecciona
y el valor que agreges reemplaza al anterior.
ojala te sirva..
--
Saludos. Ricardo Mtz

José Anthony Contreras Peralta

unread,
Sep 29, 2010, 9:43:35 AM9/29/10
to publice...@googlegroups.com
Lo que te dice el colega Ricardo Martinez está perfecto, pero además si quieres que se seleccione también al dar clic al TextBox ponle esto en el evento click del TextBox:

this.SelStart=0
this.selLength=17 && Es la longitud del TextBox


*- Si no quieres aceptar cantidadades menores a cero ponle esto en el evento valid del mismo TextBox

if this.value<0
    titulo="Monto Total Negativo"
    messagebox("El monto total no debe ser negativo.", 48, titulo)
    this.Value=0
    thisform.refresh
    return 0
endif

Saludos desde Costa Rica.

Angel Ferreira

unread,
Sep 29, 2010, 9:43:47 AM9/29/10
to publice...@googlegroups.com
Tambien puedes usar la propiedad del Textbox:

TextBox.SelectOnEntry = .T. .

Saludos,
AF

sip...@gmail.com

unread,
Sep 29, 2010, 9:53:41 AM9/29/10
to publice...@googlegroups.com
Hola
Trata con pasar el valor antiguo del text a texto con la función transfor() en el evento gotfocus y la cargas a una propiedad creada por ti, ya sea del form o del text .
Luego en el evento keypress evaluas si la tecla pulsada fue TAB entonces tomas el nuevo valor escrito lo pasas a texto y concatenas
Luego pasas esa cadena a numero con la función Val()

Algo así:
En Gotfocus

This.mivalor=transform(this.value)

En keypress
If tecla=valtab &&,no recuerdo el valor de tab
This.mivalor=transform(this.value)+ This.mivalor
This.value=val(this.mivalor)
Endif

Mas o menos eso
Espero te ayude

Alexander Barreto
Valencia Venezuela

Enviado desde mi BlackBerry de Movistar

miltonvas

unread,
Sep 29, 2010, 8:59:56 PM9/29/10
to Comunidad de Visual Foxpro en Español
on key label {tab} keyb do cambiatecla

proc cambia tecla
keyb chr(13)
on key label {tab}
> Puerto Vallarta, Jalisco México- Ocultar texto de la cita -
>
> - Mostrar texto de la cita -

Enrique Martinez

unread,
Sep 29, 2010, 9:59:59 PM9/29/10
to publice...@googlegroups.com
Hola Ricardo 

Muchas gracias por tu ayuda, funcionó perfecto, eso es lo que estaba buscando, te lo agradezco mucho.

Saludos

Enrique Martinez

Enrique Martinez

unread,
Sep 29, 2010, 10:01:14 PM9/29/10
to Comunidad de Visual Foxpro en Español
Muchas Gracias a todos por su ayuda voy a tomar en consideración todas sus opiniones, para futuras aplicaciones.

Saludos

Enrique Martínez
Puerto Vallarta, Jalisco México
Reply all
Reply to author
Forward
0 new messages