Si pongo un Memo y uno o más componentes en un Form me puedo pasar la tarde dandole al enter dentro del Memo que no va a cambiar el foco...
Claro está, si no tengo por algún lado ( Form1.KeyPreview:= True) y asignado al evento OnKeyPress el siguiente código:
Código Delphi
[-]
procedure TForm1.FormKeyPress(Sender: TObject; var Key: Char);
begin
if Key = #13 then
begin
Key:=#0;
Perform(wm_nextdlgctl,0,0);
end;
end;
Creo que esa es la razón de la pérdida de foco.