将query的结果输出到新表

]、。·ˉˇ¨〃々—～‖…’”〕〉》」』〗】∶！＂＇），．：；？］｀ 例: query1里有lookup和计算字段.

   另起一个query2.

   query2的sql为: insert into table values(:a1, :a2, ...:aN)

   程序中: Query2.ParamByName('a1').AsString := Query1.FieldByName('a1').AsString;

          Query2.ParamByName('a2').AsString := Query1.FieldByName('a2').AsString;

          ......

          Query2.ParamByName('aN').AsString := Query1.FieldByName('aN').AsString;

          Query2.ExecSQL;