【搞定】DataSetBroker OPEN时报错**

crystal

已经解决了。。可以结帖了。。我写在死循环里了。

atiger

啥代码，写到哪个事件上，怎么写的，共享出来看看
原来怎么写的？现在怎么写的？

crystal

回12楼
以前代码
procedure THTXX.dsbChanPinDataChange(Sender: TObject; Field: TDataField);
begin
  if dsbChanPin.DataSet.FieldByName('LSHTJEXJ').AsFloat <> '' then
  begin
    dsbZhuShuJu.DataSet.Edit;
    dsbChanPin.DataSet.Edit;
    dsbZongJi.DataSet.Edit;
    dsbFeiYongBaoGan.DataSet.Edit;
    dsbChanPin.DataSet.FieldByName('XJHTJE').AsFloat := dsbChanPin.DataSet.FieldByName('LSHTJEXJ').AsFloat;
    dsbZongJi.DataSet.FieldByName('HXMZJ').AsFloat := dsbChanPin.DataSet.FieldByName('XJHTJE').AsFloat;
    if dsbZhuShuJu.DataSet.FieldByName('HTLX').AsFloat = 1 then
    begin
      dsbFeiYongBaoGan.DataSet.FieldByName('FHF').AsFloat := 0 ;
    end
    else  begin
      dsbFeiYongBaoGan.DataSet.FieldByName('FHF').AsFloat := dsbZongJi.DataSet.FieldByName('HXMZJ').AsFloat/1000 ;
    end;
  end;
end;


现在放在 beforePost 里 就可以 在 保存前计算出结果。。

atiger

哦，谢谢反馈，结