第13章 数据库编程(17)

delphi数据库编程

arAllChapters：删除所有子集记录。

9. 创建主表/细表关系简介

（参见教材311页例13-8）

在数据库应用程序中，常常需要处理数据表之间的“一对多”关系，即对于主表（Master）中的某个记录来说，从表（细表，Detail）中有多个记录与之对应。例如，“学籍”表中含有学生的基本信息，其中“学号”字段一般设置为主键或主索引（惟一）；“成绩”表中含有学生的各科成绩，一个学生每门课程的成绩构成一条记录，因此“成绩”表中的“学号”字段肯定会有重复值。这样，“学籍”表与“成绩”表中的“学号”字段就构成了“一对多”关系。另一个典型例子是客户基本信息与客户定单之间的关系。

下面以“学籍”表与“成绩”表为例，说明创建主表/细表关系的一般步骤。

① 在窗体上或数据模块中添加一个ADOConnection组件，与学生数据库建立连接。

② 添加两个ADOTable组件，分别命名为ADOTblMaster和ADOTblDetail。将它们的Connection属性均设置为第①步中建立的连接组件。

③ 将主表ADOTblMaster组件的TableName属性设置为学籍表，将细表ADOTblDetail组件的TableName属性设置为成绩表。

④ 添加两个DataSource组件，分别命名为SrcMaster和SrcDetail。将它们的Dataset属性分别设置为ADOTblMaster和ADOTblDetail。

⑤ 选定ADOTblDetail组件，在属性窗口将其主数据源属性MasterSource设置为SrcMaster。然后单击MasterFields钮，打开字段关联设计器【Field Link Designer】，建立主/细表“学号”字段的关联。

⑥ 添加两个DBGrid组件，将其属性DataSource属性分别设置为SrcMaster和SrcDetail。

⑦ 依次将ADOTblMaster和ADOTblDetail组件的Active属性设置为True。

程序运行时，在主表中移动记录指针，细表中将会显示当前学生的各科成绩。