数据库应用程序开发

数据源组件
1. OnUpdataData事件 当数据集组件中当前记录将要被修改时，触发该事件。 例如在程序调用post方法之后，但在修改后的数据真正被写 回磁盘中的数据库文件之前触发该事件。 2. OnStateChange事件 当与TDataSource组件相连的数据集组件的状态发生改 变时，便触发该事件。
⒎数据集控件的事件 Ø BeforeOpen/Afteropen：在数据集控件打开之前/ 之后被触发。 Ø BeforeClose/Afterclose：在数据集控件关闭之前/ 之后被触发。 Ø BeforeInsert/AfterInsert：在数据集控件进入插入 状态之前/之后被触发。 Ø BeforeEdit/AfterEdit：在数据集控件被编辑之前/ 之后被触发。
TTable控件及其使用 TTable控件及其使用
1．TTabel控件的主要属性 （1）DatabaseName属性和TableName属性 （2）KeyExclusive属性 （3）IndexFields属性和IndexFieldsCount属性 （4）IndexName属性和IndexFieldNames属性 （5）Exclusive属性 （6）ReadOnly属性和CanModify属性
10.2 数据控制组件简介
数据控制组件用于编辑和显示数据库中的数据，通常 也称其为数据敏感组件，因为它们能够随着数据的变化而 相应的变化。它们的主要功能是与数据源组件相配合，提 供给用户一个对数据进行浏览、编辑等操作的界面。
Data Controls页
10.2 数据控制组件简介
所有数据控制组件都有一个DataSource属性，该属性 指定与其相关的数据源。 数据控制组件既能够把数据库中的数据显示到窗Biblioteka Baidu中 ，又可以将经过修改的数据写回到数据库中。
2．TTable控件的方法及应用 （1）设定数据库表的使用范围 （2）查询数据库表 （3）生成数据库表(如表所示)
各控件的属性设置
控件名 属性 DatabaseName Table1 Tablename Active DataSource1 Label1 Label2 Label3 Button1 Button2 DataSet Caption Caption Caption Caption Caption 属性值 DBDEMOS Employee.db True Query1 雇员号： 雇员号： 姓名： 姓名： 提示信息 查询 退出
表10-1 数据控制组件及其功能 10组件名 TDBGrid 功 能 用表格的形式显示数据集中的记录信息，表格中的各列可以在设计阶段使用字段编 辑器创建也可以在运行过程中用程序设定 它提供了一组按钮用于数据集中的导航，编辑修改、插入、删除记录以及刷新数据 的显示，TDBNavigator中包含的控制按钮在设计阶段可以进行选择 用于显示数据集中当前记录的字段值 用于显示和编辑数据集中当前记录指定的字段值 用于显示数据集中的备注型字段，备注型字段中可以包含多行字符甚至可以是 BLOB(大二进制对象)数据 用于显示数据集中的图像字段和BLOB数据 当用户编辑修改表中当前记录的某个字段时，该组件是一个包含多个选择项的列表 框，用户可以从中选择一个项做为字段的值 该组件是一个组合框，当用户编辑修改表中当前记录的一个指定字段时，可以直接 在该组件中输入字段值也可以单击该组件从下拉式列表框中选择一个字段值 当表中字段的值与该检查框的ValueChecked属性值相匹配时，该检查框被选中 使用该组件可以为用户提供一组选择项，但用户只能从中选择一个可选项 当用户要编辑修改数据集当前记录的指定字段时，使用该组件提供多个可选项，这 多个可选项是从相关的其他表中读取的，且以列表框的形式提供给用户 该组件结合了TDBEdit组件和TDBComboBox组件的功能，用户可以直接向该组件中输 入字段值，也可以从下拉式列表框中选择一个可选项，只是下拉式列表框中的可选 项是从相关的其他的数据集中读取来的。 TDBNavigator
TQuery控件及其使用 TQuery控件及其使用
1．TQuery控件的主要属性和方法
（1）DatabaseName属属 （4）RequestLive属属 （7）ExecSQL方方
（2）SQL属属 （5）UniDirectional属属 （8）Close方方
（3）Params和ParamCount属属 （6）Open方方 （9）Prepare方方
数据访问控件简介
Query
database
updataSQL
table
storedproc
Batchmove
BDEclientDataset
session
nestedtable
BDE控件栏
返回本节
数据访问控件简介
Table:主要是通过BDE存取数据库表中的数据，它是中间媒介。 Query:主要用于使用SQL语句对数据库中表的数据进行查询。 在程序代码中常用到的方法： sql.Clear; sql.add(memo1.Text); query1.Open; Datasource： 是数据集组件是与数据控制组件传送数据的中间通 ： 道。
将数据集置为编辑状态
保存所有被修改的记录， 保存所有被修改的记录，然后将记录指针移到表中的最 后一条记录， 后一条记录，且将数据集置为插入状态
Insert Post
保存所有被修改的记录， 保存所有被修改的记录，将数据集置为插入状态
将插入或者被修改的记录写回到数据表， 将插入或者被修改的记录写回到数据表，当保存成功时 数据集回到浏览状态， 数据集回到浏览状态，若保存不成功则数据集恢复原来 状态
数据集控件及其应用
1．数据集控件的状态 非活动状态（Inactive） 浏览状态（Browse） 编辑状态（Edit） 插入状态（Insert） 查找状态（SetKey） SetKey 处理计算字段状态（CalcFields）
2．数据集的打开和关闭 （1）打开数据集 方法1：通过设置数据集控件的Active属性为True来 打开与数据集相连的数据库表。 方法2：调用数据集控件的Open方法，打开与数据 集控件相连的数据库表，这种方法只能在程序运 行过程中通过程序进行。
10.3 TDBGrid组件 TDBGrid组件
10.3.1 TDBGrid组件的重要属性 组件的重要属性 1. Columns属性 Columns属性用来读取和设置表格中列的特征，所有 Column（列）对象都存储于Columns属性中。 一个Column对象代表DBGrid组件中的一列。 默认情况下，DBGrid组件会在表格中显示数据集中的 所有字段，表格每一列的列名自动采用字段的名字。如果希 望自已定义表格的列，在设计时可以使用DBGrid组件列编 辑器手动设置columns集合。 设计时在DBGrid上右击，在弹出的上下文菜单中选择 【Columns editor】项，激活列编辑器（如下图所示）。双 击DBGrid也可以打开列编辑器,还有一种方式,就是在选中 TDBGrid组件时单击【Object Inspector】的【Columns】 属性。
Ø
BeforePost/AfterPost：在数据集控件保存被修改 的记录之前/之后被触发。 Ø BeforeCancel/AfterCancel：在数据集控件取消进 一步操作之前/之后被触发。 Ø BeforeDelete/AfterDelete：在数据集控件删除当 前记录之前/之后被触发。 Ø OnNewRecord：当建立一条新记录时被触发。 Ø OnCalcFields：当为表中的计算字段计算字段值 时被触发。
TDBText TDBEdit TDBMemo
TDBImage TDBListBox
TDBComboBOx
TDBCheck TDBReadioGroup TDBLookupList
TDBLookupCombox
10.3 TDBGrid组件 TDBGrid组件
TDBGrid组件是用来以表格形式显示和编辑数据集中记 录信息的重要组件，在程序设计中经常用到，表格中的行对 应于数据集中的记录，表格中的列对应于数据集中的字段。 TDBGrid组件通过数据源组件与数据集组件连接。下图 是一个应用TDBGrid组件的窗体界面。
3．TQuery控件的动态SQL语句 在程序中为SQL语句中的参数赋值通常有三种方法: （1）使用TQuery控件的Params属性 （2）使用TQuery控件的ParamByName方法 （3）使用TParams对象的ParamValues属性
各控件的属性设置
控件名 Query1 DataSource1 DBGrid1 Button1 Button2 BitButton1 Memo1
方法 Cancel Delete AppendR ecord InsertRec ord SetFields
功能
取消当前的操作且将数据集置为浏览状态
删除当前记录指针所在的记录且将数据集置为浏 览状态 在数据表的最后插入一条新记录， 在数据表的最后插入一条新记录，记录的各个字 段值作为AppendRecord的参数传递给新记录 段值作为 的参数传递给新记录 在当前指针所在记录的后面插入一条新记录， 在当前指针所在记录的后面插入一条新记录， 记 录的各个字段值作为InsertRecord的参数传递给新 录的各个字段值作为 的参数传递给新 记录。 记录。 修改当前记录， 修改当前记录，字段名和相应的字段值作为 SetFields的参数 的参数
2．TQuery控件的静态SQL查询 使用TQuery控件建立静态SQL查询的步骤如下： （1）为TQuery控件设置DatabaseName属性 （2）为TQuery控件设置SQL属性 （3）设置TDataSource控件的DataSet属性 （4）连接数据控制控件和TQuery控件 （5）执行SQL语句
（2）关闭数据集 方法1：设置数据集控件的Active属性为False， 以关闭与数据集控件相连的数据库表。 方法2：调用Close方法以关闭与数据集控件相连 的数据集表。
3．数据集的浏览 ．
数据集的浏览方法
方法 First Next Prior Last MoveBy（n） （ ） 功能 移动记录指针到数据集中的第一条记录 移动记录指针到数据集中的下一条记录 移动记录指针到数据集中的前一条记录 移动记录指针到数据集中的最后一条记录 n是正，将记录指针下移n条记录；否则， 是正，将记录指针下移 条记录 否则， 条记录； 是正 上移n条记录 上移 条记录
属性 DatabaseName DataSet Datasource Caption Caption Caption Kind Lines
属性值 DBDEMOS Query1 DataSource1 执行(&E) 清空(&C) 退出(&X) bkClose 清除其中内容
TDataSource控件及其使用 TDataSource控件及其使用
1．TDataSource控件的属性 （1）DataSet属性 （2）Enable属性 （3）AutoEdit属性 2．TDataSource控件的事件 （1）OnDataChange事件 （2）OnUpdataData事件 （3）OnStateChange事件
数据源组件
1. DataSet属性 指定TDataSource组件所连接的数据集的名字。 可以在设计时指定该属的值，也可以在程序中指定。例 如： DataSource1.DataSet := ADODataSet1; 2. Enable属性 使用Enable属性可以暂时性地关闭数据源组件和与之相 连的数据集组件的连接。 3. AutoEdit属性 它用于说明是否将与TDataSource组件相连的数据集置 于编辑状态。
数据集的浏览属性
属性
功能
BOF
当记录指针位于数据集开头时，属性值为 当记录指针位于数据集开头时， True，否则为 ，否则为False
EOF
当记录指针位于数据集结尾时， 当记录指针位于数据集结尾时，属性值为 True，否则为 ，否则为False
4．数据集中的数据维护 ．
数据集中数据维护的方法
方法 Edit Append 功能
第10章 数据集、数据源组件和数据控制组件 10章 数据集、
本章主要内容： • 数据集组件TTable,Tquery TTable,Tquery •数据源组件TDataSource • 数据控制组件简介 • 各种数据控制组件的使用
本章要点
BDE中的数据库集组件 Data controls中的数据感知组件 数据库应用程序的开发方法 能使用各类组件自开发一个数据库的小应用程序