我有一个简单的问题,不知那位兄弟帮忙解决一下。
我想去掉在DBGRID的中增加数据,也就是不要用户按TAB键增加数据,我时采用SQL语句生成数据的,要求还要能修改的。

解决方案 »

  1.   

    procedure TForm1.DBGrid1KeyDown(Sender: TObject; var Key: Word;
      Shift: TShiftState);
    begin
      if key = VK_TAB then abort;
    end;
      

  2.   


    procedure TForm1.Query1AfterScroll(DataSet: TDataSet);
    begin
        with query1 do
        if State in [dsinsert] then
        cancel;
    end;
      

  3.   

    我来晚了,可以采用在DBGrid1KeyDown事件中if key = VK_TAB then abort;就可以了,
      

  4.   

    如果是想屏蔽掉所有的插入方法,应用我的方法,
    如果除了tab,这想用其他的方法插入就屏蔽vk_tab
      

  5.   

    if query1.state=dsinsert  then
       DBGrid1.ReadOnly:=False;