【结贴】自定义数据集的问题？**

lotus

请问我现在做了这样的操作：
1.在窗体里添加了一个自定义数据集，同时在里面定义了三个数据字段，如图1所示。

lotus

2.我用一个DataGrid来显示这个自定义数据集，
3.其中temp字段我设置了一个Checkbox来显示，我希望能够通过单击DataGrid的一条记录来勾选这条记录，在DataGrid的OnClick事件中的代码我是这样写的：
     if DataSetYYZDYSJJ.Eof then exit;
     if  DataSetYYZDYSJJ.RecordCount>0 then
     begin
          DataSetYYZDYSJJ.Edit;
          if DataSetYYZDYSJJ.FieldByName('temp').AsString='F' then
             DataSetYYZDYSJJ.FieldByName('temp').AsString:='T'
          else
             DataSetYYZDYSJJ.FieldByName('temp').AsString:='F';
     end;
4.通过点击一个RadioButton来全选或者取消选择，在RadioButton的onClick的事件中的代码如下：
  if DataSetYYZDYSJJ.Eof then exit;
  if RadioButton1.Checked then
  begin
       DataSetYYZDYSJJ.Last;
       while not DataSetYYZDYSJJ.bof do
       begin
            DataSetYYZDYSJJ.edit;
           DataSetYYZDYSJJ.FieldByName('temp').AsString:='T';
            DataSetYYZDYSJJ.Refresh;
            DataSetYYZDYSJJ.Prior;
       end;
       DataSetYYZDYSJJ.first;
  end ;

lotus

问题 ：  
1.DataGrid的数据展开后，单击DataGrid中的一条记录并未选中，但是多次单击DataGrid的其他记录再来勾选这条记录则能够被选中。
2.DataGrid的数据展开后，单击RadioButton并未全选，但是多次点击DataGrid后又可以全选成功了。
请问上面这两个问题有办法能够解决没？

zfang

更正一下2楼的，
3.其中temp字段我设置了一个Checkbox来显示，我希望能够通过单击DataGrid的一条记录来勾选这条记录，在DataGrid的OnClick事件中的代码我是这样写的：
     if DataSetYYZDYSJJ.Eof then exit;
     if  DataSetYYZDYSJJ.RecordCount>0 then
     begin
          DataSetYYZDYSJJ.Edit;
          if DataSetYYZDYSJJ.FieldByName('temp').AsString='F' then
             DataSetYYZDYSJJ.FieldByName('temp').AsString:='T'
          else
             DataSetYYZDYSJJ.FieldByName('temp').AsString:='F';
     end;
这里不需要你用代码去给他赋值的。

4.通过点击一个RadioButton来全选或者取消选择，在RadioButton的onClick的事件中的代码如下：
  if DataSetYYZDYSJJ.Eof then exit;
  if RadioButton1.Checked then
  begin
       DataSetYYZDYSJJ.Last;
       while not DataSetYYZDYSJJ.bof do
       begin
            DataSetYYZDYSJJ.edit;
           DataSetYYZDYSJJ.FieldByName('temp').AsString:='T';
            DataSetYYZDYSJJ.Refresh;//取消这句
            DataSetYYZDYSJJ.Prior;
       end;
       DataSetYYZDYSJJ.first;
  end ;
另外，循环赋值的时候最好加上dataset.disablecontrols，循环结束后dataset.enablecontrols;

zfang

3楼的问题应该是
datagrid的属性设置问题。具体可以搜索一下论坛

zfang

设置选中OptionsBehavior--->edgoImmediateEditor和OptionsEx---->egoShowButtonAlways
看看结果。

lotus

谢谢哦   结贴吧