📄 70.htm
字号:
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>CTerm非常精华下载</title>
</head>
<body bgcolor="#FFFFFF">
<table border="0" width="100%" cellspacing="0" cellpadding="0" height="577">
<tr><td width="32%" rowspan="3" height="123"><img src="DDl_back.jpg" width="300" height="129" alt="DDl_back.jpg"></td><td width="30%" background="DDl_back2.jpg" height="35"><p align="center"><a href="http://bbs.tsinghua.edu.cn"><font face="黑体"><big><big>水木清华★</big></big></font></a></td></tr>
<tr>
<td width="68%" background="DDl_back2.jpg" height="44"><big><big><font face="黑体"><p align="center"> Delphi编程 (BM: strayli FlyingBoy) </font></big></big></td></tr>
<tr>
<td width="68%" height="44" bgcolor="#000000"><font face="黑体"><big><big><p align="center"></big></big><a href="http://cterm.163.net"><img src="banner.gif" width="400" height="60" alt="banner.gif"border="0"></a></font></td>
</tr>
<tr><td width="100%" colspan="2" height="454"> <p align="center">[<a href="index.htm">回到开始</a>][<a href="14.htm">上一层</a>][<a href="71.htm">下一篇</a>]
<hr><p align="left"><small>发信人: pitts (痛并快乐着), 信区: Delphi <br>
标 题: 用Delphi进行数据库之间转换 <br>
发信站: BBS 水木清华站 (Tue Oct 13 11:07:50 1998) WWW-POST <br>
<br>
用Delphi进行数据库之间转换 <br>
<br>
中国船舶工业物资中南公司(430030) 邓汉清 <br>
<br>
在实际应用中,可能会遇到将一种数据库转为另一种数据库的 <br>
情况,而Delphi可以完成这 种功能。尤其是需要将以前的dbase <br>
数据库结构及内容转换成其它数据库结构时,采用此方法 简 <br>
单、快速且安全。 <br>
<br>
Delphi是一种Windows应用程序开发软件。它速度快,具有强 <br>
大且容易使用的可视化开发 环境,并采用了具有弹性和可重用 <br>
的完整的面向对象程序语言。 <br>
<br>
由于以上的这些特点,Delphi可以让我们快速地建立起主从结 <br>
构的应用程序,可产生单一 可执行文件与动态链接库以及从单 <br>
机、网络到主从结构的应用程序。 <br>
<br>
使用Delhpi可以方便而快速地建立强大的数据库应用程序,可 <br>
以和Paradox、dbase、Lo cal InterBase Server、Foxpro及 <br>
ODBC数据源等多种桌面型数据库直接配合使用。 <br>
<br>
数据库转换方法 <br>
<br>
1.所使用的控件 <br>
<br>
<br>
<br>
2.TBatchMove控件的使用 <br>
<br>
TBatchMove允许在一组记录或是整个数据表中执行特种作业, <br>
这个控件的主要用途在于 把数据从服务器中卸到本地的数据 <br>
源供分析或进行其他操作。TBatchMove可以在目的地建立 对 <br>
应于原数据表内容的数据表,自动将列名及数据类型进行适当 <br>
的对应操作。 <br>
<br>
TBatchMove两个特性指明批量移动(Batch Move)操作的源表及 <br>
目的表。Source指定一个 对应于已有的源数据表的数据集(一 <br>
个Tquery或Ttable控件),Destination指明对应于一个数 据 <br>
库数据表的Ttable控件,目的数据表可以是已经存在的也可以 <br>
是不存在的。 <br>
<br>
<br>
Mode特性指明TBatchMove对象所要做的事情: <br>
<br>
<br>
<br>
我们可以根据batCopy模式,对数据库类型进行适当的转换,以 <br>
下是从dBASE类型到其它类 型之间的转换结果: <br>
<br>
<br>
<br>
数据库转换举例 <br>
<br>
现有用Foxbase开发的财务程序中的会计科目数据库 <br>
(kjkmk.dbf),系统将升级到Window s环境下开发,数据库将采 <br>
用Paradox语言。为了沿用该库结构和数据,可采用如下方法 <br>
进行转 换。 <br>
<br>
1.Datasource1控件: <br>
<br>
AutoEdit True <br>
<br>
DataSet Table1 <br>
<br>
<br>
Enabled True <br>
<br>
Name DataSorce1 <br>
<br>
2.Table1控件: <br>
<br>
DatabaseName cw <br>
<br>
Name Table1 <br>
<br>
Readonly False <br>
<br>
TableName KJKMK <br>
<br>
TableType udBase <br>
<br>
Datasource1控件和Table1控件共同定义被转换的源文件,该 <br>
文件是在别名为cw里的kjk mk,文件类型为Dbase。 <br>
<br>
3.BatchMove1控件: <br>
<br>
Destination Table2 <br>
<br>
Mode balCopy <br>
<br>
Name BatchMove1 <br>
<br>
Sorce Table1 <br>
<br>
MatchMovel控件定义转换类型为Copy以及源文件、目标文件。 <br>
<br>
4.Datasource2控件: <br>
<br>
AutoEdit True <br>
<br>
DataSet Table2 <br>
<br>
Enabled True <br>
<br>
Name DataSorce2 <br>
<br>
.Table2控件: <br>
<br>
DatabaseName cwdb <br>
DatabaseName cwdb <br>
<br>
Name Table2 <br>
<br>
Readonly False <br>
<br>
TableName KJKMK <br>
<br>
TableType uParadox <br>
<br>
Datasource2控件和Table2控件共同定义转换后的目标文件, <br>
该文件是在别名为cwdb里的 kjkmk,文件类型为Paradox。 <br>
<br>
6.DbGrid1控件: <br>
<br>
Datasorce Datasorce1 <br>
<br>
Name DbGridl <br>
<br>
DbGridl网格控件先定义源文件,执行转换后再定义目标文件, <br>
主要用于方便查看。 <br>
<br>
7.Button1控件: <br>
7.Button1控件: <br>
<br>
OnClck ButtonClck <br>
<br>
OndragDrop <br>
<br>
Ondragover <br>
<br>
OnEnddrag <br>
<br>
该控件有一个OnClick事件,表示执行文件类型转换。其代码 <br>
如下: <br>
<br>
procedure TForm1.Button1Click(Sender:TObject); <br>
<br>
begin <br>
<br>
BatchMove1.execute; <br>
<br>
end; <br>
<br>
经上述方法定义,编译执行后,即可将kjkmk.dbf文件转换成 <br>
kjkmk.db文件,然后就可以用 Database Desktop工具对其进 <br>
行修改调整。 <br>
<br>
用此方法还可进行其它任意文件的转换。 <br>
<br>
<br>
-- <br>
<br>
怎一个惨字了得 <br>
<br>
※ 来源:·BBS 水木清华站 bbs.net.tsinghua.edu.cn·[FROM: 166.111.7.26] <br>
</small><hr>
<p align="center">[<a href="index.htm">回到开始</a>][<a href="14.htm">上一层</a>][<a href="71.htm">下一篇</a>]
<p align="center"><a href="http://cterm.163.net">欢迎访问Cterm主页</a></p>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -