[C++Builder/Delphi初学者指南] 用C++Builder、Delphi转换数据表
[C++Builder/Delphi初学者指南] 三分秒完成数据表的转换
西安 warton
笔者在先前写程序时，经常遇到数据库的转换问题，一般的方法是用SQL语句将数据从表中取出，再insert到另一个表。这个方法比较通用，在任何编程语言中都可以使用。但这样比较麻烦，需要编程者有一定的经验。
笔者在使用C++Builder和Delphi之后，发现它们提供的BatchMove控件就能完成数据表的转换。而且操作相当方便，在数分钟之内就能完成!
下面，我来做一个实验：将BCDEMOS(Paradox库，CB,Delphi自带)中的Customer.db转换为test.Mdb(MicroSoft ACCESS库)中的test(表)。
1． 建立一个新工程，选择New-àApplication;
2． 添加控件：Table1,Tabel2,DataSource1, DataSource2,DBGrid1, DBGrid2,BatchMove1,Button1,Button2
3． 建立一个MDB文件,打开该文件，建立一个新表，字段只写一个Custno,类型为数字(这里使用的是ACESS的MDB文件数据库，字段不用和paradox表一致，只要第一个字段相同就行，或者只要有一个空表就行)，并为该文件配置ODBC。笔者这里是D:\test.mdb(笔者的odbc dsn设置为access,数据库为：D:\test.mdb，如下图：)。
4． 在C++Builder/Delphi的SQL Explorer中new 一个数据库别名：ACCESS,并选择其odbc dsn为刚才设置的ODBC数据源。
5． 分别为各控件设置属性(只需在控件上设置即可，不用在代码中写了)：
Table1
Table1: TTable
Active = True
DatabaseName = 'BCDEMOS'
TableName = 'customer.db'
Table2
Table2: TTable
DatabaseName = 'ACCESS'
TableName = 'test'
TableType = tDefault
DataSource1
DataSource1: TDataSource
DataSet = Table1
DataSource2
DataSource2: TDataSource
DataSet = Table2
BatchMove1
BatchMove1: TBatchMove
Destination = Table2
Mode = batCopy //很重要，表明是复制模式
Source = Table1
DBGrid2
DBGrid2: TDBGrid
DataSource = DataSource1
DBGrid1
DBGrid1: TDBGrid
DataSource = DataSource2
Button1
Button1: TButton
Caption = '转换'
Button2
Button2: TButton
Caption = '刷新'
6．为Button1及Button2添加事件：
void __fastcall TForm1::Button1Click(TObject *Sender)
{
BatchMove1->Execute();//执行转换
}
void __fastcall TForm1::Button2Click(TObject *Sender)
{
Table2->Open(); //打开表，可以在DBGrid2中看到转换的结果
}
最后，编程并运行程序，点击Button1等程序执行完毕后，点击Button2，你会发现Paradox库中的Customer.db中的数据全都导入到了ACCESS库 test.mdb的test表中了。
使用这种方法操作相当简单，只需要简单地设置几个相关的性就OK了，有兴趣的朋友不妨试试。(本测试程序在windows XP Home Edition ,C++Builder 6下完成)