DataSetBroker1.DataSet.ApplyUpdates问题。

zykj

procedure TSBDDDCT.FlowBroker1CreateFlowOutFlowTasks(Sender: TObject; Command: TFlowOutCommand);
begin
      try
       begin
           …;
       end
      except
       begin
          //当try捕捉到异常，程序执行到此地方
          DataSetBroker1.DataSet.Edit;
          DataSetBroker1.DataSet.FieldByName('LCZT').AsString:= 'ssssss'
          DataSetBroker1.DataSet.Post;
          DataSetBroker1.DataSet.ApplyUpdates;
          //无论程序怎么执行，DataSetBroker1.DataSet.ApplyUpdates都不会成功，也就是DataSetBroker1.DataSet.FieldByName('LCZT').AsString:= 'ssssss'一直都无法写入数据库。
          SysUtils.abort;  //这行代码，我的程序一定需要。
       end
      end;
    linf.Free;
end;


我的目的是在程序异常时候，往数据库写一个标志位，但是一直没办法实现，怎么办？

lixy

用tquery组件去做。

zykj

能否说详细一些，谢谢

lixy

用tquery去提交你的数据。就是替换  DataSetBroker1.DataSet