在DBGrid中用代码实现按回车键跳到下一格的方法
示例:
if Key = 13 then //回車後跳到下一格
with TDbgrideh(ActiveControl) do
begin
if Selectedindex < (FieldCount - 1) then
Selectedindex := Selectedindex + 1
else
begin
dbgrideh.DataSource.DataSet.Next;
Selectedindex := 0;
end
end;
————————————————
好的代码像粥一样,都是用时间熬出来的