我在form1中添加了如下控件
DBGrid1,Table1,DataSource1,Button1
DBGrid1中的显示结果如下:
       工资    奖金
一月    4       5
二月    5       6
三月    6       5
...     ..      ..
总计    x       y'这条记录是在单击Button1之后产生的。
Button1的程序代码如下:
  table1.Append;
  table1bdedesigner.Value:='统计';
我在数据库中将:工资,奖金,都定义成了integer类型,
并且我用的是SQL数据库。
我想计算出x,y,我写的代码如下:
var x:double
procedure TForm9.Table1CalcFields(DataSet: TDataSet);
var
a:double;
begin
  a:=table1.fieldbyname('在册').asfloat;
  x:=x+Goodsgold;
  table1bdedesigner2.Value:=round(x);把i转化为integer型
end;
结果出现了类型上的错误。
[错误]WARNING. Duplicate resource(s):
[错误]Type 10 (RCDATA), ID TFORM9:
[错误]File D:\Projects\oa3\Unit9.dfm resource kept; 
      file D:\Projects\oa3\Unit9.DFM resource discarded.
请大家为我想一想解决办法。