Delphi客户服务器应用开发（八）

18.4.2 应用程序分析

18.4.2.1 TDatabase部件的使用

　　CSDEMO程序中定义了一个数据库模块部件——TDmEmployee，它是继承于TDataModule。TDataModule是在Delphi2.0中才出现的专门放置数据访问部件(如TDatabase、TTable和TQuery等)的框架。其它涉及数据库访问的窗体，只要在uses语句中插入数据库模块所在的库单元，该窗体上的数据库部件就可引用相应的数据库访问部件。

　　在TDmEmployee中定义了一个TDatabase类型的部件──EmployeeDatabase。EmployeeDatagase的主要属性及属性值如下：

表18.15 EmployeeDatabase部件主要属性的取值

　　 ━━━━━━━━━━━━━━━━━━━━━━━

　 　　属性　　　　　　　　属性值

　　 ───────────────────────

　 　 AliasName IBLOCAL

　　━━━━━━━━━━━━━━━━━━━━━━━

AliasName属性所指定的IBLOCAL，必须已经在BDE中配置好，DatabaseName属性指定要使用的数据库名，该数据库名是由应用程序自己定义的，因此不反应到BDE中，该属性值被TTable、TQuery等DataSet部件引用，并且出现在DataSet部件的DatabaseName 下拉式列表框中。本例中的“EmployeeDemoDB”，被EmployeeTable，SalesTable等所有DataSet部件引用。

Connected为True表明，应用程序与数据库将保持联接。

KeepConnection属性为True，表明多次打开和关闭EmployeeDemoDB数据库中的任意表，应用程序将始终与数据库保持联接，这省却了重复注册的开销。

LoginPrompt 属性为False，表明应用程序自动处理与数据库的联接注册，因此，Params属性中定义了注册的用户名和口令：

　　USERNAME = SYSDBA

TransIsolation属性为tiReadCommitted表明，如果存在多个同时事务，则某一事务只允许读由其它事务提交了的数据。

标签：