请问各位大侠,在DBGRID中能否在记录中的最后一行里禁用向下的方向键,以避免在EDIT状态下自动新增记录?谢谢!

解决方案 »

  1.   

    如果只是想实现不这样新增,可以这样
    假设你这个DBGRID显示的AdoQuery1中的数据,那么在AdoQuery1的BeforeInsert事件中写上一句
    procedure Tform1.ADOQuery1BeforeInsert(DataSet: TDataSet);
    begin
      Abort;
    end;
      

  2.   

    你可以在下面的事件中判断当前所在的记录位置, 如果是最后一个记录的话,就判断Key是否为下方向键, 如果是就 key := 0 过滤掉
    procedure TForm1.DBGrid1KeyDown(Sender: TObject; var Key: Word;
      Shift: TShiftState);
    beginend;