判断keypress
将不需要的键加控制条件

解决方案 »

  1.   

    在KeyDown里面写程序吧,限制VK_DOWN,VK_NEXT的作用。
      

  2.   

    procedure TForm1.Table1BeforeInsert(DataSet: TDataSet);
    begin
      Abort ;   
    end;
      

  3.   

    我刚看了源码,问题就在KeyDown的VK_DOWN里面。所以限制该键至关重要。
    尤其Dataset.eof是True的时候。
      

  4.   

    FormKeyDown里
    控制Down键
    或在TableBeforeInsert里判断它的下一条是否为最后一条纪录。
      

  5.   

    把ISEDITING设为FALSE,ROWSELECT为TRUE!呵呵!
      

  6.   

    看来没有其他办法了
    正确应该是:
    DataSet.Eof or dataset.recno=dataset.recordcount
      

  7.   

    如果是query问题又出来了!!!!!1
      

  8.   

    我这里有代码,
      设置form的keypreview-true
      procedure Tform.FormKeyDown(Sender: TObject; var Key: Word;
      Shift: TShiftState);
        begin
          if (table1.recno=table1.RecordCount )and (key=vk_down)then key:=0;
        end;