[结贴]大家帮忙看看**

chinavvv · 发表于 2008-1-23 15:54:39

procedure TJYJHJS_CT.FlowBroker1AfterFlowBack(Sender: TObject; Command: TFlowBackCommand);
begin
   DataSetBroker1.DataSet.open;
   DataSetBroker1.DataSet.First;
   //jsdialogs.ShowMsg(,'');
   while not DataSetBroker1.DataSet.Eof do
      begin
            DataSetBroker1.DataSet.Edit;
            DataSetBroker1.DataSet.FieldByName('SJJYJHID').AsString:='';
            DataSetBroker1.DataSet.Next;
      end;
   DataSetBroker1.DataSet.ApplyUpdates;
   DataSetBroker1.DataSet.close;
end;

当DataSetBroker1数据集有一条数据时while循环执行一次,当DataSetBroker1数据集有N条数据时while循环执行N-1次,请问怎么才能有N条数据while循环执行N次呢?

shangxy · 发表于 2008-1-23 16:36:44

1条数据执行1次
n条数据执行的也是N次，不会是N－1次

chinavvv · 发表于 2008-1-23 16:39:39

我测试的怎么总是少一次呢?

jiahaiminghr · 发表于 2008-1-23 16:41:28

楼主是怎么发现少执行一次的？

Akon · 发表于 2008-1-23 16:44:28

少一次?楼主,怎么得出来少一次的?

chinavvv · 发表于 2008-1-23 16:52:12

通过中断就可以测试出来呀

jiahaiminghr · 发表于 2008-1-23 16:57:09

是设置断点吗？

具体是怎么做的？

chinavvv · 发表于 2008-1-23 17:22:11

具体做法是在任务被退回时把从数据集中的SJJYJHID字段设置为空，下图就是DataSetBroker1数据集中的两个子项目，事件触发时只有一个项目被修改了

chinavvv · 发表于 2008-1-23 17:23:54

如果程序这样写就能实现我的目的
procedure TJYJHJS_CT.FlowBroker1AfterFlowBack(Sender: TObject; Command: TFlowBackCommand);
begin
   DataSetBroker1.DataSet.open;
   DataSetBroker1.DataSet.First;
   //jsdialogs.ShowMsg(,'');
   while not DataSetBroker1.DataSet.Eof do
      begin
            DataSetBroker1.DataSet.Edit;
            DataSetBroker1.DataSet.FieldByName('SJJYJHID').AsString:='';
            DataSetBroker1.DataSet.Next;
      end;
      DataSetBroker1.DataSet.Edit;
      DataSetBroker1.DataSet.FieldByName('SJJYJHID').AsString:='';
   DataSetBroker1.DataSet.ApplyUpdates;
   DataSetBroker1.DataSet.close;
end;

shangxy · 发表于 2008-1-24 09:32:20

不会啊,楼主把断点设置到循环的
DataSetBroker1.DataSet.FieldByName('SJJYJHID').AsString:='';上
如果有2条记录肯定会执行到2次的.

		自动登录	找回密码
密码			立即注册