只要能有正确的原代码，一定有分。请放心（我已经结了三个贴了），多谢关照

Question

可以在数据库的BeforePostz中设置
fieldnameby('金额')=...

Answer 1

我用一下实现了计算，但是如何把计算的结果存入订货表中的金额？
procedure TForm1.Table1CalcFields(DataSet: TDataSet);
 varquantity1:single;price1:Currency;beginquantity1:=Table1.FieldByName('quantity').asfloat; //数量price1:=Table1.FieldByName('price').asCurrency; //单价Table1.FieldByName('cash').asfloat:=quantity1*price1; //应付资金
end;
cash是table1加入的计算字段

Answer 2

to jackie168(杰姬) 
sorry,你上次解答 的问题确实还没有解决好，如果好了，你会有分的