Utilizar el enter por el tab

[simon]

Saludo para todos..
la pregunta es la siguiente:

como puedo usar el enter por el tab, estoy usando DBEdit, puse la siguiente rutina pero no me funciona.

[p]

begin
if Key = #13 then
begin
Key := #0;
Perform(WM_NEXTDLGCTL, 0, 0);
end
end;
[/p]

la sague de trucoMania, estuve buscando el los hilo publicado y no la encontre, claro esta no lo busque en todos.

mil Gracias

[marcoszorrilla]

Tienes que poner la propiedad KeyPreview del formulario a True.

Un Saludo.

[Jvilomar]

Yo utilizo esta rutina es casi la misma que la tuya. En el onKeyPress, pero antes tienes como dice Marcos que poner la propiedad KeyPreview del Formulario := True y chequear el TabOrder de cada uno de los dbEdit

Código Delphi [-]
   Begin
       if key =#13 then
          begin
          SelectNext(ActiveControl,true,true);
          End
   End;

Espero que te sirva....

[simon]

mucha gracias funciono a la perfección

desde Republica Dominicana a su orden

[Paoti]

Empezado por Jvilomar

Yo utilizo esta rutina es casi la misma que la tuya. En el onKeyPress, pero antes tienes como dice Marcos que poner la propiedad KeyPreview del Formulario := True y chequear el TabOrder de cada uno de los dbEdit

Hola compañero, no tengo delphi a la mano, y pues bueno, tengo una pregunta.... que pasa si el siguiente objeno no es una caja de texto, que sea un boton.... Al presionar enter, pasara al siguiente elemento o ejecutara el eveto onclick?




de natemano muchas gracias




que esten bien todos

[roman]

Empezado por Paoti

que pasa si el siguiente objeno no es una caja de texto, que sea un boton.... Al presionar enter, pasara al siguiente elemento o ejecutara el eveto onclick?

Pasará el foco al siguiente elemento solamente.

// Saludos