Ver Mensaje Individual
  #2  
Antiguo 20-07-2007
Avatar de Ferrari
Ferrari Ferrari is offline
Miembro
 
Registrado: jun 2006
Ubicación: Torreón, México
Posts: 154
Reputación: 19
Ferrari Va por buen camino
Hacer que el Enter funciones como Tab

Coloca este evento en tu OnKeyPress de tu form:
Si tu forma contiene Tedit o TComboEdit de lo contrario agregas o cambias tus controles por los aqui mencionados.
Código Delphi [-]
var
  sNombre: String;
begin
  if (Key = #13) then
  begin
    if (ActiveControl is TEdit) or
       (ActiveControl is TComboEdit) then
       Perform(WM_NEXTDLGCTL, 0, 0);
  end;
end;

PD: No olvides cambiar la propiedad KeyPreview a True;
saludos
Responder Con Cita