Tab - Enter
 

Hola foro

Es posible hacer que al apretar Enter siga el orden que tiene en el Tab Order?

es decir en el evento press correspondiente poner algo como:

if key = 13
then ....que le de el foco al objeto que sigue en el TabOrder

saludos

Hola puedes hacer lo siguiente:

Código Delphi [-]
if key = 13 then begin
      Key := #0; //cambiamos la tecla por tab
      Perform(WM_NEXTDLGCTL, 0, 0); //pasamos al siguiente control
end;

Espero te sirva

Saludos

gracias
 

lo voy a probar gracias

También puedes utilizar el componente KeysOnForm que puede encontrar en mi página; Te permite eso y algunas cosas más (combinación para avanzar al siguiente y anterior, TAB, teclas de función, ESC,...); Simplemente lo sueltas en un formulario y lo activas.

flechas para lo mismo
 

hola, quiero usar las flechas como tab izq o arriba como para regresar al componente anterior y der o abajo para el siguiente...intente con actionlist, actionmanager, el componente de neftali y la opcion que mejor me funciono fue poner un codigo similar al de Bicho en el evento onkeypress de cada uno de los componentes... la duda es: no es mucho codigo de sobra?? tomando en cuenta que en el form que lo use tengo 17 componentes y en algunos casos podria haber mas... saludos, una pagina muy util

Yo personalmente hago lo siguiente en el OnKeyDown del primero, y despues selecciono el resto de controles a la vez, y le asigno al OnKeyDown de todos el del primero. En el OnKeyDown del primero pongo lo siguiente:

begin

if ( (Key = VK_RETURN) or (Key = VK_DOWN) ) then
SelectNext(ActiveControl, true, true);

if (Key = VK_UP) then
SelectNext(ActiveControl, false, true);

end;

Y andando :-)

:eek::D gracias por la pronta respuesta, saludos

Muy útil todo lo que he encontrado en tu página :)