DBGridEH里镶嵌了CheckBox,当打勾或取消打勾时触发什么事件?

解决方案 »

  1.   

    不是有OnCheckButton事件么?
    如果这个不是你就用DataSet的AfterEdit事件吧
      

  2.   

    我想是OnCheckButton事件,但没有反应,DataSet的AfterEdit事件应该不行吧,那其它字段的Edit不是也要触发AfterEdit事件?
      

  3.   

    DBGridEH 这个控件应该是不要你自己添加复选框的,数据库字段为 bit  类型时,你可以设为以复选框的形式显示
      

  4.   

    其实很多事不一定要那个点击事件,你可以在Column的UpdateData事件中弄
    譬如你要单选可以这样:
    procedure TForm1.DBGridEh1Columns0UpdateData(Sender: TObject;
      var Text: String; var Value: Variant; var UseText, Handled: Boolean);
    var
      ABookMark: TBook;
    begin
      if Value = False then Exit;
      ABookMark := ADOTable1.GetBook;
      ADOTable1.DisableControls;
      ADOTable1.First;
      while not ADOTable1.Eof do
      begin
        ADOTable1.Edit;
        ADOTable1['selected'] := False;
        ADOTable1.Next;
      end;
      ADOTable1.GotoBook(ABookMark);
      ADOTable1.Edit;
      ADOTable1.EnableControls;
    end;