有一种规范的方法就是使用Tbatchmove控件。
首先建两个数据库别名可以预先定义,也可以动态定义。
Alias_soure,它的路径属性是 原表的路径
Alias_dest,它的路径属性是 备份表的路径
tbl_source:ttable;
databasename:=alias_source;
tablename:=原表的名字.db
tbl_dest:ttable;
databasename:=alias_dest;
tablename:=备份表的名字.db
batchmove1.sourec:=tbl_source;
batchmove1.destmination:=tbl_dest;
batchmove1.execute;
然后就OK了