Pregunta: | 46419 - CONFIGURA LISTBOX |
Autor: | Alberto Beltran |
Amigos, les agradezco si me pueden ayudar para saber como puedo configura un listbox para que se active con la tecla enter en lugar de un click del mouse.
De antemano Gracias. |
Respuesta: | jose luis servigna |
primero te colocas encima del listbox presionas el boton derecho del mouse se activa un menú seleccionas codigo al entrar en el campo de procedimiento seleccionas "keypress" entras colocas la rutina por ejemplo:
if lastkey()= 13 if rangofac.inicio<=rangofac.fin ventas.text1.setfocus(0) else set escape off wait window '******** Ingrese un nuevo Rango de Facturas ********' timeout 3 at 17,30 goapp.releaseform endif endif este ejemplo realiza lo siguiente: si estando en listbox en un campo del mismo presionas la tecla "enter" realiza una verificación si es verdadera pasa al otro campo y si es falso cierra la ventana. espero te sirva....., chao.... |