Problemas con foco

[[oscarac]]

quizá sea una tonteria, pero no encuentro solución

tengo un TComboBox, un TRadioGroup y un Edit, en ese orden

el problema es que cuando salgo del TcomboBox con Enter, el "foco" desaparece en el radiogroup, presiono enter una vez mas y el foco recien aparece en el radiogroup

loco no?

no creo que sea normal quiza algo no estoy contemplando?

Código Delphi [-]
FormKeyPress
begin
  if Key = #27 then
  begin
    key := #0;
    close;
  end;

  if key = #13 then
  begin
    Perform(WM_NEXTDLGCTL,0,0);
    key := #0;
  end;
end;

KeyPreview = true

[ecfisa]

Hola Oscar.

No sé si es el efecto que estas buscando, pero fijate si así te sirve:

Código Delphi [-]
procedure TForm1.FormKeyPress(Sender: TObject; var Key: Char);
var
  rg: TRadioGroup;
begin
  if Key = #27 then
  begin
    Key := #0;
    Close;
  end;

  if Key = #13 then
  begin
    Perform(WM_NEXTDLGCTL, 0, 0);
    if ActiveControl is TRadioGroup then
    begin
      rg := RadioGroup1;
      if rg.ItemIndex = - 1 then rg.ItemIndex := 0;
      TRadioButton(rg.Controls[rg.ItemIndex]).SetFocus;
    end;
    Key := #0;
  end;
end;

Saludos