Ver Mensaje Individual
  #2  
Antiguo 25-04-2005
Avatar de roman
roman roman is offline
Moderador
 
Registrado: may 2003
Ubicación: Ciudad de México
Posts: 20.269
Reputación: 10
roman Es un diamante en brutoroman Es un diamante en brutoroman Es un diamante en bruto
Usa el método SelectNext del formulario:

Por ejemplo, asigna este método


Código Delphi [-]
procedure TForm1.EditKeyPress(Sender: TObject; var Key: Char);
begin
  if Key = #13 then
    SelectNext(Sender As TWinControl, true, true);
end;

al evento OnKeyPress de los Edits de tu formulario y lograrás que al oprimir ENTER en cualquiera de ellos se pase el foco al siguiente.

// Saludos
Responder Con Cita