¿SETFOCUS o que?
Hola amigo... No te imaginas cuanto estoy aprendiendo con tus ayudas...! Mira, tengo un Formulario con un Grid que tiene los registros de la tabla y quiero que cuando presiono el botón Aceptar, se abra un registro en blanco en la tabla y el grid quede seleccionado automáticamente para escribir en la columna 1. Para eso programé el evento click de Aceptar así:
Se le tabla1
SET FILTER TO
APPEND BLANK
THISFORM.GRID1.COLUMN1.TEXT1. SETFOCUS
THISFORM.REFRESH
-------------------------------------
Pero con este código solo consigo abrir un registro en blanco y que se seleccione el "text1" de la "columna1" pero no puedo empezar a escribir sin tener que tomar el mouse y hacer un Click ahí mismo... Y eso es justamente lo que quiero evitar (usar el mouse). ¿Me habré explicado bien? Espero que si...
Un saludo.
Alejandro Merlo
Se le tabla1
SET FILTER TO
APPEND BLANK
THISFORM.GRID1.COLUMN1.TEXT1. SETFOCUS
THISFORM.REFRESH
-------------------------------------
Pero con este código solo consigo abrir un registro en blanco y que se seleccione el "text1" de la "columna1" pero no puedo empezar a escribir sin tener que tomar el mouse y hacer un Click ahí mismo... Y eso es justamente lo que quiero evitar (usar el mouse). ¿Me habré explicado bien? Espero que si...
Un saludo.
Alejandro Merlo
1 respuesta
Respuesta de Víctor Arturo Mercado Fernández
1
Intenta colocando la propiedad TABINDEX del GRID un número inmediato después del botón "Acepar", es decir, si la propiedad TABINDEX del botón es "7", pon la propiedad en el GRID de "8".
Comunicame los resultados.
Comunicame los resultados.
Bien, funcionó perfectamente. Gracias como siempre.
Alejandro Merlo
Alejandro Merlo
Malas noticias. Lo probé y pasa lo mismo. El grid y la columna en cuestión reciben el enfoqué pero necesitan un click para que se puedan introducir registros... ¿qué faltará? ¿Estaba bien el código que puse?
:(
Alejandro Merlo
:(
Alejandro Merlo
Aparentemente si. Revisa la propiedad TABSTOP del GRID, COLUMN y TEXTBOX, en todos los casos debe ser verdadero (.T.)
