如题所示,当程序走到tblanswer.Batchmove(TQury控件,batCopy)就抱错,其中TQury控件把表matable_name里的记录查询出来,再把记录给tblanswer,但是就老告诉我 数据表mytable_name 没找到  郁闷啊 跟踪好久 快郁闷坏了 请教大家啊 万分谢谢

解决方案 »

  1.   

    我要做一个汇总报表,是动态的。比如一张表“定义调整工资项目”表   这张表是定义调整的项目   如津贴调整   奖金调整     月薪调整   等等。   另一张表“人员调整工资”记录人员调整的的情况   如   (小李   月薪调整     2000元     )。 现在要动态做汇总     也就是说   “定义调整的项目”   是由用户定义的   不能在程序写死的   “人员调整工资”表结构(人员姓名   工作部门   职务   调整工资项目名)   我的程序是用Tquery从“人员调整工资”把   人员姓名     工作部门   职务   都取出来了   但是调整工资项目 名怎么取出来效果才能达到   人员姓名     工作部门   职务   月薪调整     奖金调整   津贴调整   交通费调整 
                                                        小李             人事部       职员     2000         1000               0               200 
                                                        小张             销售部       经理       4000         2000           300           500 
                                                          .. 
                                                          .. 
                                                          .. 
    问题是当时设计表结构的时候没考虑全   但若改表结构很麻烦了     人员姓名     工作部门   职务   能从表“人员调整工资”取出来。   月薪调整     奖金调整   津贴调整   交通费调整   能从“定义调整的项目”取出来   但是当写SQL语句(from   表名)是没办法取出月薪调整     奖金调整   津贴调整   交通费调整   字段   ,因为这两张表的字段都没有叫月薪调整     奖金调整   津贴调整   交通费调整   的   。所以抱错。 现在想新加TTable把月薪调整     奖金调整   津贴调整   交通费调整   做为表table1的字段,但是我建立后 老报错 说表table1不存在  再想办法把各人员调整工资的值赋上 
    建表语句 
    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; 谁有办法解决吗  急死了 不用我这办法也行 有别的办法吗  就是表结构不想变了 若变动的话 还有别的程序还得改啊 好急咯
    请问大家怎么给一个表临时表在运行是设计它的表结构 从别的表中给他的字段赋值呢人员姓名     工作部门   职务   月薪调整     奖金调整   津贴调整   交通费调整 
       小李             人事部       职员     2000         1000       0               200 
     小张             销售部       经理     4000         2000       300           500 
                                                          .. 
                                                          .. 
                                                          ..