Código Delphi [-] procedure TForm1.FormShow(Sender: TObject); begin SelectNext(ActiveControl, True, True); end;
procedure TForm1.FormShow(Sender: TObject); begin SelectNext(ActiveControl, True, True); end;