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

chinavvv

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

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

chinavvv

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

jiahaiminghr

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

Akon

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

chinavvv

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

jiahaiminghr

是设置断点吗？

具体是怎么做的？

chinavvv

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

chinavvv

如果程序这样写就能实现我的目的
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

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