La Web del Programador: Comunidad de Programadores
 
    Pregunta:  8351 - COMO REEMPLAZAR LA TECLA TAB CON LA INTRO AL PRESIONARLA
Autor:  Eugenia Veronica del Pino Andrade
Hola

Tengo un problema para poder colocar por defecto cada vez que presionen la Tecla INTRO a suma la función de la tecla TAB (saltar a otro campo) ya que en el sistema que se deben digitar mucha información y a las digitadoras les resulta mas facil utilizar el teclado númerico..

Gracias por la ayuda..

  Respuesta:  leonardo pacosillo
Basta de sufrimiento conoces las vcl del Jedy ahi tenes muchos componentes entre esos esta el JVENTERASTAB que colocando ese componenete en tu forma automaticamente al presionar la tecla enter cambiara el focus

  Respuesta:  Hugo O.H.
Hola...

tienes varias opciones...

Puedes crear un evento compartido en un TEdit, y en el evento onKeyPress usa el siguiente codigo:

if ( Key = #13 ) then
begin
Key = #0; // Para anular el pitido...
Perform(WM_NEXTDLGCTL, 0, 0); // Pasar al siguiente control en el dialogo...
end;

lo anterior te sirve para hacer el efecto solamente en los componentes que deseas, simplemente comparte el evento en los componentes que quieras para que no tengas que vovler a escribir nada... (solo que no funcionara con los componentes TMemo...)

ahora, tienes la opción de hacer algo parecido pero a nivel de aplicación, es decir, que funcione con todos y cada uno de los componentes... puedes crear un metodo que haga algo parecido interceptando el mansaje windows adecuado... o poner el codigo en el OnKeyPress de la forma y asegurarte de que su propiedad KeyPreview sea true...

en fin, hay muchas maneras de hacerlo, esta es la mas sencilla creo yo...

saludos...