如何将adoquery中的数据复制到 Ttable 中

Posted 2020-10-18 癫狂编程

Delphi 7.0 
 控件：  adoquery1:Tadoquery 
              table1       :Ttable 

 adoquery1 open  后  如何将数据复制到tabel1中

 以前用BDE 的query1  时 使用 table1.BatchMove(query1,batAppend); 这样复制数据
可是将query1 换成了 adoquery 如何在复制到table1表中呢 。。 
如果直接修改成 table1.BatchMove(adoquery1,batAppend);  会提示 类型错误

 

BDE和ADO是不同的两种数据库接口组件，一个是borland，一个是微软的，不能混用的。table1.BatchMove()要求参数是BDE的数据集，而adoquery1是ADO的。可以都用ADO，试试数据集克隆： ADOTable1.Clone(ADOQuery1);

 

可以混用的，只要二种方式打开不同的数据库，再通过循环复制，比较有效。只要二个数据集有效，就可以复制了。