procedure table2totalbe1 ;
begin
  with table2 do
  begin
    open;
    table1.close;
    table1.emptytable;
    table1.open;
    table1.append;
    while not eof do
    begin
     fieldbyname('t1').asstring:=table1.fieldbyname('t1').asstring;
     fieldbyname('t2').asstring:=table1.fieldbyname('t2').asstring;
     fieldbyname('t3').asstring:=table1.fieldbyname('t3').asstring;
     fieldbyname('t4').asstring:=table1.fieldbyname('t4').asstring;
     next;
     table1.append;
    end;
  end;end;

解决方案 »

  1.   

    insert into table1 select t1,t2,null as ttt, t3,t4 from table2
      

  2.   

    小虫:DELPHI可以这样写吗?我看看帮助…………
      

  3.   

    这是一个解决方案问题,]
    用batchmove有一个maping什么的TSTRING型的属性,
    在其中设置动态建立的表的字段名及数据来源字段名,
    例:
    for i:=0 to table1.fields.count 
      batchmove1.maping.lines.add(table1.fields[i].fieldname+'='+table1.fields[i].fieldname)当然,上面的方案是源表和目标表的字段是一样的
    可稍加修改,我很长时间没用DELPHI做程序了,
    不知道语法对不对,请包涵