从开发平台到服务器的向上适化
适化概述
所谓适化就是将桌面应用转化为Client/Server应用
适化是一个很复杂的主题这里不详细讲述本节将介绍适化Delphi 应用程序中最重要的方面
适化的主要方面有
● 将数据库从桌面平台到服务器的适化
● 将应用程序转化为Client/Server的适化
适化还需要实现从桌面环境到Client/Server环境的转化
桌面数据库和SQL服务器数据库在许多方面有不同之处例如
● 桌面数据库用于同一时刻单用户的访问而服务器用于多用户访问
● 桌面数据库是面向记录的而服务器是面向集合的
● 桌面数据库将每个表存储在独立的文件中 而服务器将所有的表存储在数据库中Client/Server应用必须解决更新的问题最复杂的是联接网络和事务控制
适化数据库
适化数据库包含下列步骤
● 在桌面数据库结构的基础上定义服务器上的元数据
● 将数据从桌面转化到服务器中
● 解决下列问题
● 数据类型差异
● 数据安全性和完整性
● 事务控制
● 数据访问权
● 数据合法性
● 锁定
Delphi提供了两种方法适化一个数据库
● 使用Database Desktop工具选择菜单Tools/Utilities/Copy to命令将数据库表从桌面方式拷贝到SQL格式
● 建立应用TBatchMove部件的应用程序
这两种方法都可以将表结构和数据从桌面数据源转化到服务器上依靠这些数据库可能需要改变结果表例如可能想进行不同数据类型的映射
也可以将下列特征加入数据库
● 完整性约束
● 索引
● 检测约束
● 存储过程和触发器
● 其它服务器特征
如果用SQL脚本和服务器数据定义工具定义元数据会更有效然后用前面介绍的两种方法转移数据因为如果是手工定义数据库表Database Desktop和TBatchMove 部件将只拷贝数据
适化应用程序
在理论上设计用来访问局部数据的Delphi应用程序做很少的修改就可以访问远程服务器上的数据如果在服务器上定义适合的数据源你就能将应用程序指向访问它这只需简单地改变应用程序中TTable或TQuery部件的DatabaseName属性
实际上在访问局部和过程数据源之间有许多重要的不同之处Client/Server应用程序必须解决大量的在桌面应用中所没有的问题
任何Delphi应用程序都能用TTable或TQuery部件访问数据桌面应用程序通常都是使用TTable部件当适化到SQL服务器上时用TQuery会更有效如果应用程序要检索大量记录则TQuery部件要略胜一筹
如果应用程序使用统计或数学函数那么在服务器上通过存储过程执行这些函数会更有效因为存储过程执行更快使用存储过程还可以减少网络负载特别是大量行数据的函数
例如计算大量记录的标准差
● 如果该函数在客户端执行所有的值从服务器上检索出来并送到客户端导致网络拥塞
● 如果该函数在服务器端执行则应用程序只需要服务器上的答案
Delphi客户/服务器应用实例分析
本节中采用的实例是Delphi数据库的例子CSDEMOCSDEMO是Delphi客户/服务器编程的示例程序它采用的数据库服务器是Local InterBase Server
CSDEMO较好地示范了BDE环境的配置InterBASE Server高级功能应用SQL服务器联接触发器应用存储过程编程和事务控制技术等具有较高的参考价值本节讲述下列内容
● 数据库环境介绍
● TDatabase的应用
● 不同数据库表的切换
● 触发器编程
● 存储过程编程
● 事务控制应用
数据库环境介绍
本例中采用的数据库服务器是Local InterBase ServerLocal InterBase是InterBase Server的单用户版位兼容ANSI SQLLocal InterBase支持客户/服务器应用在单机上的开发和测试并且可以很容易地适化到InterBase Server上因此开发客户/服务器应用采用Local InterBase作为原型开发环境是很方便的
IBLOCAL的BDE参数
本例中的SQL数据库是IBLOCAL它是由BDE配置工具（BDECFGEXE）设置参数值它的各项参数值列于下表
表 IBLOCAL的各项参数值
━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
参 数 名 参 数 值
────────────────────────────────────
TYPE INTRBASE
PATH
SERVER NAME C:\INTRBASE\EXAMPLES\EMPLOYEEGDB
USER NAME SYSDBA
OPEN MODE READ/WRITE
SCHEMA CACHE SIZE
LANGDRIVER
SQLQRYMODE
SQLPASSTHRU MODE SHARED AUTOCOMMIT
SCHEMA CHCHE TIME
MAX ROWS
BATCH COUNT
ENABLE SCHEMA CACHE FALSE
SCHEMA CACHE DIR
━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
数据库结构介绍
IBLOCAL数据库的结构都是由InterBase服务器工具交互式SQL工具（ISQL）定义的
用ISQL定义数据库首先要用Create Database命令建立数据库建立的新数据库一般是以GDB为扩展名建立好后就可以用SQL语言定义数据库表例如建立EMPLOYEE表的SQL语句如下
定义域名数据类型
CREATE DOMAIN FIRSTNAME AS VARCHAR（）
CREATE DOMAIN LASTNAME AS VARCHAR（）
CREATE DOMAIN COUNTRYNAME AS VARCHAR（）
CREATE DOMAIN EMPNO AS SMALLINT;
CREATE DOMAIN DEPTNO AS CHAR（）
CHECK （VALUE = OR （VALUE > AND VALUE <= ） OR VALUE IS NULL）
CREATE DOMAIN JOBCODE AS VARCHAR（）
CHECK （VALUE > ）
CREATE DOMAIN JOBGRADE AS SMALLINT
CHECK （VALUE BETWEEN AND ）
CREATE DOMAIN SALARY AS NUMERIC（ ）
DEFAULT
CHECK （VALUE > ）
建立EMPLOYEE表
[] [] [] []
![DELPHI基础教程：Delphi客户服务器应用开发（四）[1]](/UploadFiles/9.jpg)