Question

DELPHI基础教程：Delphi客户服务器应用开发（四）[1]

Answer 1

　　 从开发平台到服务器的向上适化

　　 适化概述

　　所谓适化就是将桌面应用转化为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 数据库的例子CSDEMO CSDEMO是Delphi客户/服务器编程的示例程序 它采用的数据库服务器是Local InterBase Server

　　CSDEMO较好地示范了BDE环境的配置 InterBASE Server高级功能应用 SQL服务器联接 触发器应用 存储过程编程和事务控制技术等 具有较高的参考价值 本节讲述下列内容

　　● 数据库环境介绍

　　● TDatabase的应用

　　● 不同数据库表的切换

　　● 触发器编程

　　● 存储过程编程

　　● 事务控制应用

　　 数据库环境介绍

　　本例中采用的数据库服务器是Local InterBase Server Local InterBase是InterBase Server的单用户版 位 兼容ANSI SQL Local InterBase支持客户/服务器应用在单机上的开发和测试 并且可以很容易地适化到InterBase Server上 因此 开发客户/服务器应用采用Local InterBase作为原型开发环境是很方便的

　　 IBLOCAL的BDE参数

　　本例中的SQL数据库是IBLOCAL 它是由BDE配置工具（BDECFG EXE）设置参数值 它的各项参数值列于下表

　　表 IBLOCAL的各项参数值

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

　　参 数 名 参 数 值

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

　　TYPE INTRBASE

　　PATH

　　SERVER NAME C:\INTRBASE\EXAMPLES\EMPLOYEE GDB

　　USER NAME SYSDBA

　　OPEN MODE READ/WRITE

　　SCHEMA CACHE SIZE

　　LANGDRIVER

　　SQLQRYMODE

　　SQLPASSTHRU MODE SHARED AUTOMIT

　　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 BEEEN AND ）

　　CREATE DOMAIN SALARY AS NUMERIC（ ）

　　DEFAULT

　　CHECK （VALUE > ）

　　建立EMPLOYEE表

lishixinzhi/Article/program/Delphi/201311/25125