Código Delphi [-]procedure TForm1.DBGrid1KeyDown(Sender: TObject; var Key: Word; Shift: TShiftState); begin if Key = VK_TAB Then begin SelectNext(ActiveControl, True, True); Key := 0; end; end;
procedure TForm1.DBGrid1KeyDown(Sender: TObject; var Key: Word; Shift: TShiftState); begin if Key = VK_TAB Then begin SelectNext(ActiveControl, True, True); Key := 0; end; end;