你是想对数据库进行操作吗?

解决方案 »

  1.   

    这样可以吗?
    //实发工资在的表为Table2, 姓名在的表为Table1
    var
      dbSalaryTemp: double;
    begin
      //若有Data_aware控件,则先设置Datasource为nil(提高速度),最后再改回来
      Table1.First;
      While not Table1.Eof do
      begin
     //
        dbSalaryTemp :=   Table1.FieldByName('补贴费').Value 
          + Table1.FieldByName('工龄工资').Value + Table1.FieldByName('Salary2').Value;
       // 根据条件移到你的Table2表的纪录,如果一对一关系直接可以用。
       //................
        Table2.Edit;
        Table2.FieldByName('实发工资').Value := dbSalaryTemp + Table2.FieldbyName('奖金').Value + Table2.FieldbyName('加班费').Value ;
        Table2.Post;
        Table1.Next;
      end;
    end;