求助！关于delphi如何用sql语句在access中如何把一个表中整个字段的定义和值复制到另一个表中

Question

求助！关于delphi如何用sql语句在access中如何把一个表中整个字段的定义和值复制到另一个表中！
  如有表一  t1  其中有字段id，姓名，成绩1或成绩2（即此字段名称不定，可以变化）
      表二  t2  其中有字段id，姓名  
      如何有在delphi中用sql语句把t1中的成绩1整个字段的定义和数值复制到t2中，
 或是如何在t2中添加成绩1这列的定义，然后在把数据复制过去，其中：成绩1字段的名称
 不确定，即有多种情况！
      在线等待各位高手的帮忙，深表感激！

Answer 1

你用alter的办法修改你的表2 增加一个字段的
然后insert into t2(成绩1) SELECT　成绩１ FROM t1就是改可以实现的

Answer 2

换个问法：用query的sql语句怎样添加一个可以自己用变量代替字段名称的字段？
     例如：
           var 
           a:string;
           a:='english';
           with query1 do
           begin
             Close;
             Sql.Clear;
            Sql.Add('Alter Table Custom add a char(10) null');     //（1）
            ExecSql;      
           end;
     其中a是一变量，怎样在（1）这句中使a代表的是变量的值，而添加进去的不是字段名称叫a的字段。

Answer 3

alter添加一个字段的方法我试过，关键是我要添加的这个字段的名称是由t2的成绩1来决定的，
也就是有很多个t2的成绩1要添加进去，成绩1应该是一个变量，我就不知道怎么添加了变的字段了！