Tyle udało mi się uzyskać...
To z key może być..
To działa:
if Key=#13 then begin
if DBGrid.SelectedIndex<DBGrid.Columns.Count-1 then
DBGrid.Fields[DBGrid.SelectedIndex+1].FocusControl;
// jeżeli nie będzie tego warunku if, to na ostatnim polu wyrzuci błąd
end;
//a do następnej linii możesz przejść strzałeczką
Jeżeli w DataSource masz coś podłączone to:
if Key=#13 then begin
if DBGrid.SelectedIndex<DBGrid.Columns.Count-1 then
DBGrid.Fields[DBGrid.SelectedIndex+1].FocusControl
else begin
DBGrid.DataSource.DataSet.Next; //może uda Ci się wymusić na samym DBGrid przejście do następnej linii
DBGrid.Fields[0].FocusControl;
end;
end;