Código Delphi [-]procedure PasaFoco(Control: TWinControl; Key: Char); begin if Key = Chr(13) then Control.SetFocus; end;
procedure PasaFoco(Control: TWinControl; Key: Char); begin if Key = Chr(13) then Control.SetFocus; end;