本文我们就介绍一个Dbgrid中显示多数据库的实现方法:假设要编制一个人事管理程序,为简化演示程序,只建立两个数据库,每个数据库都只建立两个字段。如下所示:
个人简介 jianjie.dbf,由人事处维护;工资情况 gongzi.dbf,由财务处维护。
现在我们开始逐步地实现这一过程:
一、数据库的建立
进入DataBase Desktop,建立数据库结构如下:
jianjie.dbf
编号 字段名:bianhao size:4 type:number
姓名 字段名:xingming size:10 type:character
gongzi.dbf
编号 字段名:bianhao size:4 type:number
工资 字段名:gongzi size:4 Dec 2 type:number
注意:两个数据库的bianhao字段的size、type必须一致。实际上,两数据库文件可以分布在网络的不同计算机上,为便于演示,分别存为″c:\test\jianjie.dbf″和″c:\test\gongzi.dbf″。
二、应用程序的编制
启动Delphi,新建一个工程,在窗体中加入Query控件Query1,databasename属性设为c:\test;
加入DataSource控件datasource1,DataSet属性设为Query1;加入DbGrid控件dbgrid1,DataSource属性设为DataSource1,将Query1.sql属性设为
- SELECT DISTINCT A.bianhao,a.xingming, b.gongzi
- FROM ″jianjie.dbf″ A, ″gongzi.DBF″ b
- WHERE A.bianhao=b.bianhao
再将Query1.enabled属性设为True,不用编译,DbGrid1就会显示:bianhao,xingming,gongzi三个字段。如果jianjie.dbf和gongzi.dbf中有记录,则记录会显示出来了。
到此,本文已经介绍完毕了,如果您有更好地显示多数据库的方法,也欢迎您与我们分享,谢谢了!
【编辑推荐】