Delphi实用教程
相关主题
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
● 其次，本例中，将访问基于Microsoft SQL Server的数据库， 因此选择“Microsoft OLE DB Provider for SQL Server” 选项，选择完毕后单击“Next>>”按钮。
Ⅲ DMstk数据模块保存了对试题库的ADO连接、数据集、存储过 程及查询等信息。利用属性编辑器生成ConStk的连接字符串
（ConnectionString），步骤如下： ● 首先, 鼠标双击ConStk，弹出设置连接属性对话框，选择其
中的“Use Connection String”单选框，单击“Build…”按钮， 系统将弹出“数据链接属性”对话框。
利用Delphi进行客户机/服务器数据库应用系统的开发，通常按以 下步骤进行：
系统总体设计与规划。 网络和SQL服务器建设。 数据库设计。 前端开发。 调试与应用程序的发布。
第9章 数据库应用程序开发
9.2 试题库管理系统的设计实例
9.2.1 创建stkgl（试题库管理）数据库
创建包含试题信息表和试卷信息表，结构分别如下两表所示。
按钮不应太多，如果按钮过多，可以考虑用菜单替代。 （2）颜色选择不应过多，尽量保持与操作系统或运行应用程序
的背景相协调。尤其没必要追求过分鲜艳的界面。 （3）最好提供友好的中文界面。 （4）要充分考虑到与用户的交互性，在后台执行的应用程序可
以通过提供一个进度条方式给用户一个直观的认识。 （5）最好能提供一定的提示信息，用以引导用户操作。 （6）要充分考虑到用户的误操作的可能性，对敏感的信息提供
一定的保护措施。比如对删除数据库中的记录，最好提供 确认对话框，让用户确认是否删除记录，以减少误操作造 成数据丢失。
第9章 数据库应用程序开发
9.2.3 用户界面设计
有几种典型界面风格： （1）简洁型
简洁型用户界面
第9章 数据库应用程序开发
9.2.3 用户界面设计
（2）典雅型
典雅型用户界面
第9章 数据库应用程序开发
数据模块DMSTK
第9章 数据库应用程序开发
9.2.4 C/S数据库应用程序设计
数据模块组件对象属性表
第9章 数据库应用程序开发
9.2.4 C/S数据库应用程序设计
Ⅱ 使用字段编辑器把QryTMNR，DSetSJ，TabST组件中的所有字 段设置为永久字段，再设置这些永久字段的DisplayLabel属性， 以便于阅读。
BEGIN SET @i=@i+4; INSERT INTO paper(txdm,tmnr) SELECT txdm,tmnr from st
WHERE th IN (SELECT substring(sjnr,@i,3) FROM sj WHERE sjbh=@sjbh)
end;
第9章 数据库应用程序开发
from sj where sjbh=@sjbh) 局部变量@i，控制从sj表中试卷内容（sjnr）中选取试题的数量。 最后，返回生成的试卷给客户端程序。
第9章 数据库应用程序开发
9.2.3 用户界面设计
用户界面设计应根据用户的要求进行，不同的用户有不同的要求。 通常，下面的原则具有一定的普遍意义。 （1）力求界面美观大方，避免界面布局过分拥挤，一般来说，
9.2.3 用户界面设计
（3）明了型
明了型用户界面
第9章 数据库应用程序开发
பைடு நூலகம்
9.2.4 C/S数据库应用程序设计
1. “试题库管理系统”的系统结构 “试题库管理系统”应用程序的结构设计如图所示:
第9章 数据库应用程序开发
9.2.4 C/S数据库应用程序设计
2. 建立数据模块DMSTK
Ⅰ 新建一个数据模块DataModule1（最终保存该数据模块单元为 DMUStk），如图所示，该数据模块所包含的组件及其属性设置值 如下张表所示。
第9章 数据库应用程序开发
9.2.2建立存储过程
CREATE PROCEDURE sjsc @sjbh tinyint
AS DROP TABLE paper; CREATE TABLE paper(txdm tinyint,tmnr text); DECLARE @i int; SET @i=-3; WHILE @i<40
9.2.2建立存储过程
说明: 该存储过程的功能是把符合条件的题型代码（txdm）和题目 内 容（tmnr），插入paper表中，paper表即为生成的试卷。 Where条件子句使以下的select语句所产生的题型代码 （txdm） 和题目内容（tmnr）所对应的题号（th）必须在sj 表中试卷 内容（sjnr）中。 select txdm,tmnr from st
Delphi实用教程
第9章 数据库应用程序开发
第9章 数据库应用程序开发
9.1数据库应用系统的开发过程
通常开发数据库应用程序有以下三个阶段：
分析阶段。明确应用程序需做什么及需要什么数据、谁将使用这些 数据。 设计阶段。确定数据表的形式和所需的程序块，编写为了实现设计 中的功能的程序代码。 维护阶段。对应用程序进行维护，根据用户使用情况进一步优化应 用程序。
where th in (select substring(sjnr,@i,3)
from sj where sjbh=@sjbh)
第9章 数据库应用程序开发
9.2.2建立存储过程
因为sj表中sjnr存放的是以逗号分割的试题编号，所以通过把试题编 号提取出来，逻辑上构成了一个试题编号的集合。并通过以下的 Where子句产生符合条件的题号（th）所对应的试卷内容（sjnr）。 where th in (select substring(sjnr,@i,3)
试题信息表（表名st）
第9章 数据库应用程序开发
9.2.1 创建stkgl（试题库管理）数据库
试卷信息表（表名sj）
第9章 数据库应用程序开发
9.2.2建立存储过程
编写试题库管理系统中使用的试卷生成存储过程。 思路： 根据试卷信息表（sj）的试卷编号（sjbh），查找到相应 记 录的试卷内容。根据试卷内容（sjnr），创建一个新的试卷 表（paper）。试卷表（paper）包含两个字段：题型代码 （txdm）和题目内容（tmnr）。代码如下：
Ⅲ DMstk数据模块保存了对试题库的ADO连接、数据集、存储过 程及查询等信息。利用属性编辑器生成ConStk的连接字符串
（ConnectionString），步骤如下： ● 首先, 鼠标双击ConStk，弹出设置连接属性对话框，选择其
中的“Use Connection String”单选框，单击“Build…”按钮， 系统将弹出“数据链接属性”对话框。
利用Delphi进行客户机/服务器数据库应用系统的开发，通常按以 下步骤进行：
系统总体设计与规划。 网络和SQL服务器建设。 数据库设计。 前端开发。 调试与应用程序的发布。
第9章 数据库应用程序开发
9.2 试题库管理系统的设计实例
9.2.1 创建stkgl（试题库管理）数据库
创建包含试题信息表和试卷信息表，结构分别如下两表所示。
按钮不应太多，如果按钮过多，可以考虑用菜单替代。 （2）颜色选择不应过多，尽量保持与操作系统或运行应用程序
的背景相协调。尤其没必要追求过分鲜艳的界面。 （3）最好提供友好的中文界面。 （4）要充分考虑到与用户的交互性，在后台执行的应用程序可
以通过提供一个进度条方式给用户一个直观的认识。 （5）最好能提供一定的提示信息，用以引导用户操作。 （6）要充分考虑到用户的误操作的可能性，对敏感的信息提供
一定的保护措施。比如对删除数据库中的记录，最好提供 确认对话框，让用户确认是否删除记录，以减少误操作造 成数据丢失。
第9章 数据库应用程序开发
9.2.3 用户界面设计
有几种典型界面风格： （1）简洁型
简洁型用户界面
第9章 数据库应用程序开发
9.2.3 用户界面设计
（2）典雅型
典雅型用户界面
第9章 数据库应用程序开发
数据模块DMSTK
第9章 数据库应用程序开发
9.2.4 C/S数据库应用程序设计
数据模块组件对象属性表
第9章 数据库应用程序开发
9.2.4 C/S数据库应用程序设计
Ⅱ 使用字段编辑器把QryTMNR，DSetSJ，TabST组件中的所有字 段设置为永久字段，再设置这些永久字段的DisplayLabel属性， 以便于阅读。
BEGIN SET @i=@i+4; INSERT INTO paper(txdm,tmnr) SELECT txdm,tmnr from st
WHERE th IN (SELECT substring(sjnr,@i,3) FROM sj WHERE sjbh=@sjbh)
end;
第9章 数据库应用程序开发
from sj where sjbh=@sjbh) 局部变量@i，控制从sj表中试卷内容（sjnr）中选取试题的数量。 最后，返回生成的试卷给客户端程序。
第9章 数据库应用程序开发
9.2.3 用户界面设计
用户界面设计应根据用户的要求进行，不同的用户有不同的要求。 通常，下面的原则具有一定的普遍意义。 （1）力求界面美观大方，避免界面布局过分拥挤，一般来说，
9.2.3 用户界面设计
（3）明了型
明了型用户界面
第9章 数据库应用程序开发
பைடு நூலகம்
9.2.4 C/S数据库应用程序设计
1. “试题库管理系统”的系统结构 “试题库管理系统”应用程序的结构设计如图所示:
第9章 数据库应用程序开发
9.2.4 C/S数据库应用程序设计
2. 建立数据模块DMSTK
Ⅰ 新建一个数据模块DataModule1（最终保存该数据模块单元为 DMUStk），如图所示，该数据模块所包含的组件及其属性设置值 如下张表所示。
第9章 数据库应用程序开发
9.2.2建立存储过程
CREATE PROCEDURE sjsc @sjbh tinyint
AS DROP TABLE paper; CREATE TABLE paper(txdm tinyint,tmnr text); DECLARE @i int; SET @i=-3; WHILE @i<40
9.2.2建立存储过程
说明: 该存储过程的功能是把符合条件的题型代码（txdm）和题目 内 容（tmnr），插入paper表中，paper表即为生成的试卷。 Where条件子句使以下的select语句所产生的题型代码 （txdm） 和题目内容（tmnr）所对应的题号（th）必须在sj 表中试卷 内容（sjnr）中。 select txdm,tmnr from st
Delphi实用教程
第9章 数据库应用程序开发
第9章 数据库应用程序开发
9.1数据库应用系统的开发过程
通常开发数据库应用程序有以下三个阶段：
分析阶段。明确应用程序需做什么及需要什么数据、谁将使用这些 数据。 设计阶段。确定数据表的形式和所需的程序块，编写为了实现设计 中的功能的程序代码。 维护阶段。对应用程序进行维护，根据用户使用情况进一步优化应 用程序。
where th in (select substring(sjnr,@i,3)
from sj where sjbh=@sjbh)
第9章 数据库应用程序开发
9.2.2建立存储过程
因为sj表中sjnr存放的是以逗号分割的试题编号，所以通过把试题编 号提取出来，逻辑上构成了一个试题编号的集合。并通过以下的 Where子句产生符合条件的题号（th）所对应的试卷内容（sjnr）。 where th in (select substring(sjnr,@i,3)
试题信息表（表名st）
第9章 数据库应用程序开发
9.2.1 创建stkgl（试题库管理）数据库
试卷信息表（表名sj）
第9章 数据库应用程序开发
9.2.2建立存储过程
编写试题库管理系统中使用的试卷生成存储过程。 思路： 根据试卷信息表（sj）的试卷编号（sjbh），查找到相应 记 录的试卷内容。根据试卷内容（sjnr），创建一个新的试卷 表（paper）。试卷表（paper）包含两个字段：题型代码 （txdm）和题目内容（tmnr）。代码如下：