起步软件技术论坛-X3

 找回密码
 立即注册
搜索
12
返回列表 发新帖
楼主: chinavvv

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

[复制链接]
 楼主| 发表于 2008-1-24 09:40:33 | 显示全部楼层
我就是按你说的做的呀,结果是循环体内执行了一次就跳出了。
我现在纳闷的是跳出循环后,这两句还能执行
    DataSetBroker1.DataSet.Edit;
        DataSetBroker1.DataSet.FieldByName('SJJYJHID').AsString:='';
为什么?按常理说,这两句是不能被执行的呀。程序参考9楼。
回复 支持 反对

使用道具 举报

 楼主| 发表于 2008-1-24 10:04:30 | 显示全部楼层
shangxy,留个QQ,远程协助一下如何?
回复 支持 反对

使用道具 举报

发表于 2008-1-24 10:06:27 | 显示全部楼层
869209605
回复 支持 反对

使用道具 举报

 楼主| 发表于 2008-1-24 10:56:56 | 显示全部楼层
问题已经解决了,改用For循环,程序如下:
procedure TJYJHJS_CT.FlowBroker1AfterFlowBack(Sender: TObject; Command: TFlowBackCommand);
var i :integer;
begin
     DataSetBroker1.DataSet.open;
     DataSetBroker1.DataSet.First;
     //jsdialogs.ShowMsg(,'');
     for i:=1 to  DataSetBroker1.DataSet.RecordCount do
         begin
              DataSetBroker1.DataSet.Edit;
              DataSetBroker1.DataSet.FieldByName('SJJYJHID').AsString:='';
              DataSetBroker1.DataSet.Next;
         end;

     DataSetBroker1.DataSet.ApplyUpdates;
     DataSetBroker1.DataSet.close;
end;
回复 支持 反对

使用道具 举报

 楼主| 发表于 2008-1-24 10:58:14 | 显示全部楼层
感谢869209605的帮助,结帖吧
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

小黑屋|手机版|Justep Inc.

GMT+8, 2025-7-5 20:06 , Processed in 0.040841 second(s), 13 queries .

Powered by Discuz! X3.4

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表