汇总问题，由于当初表结构没考虑全，导致汇总起来相当刺手，高手出招啊！

我要做一个汇总报表，是动态的。比如一张表“定义调整工资项目”表 这张表是定义调整的项目 如津贴调整 奖金调整  月薪调整 等等。 另一张表“人员调整工资”记录人员调整的的情况 如 （小李 月薪调整  2000元  ）。现在要动态做汇总  也就是说 “定义调整的项目” 是由用户定义的 不能在程序写死的 “人员调整工资”表结构（人员姓名 工作部门 职务 调整工资项目名） 我的程序是用Tquery从“人员调整工资”把 人员姓名  工作部门 职务 都取出来了 但是调整工资项目名怎么取出来效果才能达到 人员姓名  工作部门 职务 月薪调整  奖金调整 津贴调整 交通费调整
                          小李      人事部   职员  2000    1000       0       200
                          小张      销售部   经理   4000    2000     300     500
                           ..
                           ..
                           ..
问题是当时设计表结构的时候没考虑全 但若改表结构很麻烦了  人员姓名  工作部门 职务 能从表“人员调整工资”取出来。 月薪调整  奖金调整 津贴调整 交通费调整 能从“定义调整的项目”取出来 但是当写SQL语句（from 表名）是没办法取出月薪调整  奖金调整 津贴调整 交通费调整 字段 ，因为这两张表的字段都没有叫月薪调整  奖金调整 津贴调整 交通费调整 的 。所以抱错。现在想新加ＴＴａｂｌｅ把月薪调整  奖金调整 津贴调整 交通费调整 做为表ｔａｂｌｅ１的字段，但是我建立后　老报错　说表ｔａｂｌｅ１不存在　　再想办法把各人员调整工资的值赋上
建表语句
Table1.TableName := MakeTemptablename;//给表赋名字　
  with table1 do
  begin
    with qrytmpqry do
      begin
        Close;
        SQL.Clear;
        SQL.add(' SELECT NAME ,DM');
        SQL.Add(' FROM xinjinTZ');
        Open;
        I := 0;
        while not EOF do
        begin
          Field[I] := TCurrencyField.Create(table1);
          Field[I].FieldName := qrytmpqry.FieldByName('DM').AsString;
          Field[I].Name := table1.Name + Field[I].FieldName;
          Field[I].Index := I;
          Field[I].DisplayLabel := qrytmpqry.FieldByName('NAME').AsString;
          Field[I].OnGetText := FldMoneyOnGetText;
          I := I + 1;
          next;
        end;
      end;
  Table1.Active := True;谁有办法解决吗　　急死了
暂无分了　解决后　以后补分啊