dbgrid

Question

在dbgrid中怎样实现按回车键后光标跳到下一个单元格，如果是一行中的最后一个单元格，就跳到下一列的首个单元格。

Answer 1

if TDBGrid(Sender).SelectIndex<>TDBGrid(Sender).Columns.Count-1 then
  TDBGrid(Sender).SelectIndex:=TDBGrid(Sender).SelectIndex+1
else
begin
  TDBGrid(Sender).DataSource.DataSet.Next;
   TDBGrid(Sender).SelectIndex:=0;
end;