delphi课程设计-学生成绩管理系统

1、枣庄学院信息科学与工程学院课程设计任务书题目学生成绩管理系统的设计与实现小组成员：XXX , XXX成员学号：XXXXXXXXXXXX,XXXXXXXXXXXXXX专业班级：计算机科学与技术课 程：数据库系统原理Delphi应用程序设计指导教师:XXX职称:XXX职称：讲师1 月12年 2011年12月-2011完成时间：枣庄学院信息科学与工程学院制2011年12月20日的连接'各窗体开发小组成员分工及职责:XXX编写学生信息的添加、修改代码，数据库建表，数据库和delphi:XXX编写封面、登陆界面，以及编写学生信息的查询、删除代 中按钮的添加、排版。码，delphi课程设计任务书及

2、成绩评定课程设计的任务和具体要求任务:综合运用数据库原理和Delphi的知识，完成一个信息管理系统的的全面设计，初步掌握数据库开发的基本方法。具体要求：1、 需求分析：根据自己的选题，绘制的DFD、DD图表以及书写相关的文字说明。2、 概念结构设计：绘制所选题目详细的E-R图。3、逻辑结构设计：将 E-R图转换成等价的关系模式；按需求对关系模式进行规范化；对规范化后的模式进行评价，调整模式，使其满足性能、存储等方面要求，设置实体完整性、域完整性和参照完整性，根据局部应用需要设计外模式。4、物理结构设计：选定实施环境，存取方法等。5、数据实施和维护：用 DBMS建立数据库结构，加载数据，实现各种

3、查询、链接应用程序， 设计库中触发器、存储器等对象，并能对数据库做简单的维护操作。6、用Delphi设计数据库应用系统，窗体包括封面、登陆窗体、主界面、功能模块窗体，总窗体数不少于15个；系统要综合学过的Delphi知识，要有菜单、工具栏、状态栏、帮助、打印功能等。7、设计小结：总结课程设计的过程、体会及建议。8、其他：参考文献等。日期:指导教师签字:指导教师评语成绩：指导教师签字：日期：指导教师评语成绩：指导教师签字：日期：课程设计所需软件、硬件等;内存 3G 硬件环境：Iterl(R) Core(TM)2 Duo CPU ，主频 2.31GHZ? 768X显示分辨率硬盘320G以上；102

4、4Delphi ,SQL Server2005软件环境：？课程设计进度计划起至日期工作内容备注参考文献、资料索引序号文献、资料名称编者者出版单位2005.电子科技大学岀版社1 delphi应用程序设计.李目海2006高等教育岀版社.王珊、萨师煊2数据库系统概论 2009四川大学学报，刘波Delphi的学生成绩管理系统基于3.引言当今时代是飞速发展的信息时代，在各行业中离不开信息处理，这正是计计算 机的最大好处在于它能够进行信息算机广泛应用于信息管理系统的环境。而且大大的提高了其使用计算机进行信息控制，不仅提高了工作效率，管理。安全性。尤其对于复杂的信息管理，计算机能够充分发挥它的优越性。管理信

5、息 是经过信息的采集、存储、加工、维护和使用的系统，它是随着学生成绩管理 系统是一个教育单位不可科学理论和技术科学的发展而形成的。所以学生它的内容对于学校的决策者和管理者来说都至关重要，缺少的部分，对学成绩管理 系统应该能够成为用户提供充足的信息和快捷的信息查询手段，但是一直以来人们都是靠传统生来说可以轻松查阅自己在校的成绩及信息等。人工的方式管理学生成绩，这种管理方式存在着许多的缺点，如：效率低，保密性差，另外 时间一长，将产生大量的文件和数据，这对于查找、更新和维和都带来了不少的困难。随着科学技术的不断提高，计算机科学日渐成熟，其强大的功能已 为人们作为计深刻认识，它已经入人类社会的哥哥领

6、域并发挥着越来越重要的 作用。有着手工管理过无算机应用的一部分，使用计算机对学生成绩信息进行 管理，保密性好、存储量大、检索迅速、查找方便、可靠性高、例如：法比拟 的优点，也是进企业的科这些优点能够条学生成绩管理的效率，寿命长、成本 价低等。学化、正规化管理，与世界接轨的重要条件。因此，开发这样的一套 成绩管理系统成为很有必要的事情。方便系统管理员对学学生成绩管理系统 提供了强大的学生成绩管理功能，生成绩等信息的添加、修改、删除、查询、 留言等操作，同时一样的方便学生 对自己各科成绩查询，学习交流。录目引言平台简介1开发平台和技术简介 号、宋体）介数据库简介及系统特点 结学生成绩管理系统分析

7、系统开发分析系统需求分析分析系统设计3.1系统体系结构 1.1（小 41.1.1 Delphi 工具简1.2数据库平台介绍1.2.1 SQL Server2005 小 1.32.1.22.1.122.1系统功能.33.2系统总体功能系统总体流 3.33.43.4.1程系统数据库设计 数据表的设计 数据表结构信息3.4.2 体面的实现理学生管理4.3.3 班级管理 成绩管理4.3.5 结4系统主窗口的实现4.1登录窗 4.2系统主界 4.3主要业务功能 系统管 4.3.1 4.3.2 4.3.4 .课程管理 设计总 5平台简介1开发平台和技术简介1.1工具简介1.1.1 Delhi“真正的程序公

8、司开发的可视化软件开发工具。是著名的BorlandDelphi最实在的描述。Delphi最经 典、Delphi ”这句话是对员用C,聪明的程序员用VCDelphi被称为第四代编 程语言，它具有简单、高效、功能强大的特点。和相比，更简单、更易于掌握，而在功能上却丝毫不逊色；和 VB相比，Delphi功能强大和V同时兼备了 VCDelphi则功能更强大、更实用。可以说 Delphi E简单易学的特点。他一直 是程序员至爱的编程工具。具有以下的特性：基于窗体和面向对象的方法，高 速的编译器，Delphi但重强大而成熟的组件技术。与强大的数据库支持， windows变成紧密结合，语言是在 Object

9、 Pascal要的还是 Object Pascal语 言，它才是一切的根本。语言的基础上发展起来的，简单易学。Pascal提供了各种开发工具，包括集成环境、图像编辑以及各种开发数Delphi等。除此之外，还允许用户挂 DesktopDataBase Expert据库的应用程序，如 公司的资 源编辑器。接其它的应用程序开发工具，如 Borland众多的优势当中，它在数 据库方面的特长显得尤为突出：适应 Delphi在服务机模式到多层数据结构模 式；高效率的数/于多种数据库结构，从客户机最新的数据分析手段和提供大 量据库管理系统和新一代更先进的数据库引擎；的企业组件。1.2数据库平台介绍1.2.1

10、 SQL Server 2005 数据库简介及系统特点 SQLServerMicrosoft 公司推出的关系数据库管理系统 SQL Server 2005是的五个 版本一一企业版、标准版、工作组版、的最新版本。SQL Server 2005全文搜索增强功能、可管理性功能、可用开发版和简易版，在可编程性功能、国可伸 缩性和性能增强功能、）、数据库维护功能、性功能（数据库故障和冗余不同版 存在一定的差异。）等方面，际化功能（排序规则、字符支持和全局部署，其适 用环境、适用对象、安装所需的硬软件环境各不本的SQL Server 2005相同。提供了一组完整的图形工具和命令行实用工具，Microsof

11、t SQLServer 2005有助于用户、数据库开发人员和管理员提高工作效率。是一个全面的数据库平台，其数据引擎是企业数据管理 SQL Server 2005报表、集成和通知功能为工具、 分析、集成的商业智能（BI）解决方案的核心。数据库引擎为关系型数据和用户 提供了企业级的数据管理.SQL Server 2005可以构建和管理用于业务的高可用 结构化数据提供了更安全可靠的存储功能，可通过记分卡、SQL Server 2005和高性能的数据应用程序。此外，应用和移动设备将数据应用推向业务的各个领域。、DashboardWeb services小、结1.3服务机模式到多层数据结构模/Delph

12、i适应于多种数据库结构，从 客户机最新的数据分析高效率的数据库管理系统和新一代更先进的数据库引 擎；式；提供了一组完整的图形工具 2005SQL Server手段和提供大量的企业 组件。而和命令行实用工具，有助于用户、数据库开发人员和管理员提高工 作效率。不仅做起,SQL server2005工具相结合，做学生成绩管理系统利用 delphi和形象，为我们本次做课程设计提供了有力方便，而且看起来更直观、 来简易、的实验条件，同时也调高了我们做实验的效率。2学生成绩管理系统分析2.1系统开发分析随着社会信息量的与日俱增，学校需要有 一个很好的学生成绩管理系统，系统应具有既方便老师对觉得成绩的查询以

13、方 便对学生成绩进行有效的管理。和插入，也方便学生对自己成绩和获得的学 分进行查询的功能。结构的学生成绩管理系为提高其安全性和响应速度，本系 统是基于C/S为学校学生和老师建立一个通过该系统可对学生成绩信息进行方便管理，统，。成绩信息沟通的平台，从而方便学校学生的成绩管理系统需求分析2.1.1我们将针对目前学校对学生成绩管理方面存在的问题和管理的实 际需要，通过几个功能模理顺管理体制和建立各种管理规范与开发系统有机结 合起来，块进行统一管理，要求系统满足以下几个方面的要求：对从用户角 度来看，系统首先应该能够提供便捷与强大的信息查询功能。于学校的全体老 师而言，他们应该能够对系统的不同部分有各

14、自不同的权限，任课教师就不能 再具有任课教师可以录入成绩，但成绩一旦保存之后，例如，应该具有查询所 有科目及所有学生的成对于其他教师而言，修改成绩的权限，系统应该提供学 生能够查询自己的成绩的功对于学生而言，绩的权限，等等。记录学生的成从 教务管理者角度来看，系统必须能够实现即时查询功能，能。绩，实现对成绩的各种操作等功能。并方便有能够存储一定数量的学生信息，具有较强的灵 活性及可扩展性，删除及修改，学生信息的录入、这主要包括：效的进行相应 的数据操作和管理，课程信息的录入，删除和修改，班级信息的录入、删除及 修改，成绩信息的录入、删除、修改，各种信息的单条件查询和多条件的组合查询，以及学生各

15、科 成绩的多关键字检索查询。具有较咼的安全性，系统登录有各自的安全账户。系统管理员可更改用户信息， 同时可以针对其他的信息具有所有的权限； 学生只能对所有的信息具有查询的 功能，不具有修改、删除和录入的权限。系统能够提供数据信息授权访问，防 止随意删改等。总之，希望通过本系统的开发，可以解决学生成绩管理、课程信息管理、学生 基本信息管理等功能，还可以进行班级信息的管理，同时能够实现系统管理， 主要是针对登录用户的添加、删除、修改和查询功能，使学校对学生的成绩管 理自动化和规范化。按照用户需求，可将“学生成绩管理系统”设计成以下的层次结构，如下图1-1 所示系统管理用户信息修改学生管理学生信息添

16、加学生信息查询学学生信息修改生班级信息查询成 班级管理班级信息添加 绩 管 班级信息修改理系课程信息查询课程信息添加 课程管理 统课程信息修改成绩信息查询 成绩信息录入成绩管理成绩信息修改图1-1系统功能2.1.2系统功能分析学生成绩管理系统必须能够完成管理，成绩信息管理，课程信息管理，班级信 息管理，学生基本信息管理，成绩和查询管理。系统管理主要是维护系统和正常运行和安全性设置，包括当登录用户身份时管 理员能够完成添加用户，删除用户，修改密码，查询用户的权限和重新登录等 功能，以及针对本系统涉及到的数据库中能够实现按照学生和学号，学生和姓 名，学生所在班级代码或者学生和性别，进行单条件或者组

17、合条件的查询。1. 系统管理系统管理有系统管理员身份和用户可以登录，它负责用户的管理。用户分为三 大类：一类为系统管理员，可添加，修改，删除和查询各类用户；另一类用户 是任课教师，可以修改自己和登录信息；最后一类用户是学生，只能修改自己 的用户信息，不具有添加，修改和删除和操作权限。2. 学生基本信息管理学生基本信息管理能够实现有关学生基本信息的录入，修改，查询和删除。同时能够实现按照学生学号或者学生姓名，进行单条件或者组合条件和查询3.班级管理班级基本信息管理能够实现有关班级基本信息的录入，修改，查询和删除。同 时能够实现按照班级号或者班级名，进行单条件或者组合条件和查询 4.课程管 理课程

18、基本信息管理能够实现有关课程基本信息的录入，修改，查询和删除。同 时能够实现按照课程号或者课程名，进行单条件或者组合条件和查询 5.成绩管 理成绩基本信息管理能够实现有关学生成绩基本信息的录入，修改，查询和删除。同时能够实现按照学生学号或者学生姓名，进行单条件或者组合条件和 。查 询通过分析，我们可以得到“学生成绩管理系统”的顶层数据流图，如图 1-2 所示。学生 务教成 学生情况理管 管理员 绩 人员 学生 查询管 任课教师理 系 统 学生成绩 教师1-2数据流图图教师是对1-2可以看出教务管理人员可以对学生情况进行录入修改删除，从图任课教师所提供的功能就是该系统对管理员、学生、学生成绩进行

19、查询增加， 进行查询。系统设计3系统体系结构3.1通过分析，进一步设计出“学生成绩管理系统”的总体结构模块系统总体功能3.2）学生成绩录入、查询、修改和删除。（1 （2）课程相关信息录入、修改、删 除和查询功能。3 ）学生相关信息录入、修改、删除和查询功能。（）班级相 关信息录入、修改、删除和查询功能。（4 ）课程表相关信息录入、修改、删 除和查询功能。（5系统管理功能，包括登录用户的添加、修改、删除和查询， 权限的控制。系统总体流程3.33-2系统总体设计流程图如图所示 系统启动，进入身份验证（1）初始化系统，导入数据库(2)进入消息循环状态，通过事件驱动激活各模块, 执行各任务(3) 一旦

20、任务执行完毕重新进入消息循环状态(4)通过事件驱动 退出系统(5) 输入用户信息 退回提交查询数据库警告：登录错误判断检验数据否是否正确系统数据库设计3.4是获得身份和权限数据表的设计3.4.1程序控制逻辑图3-2图 实体E-R图：1 .)学生实体的E-R图(1 名姓 别性 龄年生学别系龄年级班号图课程实体(2)E-R课程名 任课老师学分课程编号(3)E-R图班级实体辅导员班级号 E-R图用户实体通过分析上述实体间的联系将分由于用户这一实体它是用来确定使用该系 统权限的于其他实体E-R图。本图中间无内在联系，故在此不考虑。同时每个 实体的属性在上面的分E-R已经给出，在此不予给出。n1级班nm

21、数据关系模型2.程课班级名户用图合并为学生成绩管理系统的基E-R于属学生选修程课（学号，姓名，性别，年龄，班级号，系别）stude ntif（课程号，课程名，任课老师，学分）courseif（班级号，班级名，辅导员）classif 学号，课程号，成绩）gradeif （用户名，密码，用户身份）userif数据表结构信息3张表，分别如下：系统数据表及 6根据实际情况的需要，系统 一共需要3-7所所示。表其用途如表 3-2 3-1数据表名称与用途表数据表用途数据表名称Userlnfo ）用户登录信息用户登录表（各个班级 信息）班级信息表（Classinfo学校学生基本信息学生信息表（Student

22、lnfo ） StuGrade）学生成绩信 息成绩信息表（所有课程基本信息课程信息表（Course Info）数据表结构信息342）3-2 用户登录表（Userlnfo表是否主键长度是否可为空类型中文描 述字段名Varchar 否10用户名 是Userif10 用户密码 Userpwd Varchar 是否 Userleve 10 否用户权限是Varchar d数据库中用户登录表的部分信息表3-3UserLevel Userid Userpwd 2009122201 学生 20091222012009122202 2009122202 学生 Yang Ya ng 管理员 tia ntian T

23、ia n教师字段名屮文描类型长度是否可为是否作为主空ClassifStude ntnu mbe r 字段名Sno Sn ame Sex Classif 字段 名 Sno Cno Gradepeaceti me Gradeexprime nt Gradelast Grade字段名 Kcid Ken ame Periodexprim ent Periodteachi ng Credit Coursetype述键班级名Varchar '0否是学生人数Int4是否表3-4 Classinfo ）班级信息表（Studentinfo ）表3-5学生信息表（是否主键是否可为空类型中文描述 长度是学号

24、6 Varchar 否20 姓名 否Varchar是是2 否Varchar性别Varchar否50是所在班级）成绩信息表（StuGrade表3-6否主shi是否可为空类型长度中文描述键Varchar学号10否是Varchar课程编号10 是是Numberic是否9,1平时成绩Numberic实验成绩否是9,1否 是Numberic 9,1 期末成绩 否 是Numberic 9,1 总成绩）课程信息表（CourseInfo3-7 表是否主键是否可为空 长度类型 中文 描述 是否10 Varchar 课程编号 Varchar 课程名称 否50是 实验学时 Int否4是讲课学时否Int 4 是9,1

25、是否Numberic 总学分6否是课程类型Varchar系统主窗口的实现4.登录窗体4.1在登录该系统时，出现封面图，封面图如下:代码如下：beginApplicati on.ln itialize;aboutbox:=Taboutbox.create(applicati on);aboutbox.Show;aboutbox.update;sleep(IOOO);aboutbox.free;form1:=tform1.Create(applicatio n);if form1.showmodal=10 the nbeg inform1.free;Applicati on. CreateForm

26、(TForm3, Form3);Applicati on.Run;end;end.并对用户在进行系统登陆过程中，登陆模块将调用数据库里的操作员字典表， 名 和密码进行验证，只有输入了正确的用户名和密码后， 系统登陆才会成功。当输 入了错误的或者是不存在的用户名和密码时，系统会给出出错信息提示，指明登陆过程中的错误输入或错误操作，以便用户进行正确的登陆。如图4-1图4-1用户登录窗体验证用户登录信息代码如下：procedure TForml.Butto n1Click(Se nder: TObject);beg inedit1.Text:=trim(edit1.Text);edit1.Text:

27、=stri ngreplace(edit1.Text,”,”,freplaceall);edit1.Text:=stri ngreplace(edit1.Text,”,”,freplaceall);if edit1.Text='' the n showmessage('strDesc'); edit1.SetFocus;血哪血術皆|:石拝沖:一旦一:旦abort;beg in');checklnput(edit1,'请输入用户号');checklnput(edit2,'请输入密码queryuserif.close;queryuse

28、rif.SQL.clear;where userif queryuserif.SQL.Add('select * fromID='+'H'+edit1.Text+HH+'a nd'+'passwd+'+”+edit2.text+”J;queryuserif.Eof thenbegin'); showmessage(' 用户号或密码不正确 edit1.SetFocus; inc(times); if times>=3 thenbegin'); showmessage(' 非法用户不能登录系统 m

29、odalresult:=mrcancel; end;endelse modalresult:=mrok;管理员师 or (combobox1.Text=' 教 ') 学 if (combobox1.Text=' 生 ') then ')or(combobox1.Text='beginadoquery1.Close; adoquery1.SQL.Clear;adoquery1.SQL.Text:='select * from userif where用户名=”'+edit1.text+”' and密码=”'+edit

30、2.text+”；adoquery1.Ope n;if adoquery1.RecordCo un t<>0 the nbeg inform1.ModalResult:=10;form3:=tform3.Create(self);form3.Show;endelseshowmessage('用户或密码不正确');end; end;procedure TForm1.Butto n2Click(Se nder: TObject);beg inapplicatio n.Termi nate;end;end.4.2系统王界面主窗口是工作人员进入该系统首先见的界面，是班级、成

31、绩、学生信息、课程 等的查询、添加、修改等进入窗口。根据功能界面设计如图4-2 :靈甜幽12矗ME由却i函i社应&涵-舀矗匡世凶 学一艸W理出 穆退二二匾 3B48图4-2系统主界面4.3主要业务功能的实现4.3.1系统管理用户管理 该模块包括一个功能：用户修改；即但是教师和学生仅可以进 行用户修改，管理员用户可以执行以上操作，用户可以修改自己的登录密码是用户修改界面：若原密码输入不正确，则将保存失败！图 4-33?用户時息幢改rnranrs用户名： oaiooi密码用户权限兰條改|1233上 091001"03100212309100209100309100 chi代门su

32、nI用户収服学生 学生 学生 学生 教师管理员取消I实现代码如下：beginadoqueryl.edit;adoquery1.Fields0 .AsStri ng:=edit1.Text;adoquery1.Fields1.AsStri ng:=edit2.Text;adoquery1.Fields2.AsStri ng:=combobox1.Text;adoquery1.Post;');修改成功 showmessage('edit1.text:=”； edit2.text:=''combobox1.text:=”;end;4.3.2成绩管理成绩查询管即面向对象

33、编程时所有学生的成绩，14-4图所示是在条件课程编号为理员、学生和教师都可以查询所有人的成绩，鼻iU妒I成绩查询图4-4成绩录入学生姓名可以自该功能只有管理员和教师可操作，且当输入学生学 号时，课程名称也可以自动从数据库中提动从数据库中查询得到，输入课程编号时，TGIuru.Button 1Click(Sender: procedure所示：下中出取来。其代码如TObject);beg inadoquery1.edit;adoquery1.Appe nd;adoquery1.Fields0.AsStri ng:=edit1.Text;adoquery1.Fields1.AsStri ng:=e

34、dit3.Text;adoquery1.Fields2.AsStri ng:=edit5.Text;adoquery1.Fields3.AsStri ng:=edit6.Text;adoquery1.Fields4.AsStri ng:=edit8.Text;adoquery1.Post;');showmessage('确定保存？edit1.text:=''edit3.text:=''edit5.text:=''edit6.text:=”;edit8.text:=”;end;为4-5在执行过程中，只有管理员和教师可以修改和添加成绩

35、信息，而学生不能 学生点击成绩修改或成绩录入时出现的提示：实现这两项功能。如下图成绩修改或录入学生操作图4-5分别为教师或管理员录入时的界面：4-6如下图先d诜三曰S 鳧芋土些昌 釵亠:：苣上二 也比潼旦也汽I V買住苕芒 期.2-4 Z.I9911®詐£|-"SD10r：認T；IOD"Hl咖illJlld-JID051I00EinoBi'31 flu：理存n窗，和洞=时虹显一；工电乳一启衙活4-6管理员或教师成绩录入成绩修改会从当前点打开成绩修改模块时，成 绩修改与成绩录入共用同一个窗体， 添加，数据中读取该行成进行修改存，只有 管理员和教师可

36、以对成绩进行修改、而学生仅能查询自己的成绩。4-7如下图分别为教师或管理员修改时的界面：管理员或教师成绩修改4-7课程管理4.3.3 1.课程信息查询学生、管理员和教 师都能进行课程查询，直接点击查询将可以看到所有的4-8课程，而输入条件则可以按条件查询如图 为课程信息查询：4-84-8 课程信息查询 实现代码如下：procedure TCsearch.Button 1Click(Sender: TObject);beg inif RadioGroup1.item In dex=0 the nbeg inadoqueryl.close;adoqueryl.sql.clear;adoquery1

37、.sql.add('select * from courseif+' where eno like'+”+'%'+edit1.text+'%'+'''');adoqueryl.ope n;endelseif RadioGroup1.item In dex=1 the nbeg inadoquery1.close;adoquery1.sql.clear;adoquery1.sql.add('select * from courseif+ ' where cn ame like'+

38、9;H'+'%'+edit1.text+'%'+'''');adoqueryl.ope n;endelseif RadioGroupl.item In dex=2 the nbeg inadoqueryl.close;adoqueryl.sql.clear;adoquery1.sql.add('select * from courseif+ ' where ccredit like'+'H'+'%'+edit1.text+'%'+'''');adoqueryl.ope n;endelsebeg inadoqueryl.close;adoqueryl.sql.clear;adoquery1.sql.add('select * from courseif+ ' where ctype like'+”+'%'+edit1.text+'%'+'''');adoqueryl.ope n;end;end;procedure TCsearch.Butt on 2Click(Se nder: