多层数据库开发八:访 问 表 格

第八章 访 问 表 格
　　这一章介绍怎样在数据库应用程序中使用TTable构件。TTable的上级是TDBDataSet，而TDBDataSet是从TBDEDataSet继承下来的，TBDEDataSet又是从TDataSet继承下来的。因此，如果对第六章的内容完全掌握了的话，您应该对TTable构件不感到陌生。
8.1 使用TTable构件的一般步骤
　　TTable构件可以访问数据库表格中的每一行和每一列。TTable构件既可以访问本地的数据库如Paradox、dBASE、Access、FoxPro，也可以访问ODBC数据库，还可以访问远程数据库如InterBase、Sybase和SQL Server。
　　既可以显示和编辑表格的所有行和所有列，也可以选择一定范围内的行，或者用过滤技术检索出其中一部分行，可以搜索记录，复制、换名或删除一个表格。
　　一个TTable构件往往只访问一个表格，不过，如果需要的话，一个TTable构件也可以访问几个表格。
8.1.1 设置TTable构件
　　下面是使用和设置TTable构件的一般步骤，有些应用程序可能还需要其他步骤。
　　第一步是把一个TTable构件放到窗体或数据模块上，设置它的Name属性指定构件的名称，不能与同一个应用程序中的其他构件同名。
　　第二步是设置DatabaseName属性指定要访问的数据库。
　　第三步是设置TableName属性指定要访问的表。
　　第四步是把一个TDataSource构件放到窗体或数据模块上，设置它的DataSet属性指定TTable构件
　　第五步是把一个数据控件如TDBGrid放到窗体上，设置它的DataSource属性指定TDataSource构件。
　　最后，把TTable构件的Active属性设为True。
8.1.2 指定要访问的数据库
　　DatabaseName属性用于指定要访问的数据库。对于Paradox和dBASE来说，DatabaseName属性可以设为BDE别名或表的路径。对于SQL数据库来说，DatabaseName属性必须设为BDE别名。
　　用BDE别名指定数据库的好处是，只要修改别名的定义，就可以访问不同的数据库，而应用程序不必作任何修改。要修改别名的定义，就要用到SQLExplorer。
　　在修改DatabaseName属性之前，先要把Active属性设为False。
　　如果用TDatabase构件来管理与数据库的连接，可以把DatabaseName属性设为应用程序专用的别名。
8.1.3 指定要访问的表
　　TableName属性用于指定要访问的表。在设置TableName属性之前，首先要把Active属性设为False，并且设置DatabaseName属性指定要访问的数据库。
　　既可以在设计期指定要访问的表，也可以在运行期指定要访问的表，程序示例如下：
With OrderOrCustTable Do
Begin
Active := False;
If TableName = ''''CUSTOMER.DB'''' then　TableName := ''''ORDERS.DB''''
ElseTableName := ''''CUSTOMER.DB'''';
Active := True;
End;
8.1.4 指定表格的类型
　　如果要访问的数据库是Paradox、dBASE、FoxPro或用逗号隔开的ASCII文本文件，必须设置TableType 属性指定表格的类型。
　　默认情况下，TableType属性设为ttDefault，BDE将根据文件扩展名来区分表格的类型。扩展名为.DB就认为是Paradox，扩展名为.DBF就认为是dBASE，扩展名为.TXT就认为是ASCII文本，没有扩展名就认为是Paradox。
　　如果需要确切地指定表格的类型，就必须设置TableType属性，设为ttDefault表示让BDE来判断表格的类型，设为ttParadox表示是Paradox，设为ttDBase表示是dBASE，设为ttFoxPro表示是FoxPro，设为ttASCII表示是ASCII文本。
8.1.5 打开和关闭一个表
　　要显示和编辑表格中的数据，首先要打开这个表格。要打开一个表格有两种方式，一是把Active属性设为True，二是调用Open。表格打开后，数据集就进入dsBrowse状态。
　　如果不再需要显示和编辑表格中的数据，或者要修改TTable构件的某些属性如DatabaseName、TableName和TableType，此时就要关闭表格。
　　要关闭表格也有两种方式，一是把Active属性设为False，二是调用Close函数。表格关闭后，将使数据集进入dsInactive状态。
8.1.6 控制对表格的读写
　　当一个表格打开后，应用程序需要取得对它读和写的访问权，这就要用到TTable构件的三个属性：CanModify、ReadOnly和Exclusive。
　　CanModify是一个只读的属性，当一个表格打开后，可以通过这个属性来判断表格的数据是否修改。如果CanModify属性返回False，应用程序就不能修改表格的数据。
　　如果CanModify属性返回True，应用程序可以修改表格的数据。
　　如果ReadOnly属性设为False，用户就可以编辑表格的数据。如果要限制用户只能查看数据，不能修改数据，就得把ReadOnly属性设为True。
　　Exclusive属性用于设置应用程序是否能独占表格。如果要独占对表格的访问权，就在打开表格之前把Exclusive属性设为True，其他应用程序就既不能读也不能写这个表格。
　　Exclusive属性一般只适用于Paradox、dBASE或FoxPro等本地数据库，对于SQL数据库来说，有的服务器不支持表格级的锁定，有的服务器虽然支持锁定，但其他应用程序仍然可以读表格的数据。
8.2 在表格中搜索记录
　　要在表格中搜索记录有几种方式，我们推荐调用Locate函数和Lookup函数，这两个函数可以在任何表格中基于任何类型的字段来搜索记录，不管表格是否建立了索引。　
　　Locate函数用于在表格中搜索一条符合特定条件的记录，如果找到的话，就使该记录成为当前记录。
　　Lookup函数与Locate 函数的区别是，如果找到匹配的记录后，当前记录不变。事实上，Locate函数和Lookup函数并不仅适用于TTable构件，它还适用于其他数据集构件。
8.2.1 基于索引中的字段搜索
　　记录除了Lookup函数与Locate 函数外，TTable构件还保留了Goto系列和Find系列的方法，这些方法可以基于索引中的字段搜索匹配的记录，并使找到的记录成为当前记录。在Delphi 4中，索引中的字段称为关键字段。
　　与Locate不同的是，GotoKey、GotoNearest要求表格必须已建立了索引，并且只能基于关键字段搜索记录，而Locate则没有这个要求。下面列出了Goto系列和Find系列中的6种方法：

标签：

版权申明：本站文章部分自网络，如有侵权，请联系：west999com@outlook.com
特别注意：本站所有转载文章言论不代表本站观点，本站所提供的摄影照片，插画，设计作品，如需使用，请与原作者联系，版权归原作者所有