【结贴】刷新问题**

黄金软件

打开两个功能,一个是登记,一个是查询.首先在登记功能中登记一条记录,然后在查询功能中点击刷新,则该条记录显示,现在问题是:查询功能中有一个临时字段,数据类型为整数,表现类型为checkbox,刚才的刷新操作后,此记录的checkbox默认为未知状态.怎么修改为不选状态?

黄金软件

刷新事件代码如下:
case TBizDataSetAction(Sender).ID of
   BizActnConsts.ActionDataSetRefresh:
     begin
     with  DataSetBroker1.DataSet do
      begin
      Open();
      First();
      DataSetBroker1.DataSet.DisableControls;
      for I:=0 to RecordCount-1 do
        begin
          DataSetBroker1.DataSet.Edit;
          DataSetBroker1.DataSet.FieldByName('SFSC').AsInteger:=0;
          Next;
        end;
      EnableControls;
     end;
    end;
    end;
不知道应该怎么改?

lixy

http://bbs.justep.com/forum.php?mod=viewthread&tid=4311

gaihl

对于Integer表现为CheckBox时:   为1时,表示选中,.为0时为不选中. 为其它值时,为灰选

黄金软件

不懂,3楼链接的代码,我一直用着,如果查询窗体当前是关闭的,从登记窗体添加新纪录后,再打开查询窗体,是正确的.现在主要是两个窗体都打开的时候,在登记的窗体添加新纪录以后,回到查询窗体,该条新纪录的临时字段状态未知,

黄金软件

最初由 gaihl 发布
[B]对于Integer表现为CheckBox时:   为1时,表示选中,.为0时为不选中. 为其它值时,为灰选 [/B]

是,可是我要在刷新事件里怎么写,才能控制在别的窗体中添加的新记录,此时查询出来以后,临时字段默认也是0呢?

gaihl

DataSetBroker1.DataSet.FieldByName('XXXX').AsInteger:=0;
在刷新时,给临时字段赋值为0

黄金软件

最初由 gaihl 发布
[B]DataSetBroker1.DataSet.FieldByName('XXXX').AsInteger:=0;
在刷新时,给临时字段赋值为0 [/B]

请看我2楼的代码,已经赋值为0了呀~~还是不行呢~~ ;)

gaihl

我看你2楼的图,有两个是未选中状态,那个是如果实现的.
可以跟踪一下代码,看一下DataSetBroker1.DataSet.FieldByName('SFSC').AsInteger 的值,前两个的值和未选中的值

黄金软件

好像还是我说的不明白.重新表达一下:
图上的前两个未选中状态的记录,是以前就有的记录,也就是打开查询窗口时就存在的,而后一个没实现的记录,是我开着查询窗口,然后到另一个登记窗口中新添加的记录. ,如果我现在将查询窗口关闭,再重新打开,则最后那个没实现的记录,也会变成未选中状态..现在就是实现不了 即时状态 的改变.只要关了查询窗口重进,是可以实现的.