1、编号: 数据库课程设计(论文)说明书题 目: 学生成绩管理系统 系 别:计算机科学与工程学院 专 业:计算机科学与技术 学生姓名: 学 号: 指导教师: 年 月 日 摘 要随着科技的发展,基本上所有的具有一定数量数据的机构都开始使用计算机数据库来做管理。几乎所有学校也都已经在使用计算机管理数据的机制,大大减少了学校学生成绩管理的工作量。该课程设计要求设计一个学生成绩的数据库管理系统,数据库中要求包含学生的基本信息,课程基本信息,以及学生所学课程的考试成绩。要方便学生进行成绩查询,通过该课程设计,应该达到把数据库理论知识更加的巩固加深,加强动手能力与实践能力,学以致用,与现实生活中的应用充分的结
2、合起来。本系统以Delphi 7为开发工具,SQL Server 2008为后台数据库。主要功能模块包括:系统管理模块,数据管理模块,数据查询模块等。关键词:Delphi 7 ; SQL Server 2008 ;学生成绩管理系统目 录引 言 11 学生成绩管理系统概述11.1 学生成绩管理系统开发背景和意义 11.2 学生成绩管理系统概述 21.3 简单介绍本系统实现内容 21.4 总结 32 开发系统的工具,技术,开发环境的选择32.1 系统开发平台 32.2 数据库的选择 42.3 SQL Server 2008 数据库简介 42.4 总结 53 可行性设计 53.1 社会可行性 53.
3、2 技术可行性 53.3 经济可行性 53.4 操作可行性 53.5 设计原则 64 需求分析 64.1 开发目的 64.2 功能需求 64.3 数据需求 74.4 数据流图 85 数据库关系设计85.1 表格设计 85.2 系统设计 105.3 ER关系略图115.4 数据库与组件链接 116 学生成绩管理系统功能测试126.1 测试环境 126.2 功能测试 126.3 测试总结 157 结论 167.1 系统优缺点分析 167.2 经验总结 16参考文献 17附录 18引 言随着学校向全国及至世界范围的持续扩张,学生人数的增加,对于学生的信息管理也越来越复杂,要求也越来越高,因此需要一个
4、全面、详细的信息管理系统,以便完成对学生信息的管理。无纸化的环境是技术时代的一个梦想,也是许多学校和公司越来越意识到的一个真实世界。以前是由学生档案和公告栏来提供各种信息及通告新的变化,而现在这个繁杂的工作已被网站和内部计算机网络所取代。使得学生信息的管理更方便、安全。根据调查得知,现在广大学生进行信息提交的主要方式是基于文件、表格等纸介质的手工处理,学生信息管理部门信息处理工作量大,容易出错,且管理方面因人而异。然而学校网上学生信息管理系统应该覆盖各个所需功能,使各级管理人员和广大教职工在信息系统的辅助下进行工作,提高管理的整体水平。使得学生信息管理更方便。学生信息管理系统,可以用集中的数据
5、库将与人力资源管理相关的信息全面、有机地联系起来,有效地减少了信息更新和查找中的重复劳动,保证了信息的相容性,从而大大地提高了工作效率,还能使原来不可能提供的分析报告成了可能。在采用和实施学生信息管理系统之后,就会将依赖于人的过程改为依赖于计算机系统的过程。学校管理人员只要获取了相应的权限,就可以随时进入系统,直接查阅相应的信息。采用和实施学生信息管理系统不仅仅是为了提高工作效率。为了除掉手工记录的低效率工作方式,运用信息化管理,提高工作效率,开发本系统。应该看到,在实施学生信息管理系统后,经过整合的、较为全面、准确、一致和相容的信息不仅可以让学校领导对本学校学生资源的现状有一个比较全面和准确
6、的认识,同时也可以生成综合的分析报表供学校领导人在决策时参考。1 学生成绩管理系统概述1.1 学生成绩管理系统开发背景和意义 当今已是计算机发达的21世纪,科技的发展之快用日新月异来形容已毫不为过,许许多多的产业均已将先进的计算机科学应用到实践当中,并取得了空前辉煌的,质的飞跃。但是,在技术发展的摇篮、本身技术实力雄厚的大学校园中,却还存在着相对比较落后的人工管理系统,不得不令人感到惊讶。而这些系统中比较突出的就是学生的成绩管理系统。当今的大学,学生多则数万,少则亦有几千,扩招每年为国家多输送了千千万万的人才,然而,学校的压力却是每年的剧增,尤其在学生成绩的管理上,依旧使用着较为落后的人工档案
7、管理系统,使用上的不便与维护上的开销日益凸显。手工录入、修改成绩,教师耗时耗力,工作繁琐,压力沉重,准确性还非常没有保证,学生查询成绩,排队、办手续、找档案,相当的费时间且不方便,这样一个臃肿的管理系统不但耗费了大量的人力、物力、财力资源,管理的效率也是愈来愈低下学生成绩管理系统是应对学生人数增多、信息量增大的问题,实现管理的现代化、网络化,逐步摆脱当前学生成绩管理的人工管理方式,提高成绩管理效率而开发的。希望该开发程序能够解决学生信息存储、学生成绩查询、录入还有课程查询等一系列需求,使教师与学生在对成绩系统的录入、修改、查询等使用上得到极大的便利。1.2学生成绩管理系统概述由于计算机技术的飞
8、速发展,数据库技术作为数据管理的一个有效的手段,在各行各业中得到越来越广泛的应用。本文围绕“学生成绩管理系统”程序的设计和应用系统的开发课题为背景,详细介绍了以Visual B和结合SQL server2008为语言编写管理信息系统的过程。该程序通过VB的ADO数据对象来实现VB前台与后台SQL server2008数据库的连接,并具有典型的数据库应用系统的特征,完成了系统结构与现实生活的紧密结合。管理系统的开发不仅是一个应用程序编写的过程,更重要的是在系统分析和设计阶段所做的工作。该程序在设计过程中严格遵循软件工程学的方法,用分阶段的生命周期计划严格管理,并主要讲述了程序的总体设计、详细设计
9、阶段,对程序进行需求迭代,不断修正和改进,利用SQL server2008的强大数据库功能,直到形成一个完善的可行性系统.优美、秀丽的界面,方便实用的查询与维护功能共同构成了“学生成绩管理系统”。1.3简单介绍本系统实现内容该学生成绩管理系统,实现简单的用户信息修改、数据管理,数据查询等操作,并能实现简单的数据统计。(1)用户密码登录: 在登录程序之前会先弹出一个登录对话框,在正确的输入了数据库中存储的用户和密码后才能登录程序。(2)用户信息的修改操作员在成功登录了程序之后可以根据用户的需要修改信息。(3)数据管理数据修改:前选中要修改的数据信息,然后进行修改。信息添加:新开课程或有新生信息录
10、入时,可完成数据录入并保存在数据库中。数据删除:前选中要删除的数据信息,然后直接删除。(4)数据查询 按条件查询,结果显示在表中。(5)数据统计 按条件统计,结果显示在表中。1.4总结本章主要介绍了学生成绩管理信息系统的发展和设计本系统的必要性以及要研究的问题和解决的技术问题。21世纪是信息产业大发展和全面应用的世纪,随着计算机技术在我国的日益普及,它的应用已经从各种科学计算、实时控制等方面逐渐扩展到了非数值处理的各个领域,计算机科学日渐成熟,其强大的功能早已被人们认识并认同,它已进入人类社会的各个领域并发挥着越来越重要的作用。2 开发系统的工具,技术,开发环境的选择本系统本采用程序化设计语言
11、Delphi 7.0结合SQL Server 2008数据库设计开发。本系统适用于高校学生成绩管理机构,相信它可以实现学生成绩信息管理的系统化、规范化和自动化。2.1 系统开发平台Delphi由Borland公司推出的Delphi是全新的可视化编程环境,为我们提供了一种方便、快捷的Windows应用程序开发工具。它使用了MicrosoftWindows图形用户界面的许多先进特性和设计思想,采用了弹性可重复利用的完整的面向对象程序语言(Object-Oriented Language)、当今世界上最快的编译器、最为领先的数据库技术。对于广大的程序开发人员来讲,使用Delphi开发应用软件,无疑会
12、大大地提高编程效率,而且随着应用的深入,您将会发现编程不再是枯燥无味的工作Delphi的每一个设计细节,都将带给您一份欣喜。Delphi是Borland公司研制的新一代可视化开发工具,可在Windows3.x、Windows95、WindowsNT、WindowsXP、WindowsVista、Windows7等环境下使用。当前,Delphi 也可以在LINUX平台上开发应用,其在LINUX上的对应产品Kylix。Delphi 拥有一个可视化的集成开发环境(IDE),采用面向对象的编程语言ObjectPascal和基于部件的开发结构框架。Delphi它提供了500多个可供使用的构件,利用这些部
13、件,开发人员可以快速地构造出应用系统。开发人员也可以根据自己的需要修改部件或用Delphi本身编写自己的部件。“真正的程序员用c,聪明的程序员用Delphi”,这句话是对Delphi最经典、最实在的描述。Delphi被称为第四代编程语言,它具有简单、高效、功能强大的特点。和VC相比,Delphi更简单、更易于掌握,而在功能上却丝毫不逊色;和VB相比,Delphi则功能更强大、更实用。可以说Delphi同时兼备了VC功能强大和VB简单易学的特点。它一直是程序员至爱的编程工具。Delphi具有以下的特性:基于窗体和面向对象的方法,高速的编译器,强大的数据库支持,与Windows编程紧密结合,强大而
14、成熟的组件技术。但最重要的还是ObjectPascal语言,它才是一切的根本。Object Pascal语言是在Pascal语言的基础上发展起来的,简单易学。Delphi提供了各种开发工具,包括集成环境、图像编辑(Image Editor),以及各种开发数据库的应用程序,如DesktopDataBase Expert等。除此之外,还允许用户挂接其它的应用程序开发工具,如Borland公司的资源编辑器(Resourse Workshop)。在Delphi众多的优势当中,它在数据库方面的特长显得尤为突出:适应于多种数据库结构,从客户机/服务机模式到多层数据结构模式;高效率的数据库管理系统和新一代更
15、先进的数据库引擎;最新的数据分析手段和提供大量的企业组件。2.2数据库的选择ADO,即Active 数据对象:实际是一种提供访问各种数据类型的连接机制。ADO设计为一种极简单的格式,通过ODBC的方法同数据库接口相连。用户可以使用任何一种ODBC数据源。ADO集中了RDO和DAO的优点,可以通过简单的编程实现和各种数据结构进行连接。ADO通过下面几步来完成对数据库的操作:(1)创建一个到数据源的连接,边接到数据库;或者开始一个事务。(2)创建一个代表SQL命令行的对象。(3)执行命令行。(4)如果返回以表格形式组织的数据,则将它们保存在缓存中,产生相应的数据集对 象。这样便于查找,操作数据。(
16、5)通过数据集对象对数据进行各种操作。(6)更新数据库,如果使用事务,确认是否接受事务期间发生的数据变化。(7)结束连接和事务。使用ADO的目的是进入数据源,使得修改,更新数据成为可能。2.3 SQL SERVER 2008数据库简介数据库是事务处理、信息管理等应用系统的核心和基础,数据库管理系统通过将大量的数据按一定的数据模型组织起来,提供存储、维护和检索数据的功能,使应用系统可以以统一的方式方便、及时、准确地从数据库中获取所需的信息。Microsoft 公司推出的SQL Server 2008 数据库管理系统以其强大的功能在各领域得到广泛应用。Microsoft SQL Server 20
17、08是一种功能强大的关系型数据库管理系统,相对于FoxPro、Access等个人数据库布景而言,它是一人功能完备的“正规”数据库管理系统。它包括的支持开发的引擎、标准的SQL语言、扩展的特性(如复制、OLAP、分析)等功能,是一些大型数据库系统如Oracle才具备的特性。而像存储过程、触发器等特性,也是个人数据库所没有的。SQL Server从一开始就被设计成一个客户/服务器DBMS。开发这种客户/服务器的结构是为了能够管理连接到同一个网络中的很多不同的计算机(个人计算机、工作站或者SMP机器)。SQL Server的功能被分为客户端和服务器端。客户端提供了一个或多个用户界面,用以向DBMS提
18、交请求。服务器端(也就是DBMS)处理这些请求,并将处理结果返回到客户端。2.4 总结本章根据系统涉及到的问题去分析相关工具,让读者了解相关工具的基本概述以及更好的了解本系统软件。经过分析,我们选用Visual Basic 6.0和SQL Server作为开发工具,利用其提供的各种面向对象的开发工具,开发了学生成绩系统。3 可行性设计3.1 社会可行性在学生成绩的管理上,较为落后的人工档案管理系统,使用上的不便与维护上的开销日益凸显。手工录入、修改成绩,教师耗时耗力,工作繁琐,压力沉重,准确性还非常没有保证,学生查询成绩,排队、办手续、找档案,相当的费时间且不方便,这样一个臃肿的管理系统不但耗
19、费了大量的人力、物力、财力资源,管理的效率也是愈来愈低下本系统的开发目的就是将计算机信息科学与软件工程等高新技术融入管理工作当中,将管理的效率大幅提高,而维护的开销大幅减少,同时,使教师与学生在对成绩系统的录入、修改、查询等使用上得到极大的便利。3.2 技术可行性MySQL是一种开源数据库,不仅可以降低学校的开发成本,还可以避免版权的问题。MySQL可以满足各类高校的数据要求。另外,因为本系统是采用Java的开源框架Hibernate作为开发的中间件,数据库方面不会仅仅局限于MySQL,还可以轻松的转化为其他数据库,如Oracle等,只需修改数据库连接池的很少量配置即可。3.3 经济可行性采用
20、传统的手工录入方法,不仅工作繁琐而且需投入大量人力,很容易产生错误,甚至造成数据的不一致,从而产生了成本高,效果差的弊病,对于人数众多的高校学生管理而言是十分困难和麻烦的。而采用此系统,所需投入的成本和精力都远远低于手工。十分实用并且很方便,容易更新。各类信息数据只需一个进行统一管理即可,所以此系统在经济上也是可行的。3.4 操作可行性本系统的界面层次分明,一目了然,加上设计方面加入了人性化设计,管理此系统并不难,易学易会3.5 设计原则(1)安全性、可靠性、容错性安全可靠是一个应用系统的灵魂,一个极小的差错,可能会造成整个系统的瘫痪,甚至可能造成学校的信息泄露。因此系统设计必需把安全性、可靠
21、性、容错性放在首位。(2)开放性、标准化 从发展的眼光看,一个综合的计算机管理系统要实现校园、管理、查询、统计等各环节的信息共享,完成教职工信息录入查询和学生数据查询的数据交流。建立一个由开放式,标准化的异构式网络系统,开放式标准化的异构式数据库组成的平台来满足当前的需求,同时又能适应今后新技术的引进、开发和推广。 (3)实用、灵活、易于扩展系统设计尽量简单,灵活易于管理,有利于将来需要时进行功能改进和新技术引入。(4)先进性、成熟性我们所处的时代是信息时代,通信和计算机技术的发展日新月异。因而,应用系统的建设不仅应适应新技术发展方向,保证其先进性,同时兼顾成熟的计算机技术、保证系统的可靠。4
22、 需求分析4.1 开发目的学生成绩管理系统是应对学生人数增多、信息量增大的问题,实现管理的现代化、网络化,逐步摆脱当前学生成绩管理的人工管理方式,提高成绩管理效率而开发的。希望该开发程序能够解决学生信息存储、学生成绩查询、录入还有课程查询等一系列功能,并提供了对各功能模块的查询和更新功能,且这两种功能基本上是通过存储过程来实现的,其中学生成绩查询和学生信息查询是系统开发的重点。4.2 功能需求(1)教职工: 信息要求:对学生成绩的了解,对学生成绩会有一个成体的了解,在今后的课程教学中可以对自己进行改进。同时还可以对教授的课程进行修改和重设。还可以进一步了解学生的信息,加深对学生的了解,便于因材
23、施教。处理要求:当学生基本信息发生变化时,老师能对其进行修改。比如某些同学中有转校、后转来该系或转到其他系中,老师要能根据事实情况进行更新。需要有的操作是修改、删除、增加。能够管理课程信息。如老师进行排课的时候能够有序的安排,不会出现错排或重复等一系列状况。能够进行课程名、课时、学分的修改、删除和增添。对成绩的管理,能够进行成绩的录入、修改、删除,能够清晰的了解学生的成绩和大体情况,以便做出相应的总结和改进。安全性与完整性要求:系统应设置访问用户的标识以鉴别是否是合法用户,并要求合法用户设置其密码,保证用户身份不被盗用;系统应对不同的数据设置不同的访问级别,限制访问用户可查询和处理数据的类别和
24、内容;系统应对不同用户设置不同的权限,区分不同的用户,如区分普通用户(学生),教职工。各种信息记录的完整性,信息记录内容不能为空;各种数据间相互的联系的正确性;相同的数据在不同记录中的一致性。(2) 学生:信息要求:能够查询自己的成绩信息和大家的整体成绩好做出对自己的新的定位,同时还有更改自己的学生信息,还有就是查询新的课程信息。处理要求:当学生发现自己信息出现错误时,可以根据自己的实际情况来进行更改,比如某同学发现自己的年龄存储出现了错误就需要相应的机制进行修改、删除等。同时还可进入成绩查询系统。在该界面中同学可以查询自己的成绩,还可以查询整个科目的全部成绩。4.3 数据需求学生成绩管理系统
25、就是对学生成绩信息的管理,所以首先我们需要知道的是学生有那些信息,并且是怎样进行分类的。学生信息包含:学生基本信息、课程基本信息、成绩信息。学生基本信息根据要求应该包括学生对应的学号,姓名,性别,所在班级等;课程基本信息应该包课程号,课程名,课时,学分等;成绩表包含课程号,学号,成绩等。与学生唯一一一对应的是学号,所以学号是唯一的主键,其他的都不能是,根据学号我们可以查找学生的基本信息,还有学生姓名等有关信息;根据课程号可以知道学生对应的成绩等。与课程一一对应的是课程号,所以课程号是唯一主码,其他的都不是,根据课程号我们可以查询课程的基本信息,如课程名、对应的课时和对应的学分等。与成绩对应的有
26、两个主码,一个是课程号还有一个是学号。只有这两个同时确定了之后才能确定一个准确的成绩。在用户表中可以根据用户需要进行密码的修改等一系列操作。综合分析对信息管理系统分五个表:用户登录表(用户名,用户密码,用户权限)学生信息表(学号,姓名,性别,所在班级)课程表(课程号,课程名,实验学时,讲课学时,学分)成绩表(课程号,学号,成绩)班级信息表(班级名,班级人数)4.4数据流图(1)功能流图该数据流图主要体现教职工对学生信息、课程信息和学生成绩的管理,然后存储的信息作用于查询系统。在学生能够操作的只有成绩查询。(如图1所示) 图1.功能流图 图2.登录流图2)登录流图(如图2所示)5 数据库关系设计
27、数据库表格设计良好以及属性类型搭配有利于SQL Server 2008的数据库与Delphi 7.0中ADOTable组件,ADOConnect组件,ADOQuery组件等一系列连接组件的快速链接。以下列出各类表格的属性及属性值。5.1 表格设计(1)学生信息数据字典:字段名字段类型约束控制学号nchar(10)主键(primary key)姓名nchar(10)not null性别nchar(2)not null所在班级nchar(10)not null(2)班级信息表字段名字段类型约束控制班级名nchar(10)主键(primary key)人数intnot null(3)成绩表字段名字段
28、类型约束控制学号nchar(10)主键(primary key)课程号nchar(10)主键(primary key)成绩nchar(10)not null(4)课程表字段名字段类型约束控制课程号nchar(10)主键(primary key)课程名nchar(10)not null实验学时intnot null讲课学时intnot null学分intnot null(5) 用户登录表字段名字段类型约束控制用户名nchar(10)主键(primary key)密码nchar(10)主键(primary key)权限intnot null以下为部分表格数据截图:图3.学生信息表截图图4.课程信息
29、表截图5.2 系统设计(如图5所示)图5.系统设计截图5.3 ER关系略图5.4 数据库与组件链接数据库是信息管理系统的后台,储存着所有的信息,在信息管理系统中有着很重要的作用。数据库设计的好与坏,直接影响到这个系统的运行效率。良好的数据库设计,可以提高数据信息的存储效率,保证数据信息的完整性和一致性。同是,一个合理的数据库结构有利与程序的实现。Delphi7里面的ADOConnection控件用于连接到SQL Server 2008里面已经建立的数据库,将ADOConnection控件的ConnectionString属性设置链接到本机的数据库,使Delpi7的数据操作有来源。(如图7所示)
30、 图7.数据库连接ADOTable控件的Connection属性连接,在TableName中选择要连接的数据表,将Active属性设置为Ture。(如图8所示)图8.相关属性设置将DataSource的DataSet属性设置连接。之后就可以对Delphi7里面的数据进行操作。6 学生成绩管理系统功能测试6.1 测试环境(1) 硬件环境:CPU(Intel Core i3-380M,2.53GHz)HDD(320),Memory(2GB)(2) 软件环境:Delphi 7.0(3) 数据环境:SQL Server 2008(4) 网络环境:无6.2 功能测试(1)登录界面测试 登录界面(如图9)
31、所示,如果输入的用户名或密码有误,则弹出提示对话框(图10所示),输入正确,进入主界面(如图11)。 图9.登录界面 图10.登录有误提示 图11.主菜单(2)数据管理功能测试(学生信息管理示例) 从主菜单下拉菜单中信息管理-学生信息管理进入界面(界面如图12所示),该界面可实现学生信息的增加,删除,修改,保存信息并在界面中表格窗口显示。通过返回主菜单按钮回到主菜单,或点击退出系统按钮退出系统。 修改的数据信息相应的更新至数据库中。 图12.学生信息管理界面(3)查询测试(学生信息查询示例) 如图13所示,在窗口中输入查询条件,点击查询,结果便会显示在右侧窗口中。 图13.学生信息查询界面(4
32、)统计测试(课程统计示例) 从主菜单进入课程统计界面,点击统计要求,结果显示在右侧表格内,功能实现。 图14.课程统计界面(5)报表测试 点击主菜单中报表-成绩单进入界面,点击预览可得可打印表格,如图15所示。功能实现。图15.打印预览6.3测试总结 通过软件测试,可看到对数据的管理、查询、统计等功能均可实现。登录界面用户名与密码的组合一定程度上保证了数据库的安全性。本系统达到了最初设计的目的。7 结论7.1系统优缺点分析(1)优点 本系统在对数据的管理及查询上,界面美观,操作简单易懂。(2)不足之处在对用户权限的设计,该程序在对用户权限的设计比较混乱,不能够清晰的分出教职工和学生的使用权限,
33、这会使程序的可用性和安全性出现很大的问题。在这个方面,还有很多工作需要做,比如对登录用户在数据库的设计过程中要增加权限的设计,使的在登录后能够根据权限来进行相应的操作,不会是用户越级等。7.2经验总结经过两周的课程设计,加强了我关于理论联系实际、与具体课题项目结合开发、设计系统的能力。既让我们了解到应该怎样把理论运用于实际,又让我了解到在实践中遇到问题时要怎样运用所学知识理论去解决。在本次课程设计中,还需要一些以前没有学习到的知识,于是书籍跟网络成了我的良好助手。具体来说,在进行查询设计时,开始我无法将结果以表格的形式展示,报表的设计也存在问题,在网上查阅资料和与同学讨论学习后,将问题解决了。
34、在查阅资料的过程中,要判断优劣、取舍相关知识,这样一来我们对搜索来的信息的利用能力也有所提高。学习的知识是有限的,在以后的工作中肯定会遇到许多求知的领域,这方面的能力将有助于我未来的工作。参考文献:1网冠科技 Delphi7.0基础培训百例北京:机械工业出版社,2006.42赵应丁 等Delphi7课程设计案例精编北京:北京水利水电出版社,2004.1:2122633萨师煊 王珊数据库系统概论M北京:高等教育出版社,2000.24求是科技 Delphi7数据库开发技术与工程实践S.北京:人民邮电出版社,2004.4附 录源代码清单:1.Form1事件处理源代码:procedure TForm1
35、.Button1Click(Sender: TObject);begin权限 from users where 用户名=+edit1.Text+ and 密码=+maskedit1.Text+); adoquery1.Open; if (adoquery1.RecordCount0) and (adoquery1.FieldByName(权限).AsString=0) then form2.show else showmessage(您输入的用户名密码有误,请重试! ); form1.Hide;end;procedure TForm1.Button2Click(Sender: TObject)
36、;begin edit1.text:=; maskedit1.Text:=;end;procedure TForm1.Button3Click(Sender: TObject);begin application.Terminate;end;procedure TForm2.Button1Click(Sender: TObject);beginApplication.Terminate;end;2.Form2事件处理源代码:procedure TForm2.N4Click(Sender: TObject);beginApplication.Terminate;end;procedure TFo
37、rm2.N7Click(Sender: TObject);beginform13.show;form2.Hide ;end;procedure TForm2.N18Click(Sender: TObject);beginform14.show;form2.Hide ;end;procedure TForm2.N2Click(Sender: TObject);begin form3.Show; form2.Hide ;end;procedure TForm2.N3Click(Sender: TObject);begin form4.Show; form2.Hide ;end;procedure
38、TForm2.N10Click(Sender: TObject);begin form6.Show; form2.Hide ;end;procedure TForm2.N11Click(Sender: TObject);begin form5.Show; form2.Hide ;end;procedure TForm2.N12Click(Sender: TObject);begin form7.Show; form2.Hide ;end;procedure TForm2.N14Click(Sender: TObject);begin form8.Show; form2.Hide ;end;pr
39、ocedure TForm2.N15Click(Sender: TObject);begin form9.Show; form2.Hide ;end;procedure TForm2.N5Click(Sender: TObject);begin form10.Show; form2.Hide ;end;procedure TForm2.N17Click(Sender: TObject);begin form11.Show; form2.Hide ;end;procedure TForm2.Abour1Click(Sender: TObject);begin form12.Show; form2
40、.Hide ;end;End.3. Form3事件处理(用户管理)源代码:procedure TForm3.Button1Click(Sender: TObject);begin Application.Terminate;end;procedure TForm3.Button2Click(Sender: TObject);beginform2.show;form3.hide;end;procedure TForm3.Button3Click(Sender: TObject);beginADOTable1.Append;end;procedure TForm3.Button4Click(Sen
41、der: TObject);begin ADOTable1.Delete;end;procedure TForm3.Button5Click(Sender: TObject);begin ADOTable1.UpdateStatus;end;procedure TForm3.Button6Click(Sender: TObject);beginADOTable1.Post;end;End.4.Form6事件处理(数据管理)源代码:procedure TForm6.Button1Click(Sender: TObject);beginADOTable1.Append;end;procedure
42、TForm6.Button2Click(Sender: TObject);beginADOTable1.Delete;end;procedure TForm6.Button4Click(Sender: TObject);begin ADOTable1.Post;end;procedure TForm6.Button3Click(Sender: TObject);beginADOTable1.UpdateStatus;end;procedure TForm6.Button5Click(Sender: TObject);beginform2.show;form6.Hide ;end;procedure TForm6.Button6Click(Sender: TObject);beginApplication.Terminate;end;End.5.Form10事件处理(数据查询)源代码:procedure TForm10.Butto