自考“计算机及应用”专业论文参考范文（16） -自考串讲笔记

　　§3.2  数据库组件介绍

　　用Delphi6开发数据库应用，重点是和各种数据库组件打交道，能和数据库挂钩的组件对象有5种，它们是：Session（数据库会话）、Database（数据库）、Dataset（数据集）、DataSource（数据源）、Data control（数据控制组件，也叫data-controls即数据感知组件）。其中前面4种统称为数据访问（Data Access）组件。这些组件的相互关系如图3-2所示。

　　ADO组件  Delphi6.0包含了可以用来访问Microsoft公司的ActiveX Data Objects（ADO）格式数据库的组件。ADO是Micrsoft公司关于各种类型数据的高等界面，后来逐渐演变成满足所有数据访问需要的完整解决办法。ADO的对象模型是所有数据访问接口对象模型中最简单的一种。Microsoft公司用来访问ADO数据的应用程序界面技术是OLE DB.OLE DB是一种底层编程接口，用来访问许多不同类型的数据源，其中包括消息、文件系统以及其他一些非传统的数据源。OLE DB是一个由Component Object Model（COM）接口组成的集合，用来隐藏创建数据访问服务过程中的细节。OLEDB提供了访问任何数据资源的方法，包括相互关联的数据库和相互不关联的数据库、Email和文件系统、文本和图形以及用户定义的数据对象。

　　Delphi的ADO组件无需依靠BDE而是使用ADO技术，提供了可以通过数据控制组件访问数据的新方法。唯一的要求是在使用ADO组件时必须运行ADO/OLE－DB.ADO组件的使用使得DELPHI在访问数据的类型和采用的技术方面都有了很大的突破。

　　数据模块设计窗口  数据模块设计窗口是用来设计和维护数据模块的。数据模块设计窗口中包含了所有以。DTI作为文件扩展名的Data Diagram文件的信息。DTI文件在编译时不起任何作用。

　　§3.3  SQL语言在Delphi中的应用

　　在Delphi中使用SQL语言非常方便，一般来说，都是通过Tquery或TADOquery组件来使用SQL语言的。可以在Tquery或TADOquery组件的SQL属性中设置SQL语句。设计程序时，在该组件的属性对话框中选择SQL属性，单击带省略号的按钮，就可以打开String List Editor对话框，然后我们就可以在对话框中添加SQL语句。还可以使用Delphi的SQL Builder来自动生成SQL语句，这样可以避免手工编写SQL而可能造成的语法错误。

　　静态SQL语句在程序设计时便已固定下来，它不包含任何参数和变量。

　　动态SQL语句，也被称作参数化的语句，在其中间包含着表示字段名或表名的参数，例如下面的语句是一条动态SQL语句：

　　Select  *  From  Book  Where 图书编号 =：bookCode；

　　其中的变量bookCode便是一个参数变量，它由一个冒号引导，在程序运行过程中，必须要为该参数赋值，该条SQL语句才能正确执行，每次运行应用程序时可以为该参数变量赋予不同的值。为参数赋值有三种方法：

　　①根据参数在SQL语句中出现的顺序，设置TADOQuery组件的parameters属性值为参数赋值。

　　②直接根据SQL语句中各参数的名字，调用ParamByName方法来为各参数赋值。

　　③将TADOQuery组件的DataSource属性设置为另一个数据源，这样将另一个数据源中与当前TADOQuery组件的SQL语句中的参数名相匹配的字段值赋给其对应的参数。利用这种方法也能实现所谓的连接查询，创建主要-明细型数据库应用。

　　在使用动态SQL语句编程时，常常用到一个很重要的方法Prepare，调用Prepare 方法之后，Delphi会将带参数的SQL语句传送给与其对应的数据库引擎，对动态SQL语句进行语法分析和优化。虽然在用动态SQL语句编程时，调用Prepare方法并不是必须的，但是调用Prepare方法后，会极大地提高动态SQL 语句的执行性能，特别是当要反复多次执行同一条动态SQL语句时，其优越性会更加明显。 如果在应用程序中执行一条SQL语句之前并没有显式地调用Prepare方法，每次在执行SQL 语句时，Delphi会隐含地调用Prepare方法以准备这个查询。

　　TadoQuery部件还有一个Prepare属性，这是一个布尔型属性，当其属性值为True时， 表明该查询已被准备好了（ SQL 语句已被传送到数据库引擎中 ） ， 当我们使用参数编辑器Parameters Editor来为动态SQL语句中的参数赋值时，当设置完相应的参数值并退出参数编辑器时，Delphi会隐含地调用Prepare方法以准备好查询。

　　当SQL语句执行完之后，要想准备下一个查询，首先必须调用Close方法，然后才能调用Prepare方法准备下一个查询。一般来说，在一个应用程序中应该调用一次Prepare方法，常常在窗体的OnCreate事件处理过程中调用Prepare方法， 然后用上述介绍的方法为参数赋值，最后调用Open方法或ExecSQL方法执行SQL语句，以完成查询。

　　当然在调用Prepare方法准备好一个查询时，会消耗一些数据库资源， 因而每当一个查询执行完毕之后，要养成调用UnPrepare方法以撤消查询的好习惯。在运行程序过程中，通过程序改变TQuery或TADOquery部件的SQL属性值时，Delphi会自动地调用Close方法和UnPrepare 方法，以撤消查询。

　　在程序运行过程中，要想设置Tquery或TADOquery部件的SQL属性，必须首先调用Close方法，关闭TQuery或TADOquery部件，然后再调用Clear方法清除SQL属性中现存的SQL命令语句， 最后再调用Add方法为SQL属性设置新的SQL命令语句。例如：

　　datamodule4.adoquery2.close；

　　datamodule4.adoquery2.sql.clear；

　　datamodule4.adoquery2.sql.add（'SELECT 借书证号，密码 FROM [user] WHERE （借书证号 = ：tt）'）；

　　datamodule4.adoquery2.parameters[0].value：=username；

　　datamodule4.adoquery2.open；

　　在为TQuery或TADOquery部件设置SQL属性时调用Close方法总是很安全的，如果TQuery或TADOquery部件已经被关闭了，调用Close方法时不会产生任何影响。在应用程序中为SQL属性设置新的SQL 命令语句时，必须要调用Clear方法以清除SQL属性中现存的SQL命令语句，如果不调用Clear方法，便调用Add方法向SQL属性中设置SQL命令语句，那么新设置的SQL命令语句会追加在现存SQL命令语句后面， 在程序运行时常常会出现出乎意料的查询结果甚至程序无法运行下去。

　　在这里要特别注意的，一般情况下TQuery或TADOquery部件的SQL属性只能包含一条完整的SQL语句，它不允许被设置成多条SQL语句。当然有些数据库服务器也支持在TQuery或TADOquery部件的SQL属性中设置多条SQL语句，只要数据库服务器允许这样，我们在编程时可以为 SQL 属性设置多条SQL语句。

　　在为TQuery或TADOquery部件设置完SQL属性的属性值之后，也即编写好适当的SQL程序之后，可以有多种方式来执行SQL程序。

　　在设计过程中，设置完TQuery或TADOquery部件的SQL属性之后将其Active属性的值置为True， 这样便可以执行SQL属性中的SQL程序，如果应用中有与TQuery或TADOquery部件相连的数据浏览部件（ 如TDDGrid TDBEdit等）那么在这些数据浏览部件中会显示SQL程序的执行结果。

　　在应用程序运行过程中，通过程序调用TQuery或TADOquery组件的Open方法或ExecSQL 方法可以执行其SQL属性中的SQL程序。Open方法和ExecSQL方法是不一样的。Open方法只能用来执行SQL语言的查询语句（Select命令）， 并返回一个查询结果集，而ExecSQL方法还可以用来执行其它常用的SQL语句（如INSERT， UPDATE， DELETE等命令），例如：

　　Query1.Open （这样会返回一个查询结果集）

　　如果调用Open方法，而没有查询结果时，会出错。此时应该调用ExecSQL 方法来代替Open方法。如：

　　Query1.ExecSQL （没有返回结果）

　　当然在设计应用程序时，程序设计人员是无法确定TQuery或TADOquery组件中的SQL 语句是否会返回一个查询结果的。对于这种情况应当用Try…Except模块来设计程序。在 Try 部分调用Open方法，而在Except部分调用ExceSQL方法，这样才能保证程序的正确运行。

　　例如：

　　Try

　　Query1.Open

　　Except

　　Query1.ExecSQL

　　End

　　通过Tquery或TADOquery组件可以获得两种类型的数据：

　　u “活动”的数据

　　这种数据就跟通过TTable部件获得的数据一样，用户可以通过数据浏览部件来编辑修改这些数据，并且当调用Post方法或当焦点离开当前的数据浏览部件时，用户对数据的修改自动地被写回到数据库中。

　　u 非活动的数据（只读数据）

　　用户通过数据浏览部件是不能修改其中的数据。在缺省情况下，通过TQuery部件获得的查询结果数据是只读数据，要想获得“活动”的数据，在应用程序中必须要设置Tquery或TADOquery组件的RequestLive属性值为True，然而并不是在任何情况下（通过设置RequestLive的属值True）都可以获得“活动”的数据的，要想获得“活动”的数据，除了将TQuery部件的RequestLive属性设置为True外，相应的SQL命令还要满足以下条件。

　　本地SQL语句查询情况下，要得到可更新的数据集，SQL语句的限制为：

　　查询只能涉及到一个单独的表

　　SQL语句中不能包含ORDER BY命令

　　SQL语句中不能含聚集运算符SUM或AVG

　　在Select后的字段列表中不能有计算字段

　　在Select语句WHERE部分只能包含字段值与常量的比较运算，这些比较运算符是：Like， >， <， >=， <=.各比较运算之间可以有并和交运算：AND和OR

　　当通过SQL语句查询数据库服务器中的数据库表：

　　查询只能涉及到一个单独的表

　　SQL语句中不能包含ORDER BY命令

　　SQL语句中不能含聚集运算符SUM或AVG运算

　　另外，如果是查询Sybase数据库中的表，那么被查询的表中只能有一个索引。

　　如果在应用程序中要求TQuery或TADO