【结】[请求]关于DataGrid中CheckBox单选问题!

董一

最初由 shangxy 发布
[B]用数据集的bookmark试试。 [/B]

哦！我试下！谢谢shangxy 。

atiger

楼主，我也无语了，因为看不懂你的代码和你的描述，代码也没有贴全
你说5楼说，你的代码是写在 DataNavigatorBeforeAction里面写的，当BizActnConsts.ActionDataSetSave(保存)时候触发，那么插入新数据时候，就不需要做动作了，

顺便再问一下，你说在插入新数据时候，这个值 EmpEduDataSet.RecNo  是在BeforeInsert还是在AfterInsert上呢，应该在BeforeInsert就能看到了，具体原因可以参考delphi的帮助


顺便说一句，既然你是在保存的时候检查，就不需要在插入时候做动作了，所有逻辑都在导航条的保存按钮上实现就可以了。参考代码如下
var
  i integer;
  lBookMark :String;
begin
// 在这里加上一句判断是否是保存按钮
  i:=0;
  lBookMark := DataSetBroker1.DataSet.Bookmark;
  DataSetBroker1.DataSet.DisableControls;
  DataSetBroker1.DataSet.First;
  while not DataSetBroker1.DataSet.Eof do
    begin
      if DataSetBroker1.DataSet.FieldByName('sl').AsInteger = 1 then
         i:=i+1;
      DataSetBroker1.DataSet.next;
    end;
    if i>1 then
    begin
      dialogs.ShowMessage('已经超出一条了');
      Accept := False;
      DataSetBroker1.DataSet.Bookmark :=lBookMark;
      DataSetBroker1.DataSet.EnableControls;
      sysutils.Abort;
    end;
      DataSetBroker1.DataSet.Bookmark :=lBookMark;
      DataSetBroker1.DataSet.EnableControls;
end;

董一

恩！可能是我表达不清楚吧！
不过通过BoolMark或者存储过程可以实现了！
谢谢几位啊！
结吧！