通信工程毕业设计（论文）-Delphi7.0学生信息管理系统.doc

长沙学院 CHANGSHA UNIVERSITY毕业设计（论文）资料设计（论文）题目： 学生信息管理系统 系部： 电子与通信工程系 专 业： 通信工程 学 生 姓 名： 班 级： 05通信1 学号 2005043124 指导教师姓名： 职称 实验师 最终评定成绩 长沙学院教务处 二七年十月制目 录第一部分 毕业论文一、毕业论文第二部分 外文资料翻译一、外文资料原文二、外文资料翻译第三部分 过程管理资料一、 毕业设计（论文）课题任务书二、 本科毕业设计（论文）开题报告三、 本科毕业设计（论文）中期报告四、 毕业设计（论文）指导教师评阅表五、 毕业设计（论文）评阅教师评阅表六、 毕业设计（论文）答辩评审表2009届本科生毕业设计（论文）资料第一部分 毕业论文（2009届）本科生毕业论文 学生信息管理系统系部： 电子与通信工程系 专 业： 通信工程 学 生 姓 名： 班 级： 05通信1 学号 2005043124 指导教师姓名： 职称 实验师 最终评定成绩 2009 年 6 月 长沙学院本科生毕业论文学生信息管理系统系 （部）： 电子与通信工程系 专 业： 通信工程 学 号： 学生姓名： 指导教师： 实验师2009 年 6 月 长沙学院毕业设计(论文) 摘 要学生信息管理系统是基于delphi7.0编辑环境、Access建数据库的功能比较齐全的管理系统。其界面美观，操作简单，直观易懂。本系统主要针对学校里学生的信息进行管理。在此基础上对每个学生的基本信息，成绩信息，班级的基本信息，班级选课信息等都进行了汇总。方便学生或相关部门进行查找和浏览的系统设计方案。文中重点讲解了超级用户如何对用户的各个数据项进行增删，以保证可及时对每个学生的信息进行更新。其实现的具体功能包括有：系统管理（添加用户、用户管理、修改密码、重新登录，系统备份）；班级管理（班级浏览、添加班级），学生档案管理（档案的添加、查询、浏览）；课程管理（所有课程、班级选课）；成绩管理；帮助；退出系统，并给出具体设计方法和实验结果。系统具有相当的实用性，实现了对用户、学生信息和班级、课程、成绩的管理，以及对学生档案信息的打印报表。论文最后对学生信息管理系统进行了系统测试和性能分析，达到预先的设计要求。关键词：学生信息，管理，数据库，DelphiABSTRACTThe student information management system is based on the delphi7.0edition environment, Access constructs the database the function quite complete management system management system. Its contact surface artistic, the operation simple, direct-viewing is easy to understand. The system mainly aims at in the school students information to carry on the management. To each students basic information, the result information, classs and grades basic information, the class and grade chose the class information and so on all to carry on has compiled. The convenient student or the correlation department carry on the search and the browsing. Not only that, the super user also may carry on the additions and deletions to users each data item, by guaranteed may promptly carry on the renewal to each students information. Its realization concrete function has (increase user, the user management, the revision password, reregister, system backup), class manage (class and grade glances over, the increase class and grade), the student records management (Increase file, inquiry file, browsing file), the curriculum manages (All curricula, the class and grade choose the class), the result management, the help, the withdrawal system, And given the specific design methods and experimental results. This system has the suitable usability, can realize to the user, the student information and the class and grade, the curriculum, the result management. As well as to student file information printing report form. Finally information management system for students to carry out the system testing and performance analysis, to advance the design requirements.Keywords: Student information,Management,Database,Delphi目 录摘 要IABSTRACTII第1章 绪论11.1 编写目的11.2 项目背景和意义1第2章 需求分析12.1 运行环境12.2 功能需求12.3 程序流程图22.4 数据描述22.4.1 数据库描述22.4.2 数据库的连接32.4.3 数据流图42.4.4 数据词典4第3章 概要设计93.1 功能模块树93.2 成绩管理E-R图103.3 数据结构设计103.3.1 数据逻辑结构设计103.3.2 数据物理结构设计11第4章 详细设计134.1 目标134.2 主要功能模块的创建134.2.1 登录模块134.2.2 添加用户模块154.2.3 数据维护模块174.2.4 档案浏览模块204.2.5 查询模块224.2.6 班级选课模块244.2.7 成绩统计模块29第5章 系统测试与运行335.1 测试方案335.2 测试项目与测试内容335.3 测试用例335.4 系统测评355.5 系统难点与突破35结 论36参考文献37致 谢38IV 长沙学院毕业设计(论文) 第1章 绪论1.1 编写目的随着信息技术的不断发展，计算机已应用到各个领域，通过计算机可减少大量的手工操作，提高工作效率，为了能对学生信息的更新管理方便和高效，因此开发一个学生信息管理系统。经过可行性分析，特编写可行性研究报告，对该系统的功能，成本，收益等方面进行分析，报告3。1.2 项目背景和意义(1)项目的名称:学生信息管理系统(2)项目的组织者:长沙学院(3)项目背景:随着科学教育事业的不断发展，各大高校纷纷扩大生源，学生数量的增加必然会给学生信息管理带来一定的难度。传统的人工管理每次要处理的数据量很大，不利于管理人员总体把握学生的档案信息与成绩情况，统计报表更是繁琐，而且一旦时间过久就很容易出错。这对于学校，无疑是个很大的负担。如果不能及时了解学生的成绩，就不利于下一步的学习计划的制定。如果不能把学生的信息汇总，查询起来非常不方便，直接影响了效率。而该系统集学生档案信息的管理，学生成绩的管理，以及班级课程管理为一体，使用和查询都很方便。使管理人员很容易掌握学生的基本情况，使复杂的事情一目了然12。(4)项目意义:系统给管理人员提供了各种不同的方式来查询需要了解的信息。不仅如此，对于超级用户而言还可以对其中的各个数据项进行增加，删除，修改等操作，以保证可及时对每个学生的信息进行更新。除此之外，系统其他功能也比较强大。统计功能可以对学生的成绩平均分统计出来，并计算出班级的优秀与不及格的人数。可以非常直观的了解学生的成绩情况。数据报表功能可以将学生的基本信息打印出来生成文档形式。数据备份功能即将数据库中的各数据表进行备份，当数据表出错或某些错误操作而又不能返回时及时进行数据的恢复。管理设置功能对登录该系统的权限进行更改。帮助功能为用户提供对本系统的具体操作。本系统的开发工具为优秀的面向对象的可视化工具Delphi 7.0。它拥有快捷方便的开发环境，灵活简洁的编程语言，以及功能强大的组件技术9。近几年，该工具的使用极为广泛。数据库使用Microsoft Access建造。对于本系统的详细介绍将在下面的章节中。37第2章 需求分析2.1 运行环境硬件环境处理器：Intel 奔腾4 631 3.0GHz 或更高内存：512 MB硬盘空间：40 GB 显卡：SVGA显示适配器软件环境操作系统：WINDOWS 98/ME/2000/XP数据库：Microsoft Access2.2 功能需求对于本系统，我们需要实现以下一些基本功能：(1)系统管理：在系统管理模块中我们可以实现添加用户，用户管理，修改密码，重新登录以及系统备份这几项功能。(2)班级管理：由班级浏览模块，添加班级两个模块组成。(3)学生档案管理：可以对学生的档案添加，查询，以及浏览。(4)课程管理：显示了所有的课程记录和每个班级的课程表。(5)成绩管理：成绩管理可以实现对成绩的浏览以及对成绩的统计功能。(6)数据库管理：对数据库中的表可以进行备份和恢复，以防止数据库中的数据被破坏。(7)报表打印功能：根据查询的结果打印学生档案信息。(8)帮助文档：帮助文档对本系统的基本功能做了详细的概述，当用户不清楚操作本系统时，可以查找该帮助文档，来获得正确的操作方法。 开 始2.3 程序流程图输入用户名、密码否用户名与密码是否一致是进入系统退 出 图2.1 程序流程图2.4 数据描述2.4.1 数据库描述系统使用Access 2000关系型数据库，一共用到六张数据表，分别是：班级表 banji 成绩统计表bjkc 课程course成绩表chengji 学生档案表xsdangan 用户密码表 yonghu数据存储名称：班级表别名：banji简述：存放班级的相关信息组成：年级+班级+专业+班主任 数据存储名称：成绩表别名：chengji简述：存放学生成绩的信息组成：学号+课程名+成绩组织方式：索引文件，以学号为主键数据存储名称：成绩统计表别名：bjkc简述：存放班级总体成绩的信息组成：班级+课程名+平均成绩+不及格人数+优秀人数组织方式：索引文件，以课程名为主键数据名称：学生档案表别名：xsdangan简述：存放学生基本信息。组成：学号+姓名+性别+出生年月+家庭住址+邮政编码+联系电话+班级+入学时间组织方式：索引文件，以学号为主键数据存储名称：课程表别名：course简述：存放课程的基本信息组成：课程号 +课程名组织方式：索引文件，以课程号为主键数据存储名称：用户密码表别名：yonghu简述：存放用户名与密码组成：用户名+密码+权限1+权限2+权限3+权限42.4.2 数据库的连接系统使用ADO实现数据库的连接。ADO是微软颁布的一个标准，而Access也是由微软开发的，所以二者的兼容性一定很好。利用ADO访问数据的进程为：首先向应用程序添加一个ADOConnection组件，用于建立与数据库的连接；然后使用一个ADOQuery组件向数据库执行SQL命令；最后通过数据集获得数据。同时，数据集组件必须将Connection属性指向所使用的ADOConnection组件5。普通用户超级用户用户用户权限表检验权限检验用户有效登录系统管理浏览查询2.4.3 数据流图图2.2 登录数据流图增、删、改存在查询信息信息表检验是否存在信息修改记录系统管理图2.3 修改信息流图2.4.4 数据词典 数据元素：数据元素名称：用户名类型：字符串长度：24取值范围：简述：普通用户和超级用户登录的名字数据元素名称：用户密码类型：数字长度：取值范围：简述：读者和管理员登录的密码数据元素名称：用户类型类型：字符串长度：取值范围：简述：把进入系统的用户分为超级用户和普通用户数据元素：学号类型：数字长度：学生的学号取值范围：00001-10000简述：学生的学号数据元素名称：姓名类型：字符串长度：24 取值范围： 简述：学生的姓名数据元素名称：性别类型：字符串长度：2 取值范围：男，女简述：学生的性别数据元素名称：出生年月类型：日期长度：取值范围：1900-2050简述：学生的出生年月 数据元素名称：家庭住址类型：字符串长度：取值范围：简述：学生的家庭住址 数据元素名称：邮政编码类型：数字长度：5取值范围： 简述：学生家庭住址的邮政编码 数据元素名称：联系电话类型：数字长度：8取值范围： 简述：学生的联系电话 数据元素名称：班级类型：数字长度： 取值范围：1-20简述：学生所在的班级描述 数据元素名称：入学时间类型：日期长度： 取值范围：1900-2050简述：学生的入学时间 数据元素名称：专业类型：字符串长度： 取值范围：简述：学生所学的专业 数据元素名称：年级类型：字符串长度： 取值范围：简述：学生所在的年级 数据元素名称：班主任类型：字符串长度：24取值范围：简述：班级管理者的姓名 数据元素名称：课程名类型：字符串长度： 取值范围：文本简述：学生所选课程的名字。 数据元素名称：课程号类型：数字长度：6取值范围：简述：所学课程的编号 数据元素名称：平均成绩类型：符点型长度：取值范围：0-100简述：学生的课程平均成绩 数据元素名称：不及格人数类型：数字长度：取值范围：简述：成绩不及格的学生人数 数据元素名称：优秀人数类型：数字长度： 取值范围：简述：成绩优秀的学生人数 数据流：数据流名称：录入用户信息数据流来源：用户数据流去向：用户管理模块数据流组成：用户名+密码+权限数据流名称：输入条件查询档案数据流来源：用户数据流去向：学生档案管理模块数据流组成：学号|姓名|性别|班级|出生年月|家庭住址|邮政编码|联系电话|入学时间数据流名称：录入班级信息数据流来源：班级管理模块数据流去向：普通用户数据流组成：年级+班级+专业+班主任数据流名称：录入课程信息数据流来源：超级用户数据流去向：课程管理模块数据流组成：课程号+课程名数据流名称：输入成绩信息数据流来源：超级用户数据流去向：成绩管理模块数据流组成：学号+课程名+成绩加工：加工名：档案添加管理加工编号：1简要描述：本加工主要进行录入新学生的档案。输入数据流：录入学生的信息输出数据流： 新学生档案信息加工名：档案查询管理加工编号：2简要描述：本加工是对学生档案信息进行查询输入数据流：输入查询条件输出数据流：学生档案信息加工名：添加班级加工编号：3简要描述：本加工是对添加班级的有关信息输入数据流：某班有关的信息输出数据流：班级信息加工名：用户管理加工编号：4简要描述：本加工实现对用户的管理输入数据流：输入用户的名字，密码和权限输出数据流：用户管理记录第3章 概要设计系统备份系统恢复档案添加档案查询档案浏览帮助系统菜单添加用户用户管理修改密码系统维护重新登录所有课程班级选课成绩浏览成绩统计班级浏览添加班级 学生信息管理系统 系统 管理 班级 管理学生档案管理 课程 管理 成绩 管理管理帮助关于3.1 功能模块树 图3.1 功能模块树m成绩学期学号n学 生学号班级姓名性别年龄考 试 课程课程名课程类型成绩3.2 成绩管理E-R图 图3.2成绩管理E-R图3.3 数据结构设计3.3.1 数据逻辑结构设计用户表(用户名，用户口令，是否系统管理员，系统管理，班级管理，档案管理，课程、成绩管理)班级表(年级，班级，专业，班主任)课程表(课程号，课程名)班级课程表(班级，课程名，平均成绩，优秀人数，不及格人数)成绩表(学号,课程名，成绩)学生档案表（学号，姓名，性别，出生年月，家庭住址，邮政编码，联系电话，班级，入学时间）3.3.2 数据物理结构设计用户表 数据来源：系统管理模块进行录入。表3.1 用户表 名称 字段名称类型主键用户名Username字符串 否用户口令Password数 值 否是否系统管理员Admin 字符串 否用户管理Qx1 字符串 否班级管理Qx2字符串否档案管理Qx3字符串否课程、成绩管理Qx4字符串否班级表 数据来源：班级管理模块进行录入。表3.2 班级表 名称字段名称类型主键 年级 年级字符串 否班级班级 数值 否 专业专业字符串 否 班主任 班主任 字符串 否课程表 数据来源：课程管理模块班级选课进行录入表3.3 课程表 名称 字段名称 类型 主键 课程号 课程号 数值 是 课程名 课程名 字符串否班级课程表 数据来源：班级管理模块进行录入。表3.4 班级课程表 名称 字段名称 类型 主键 班级 班级 数值 否 课程名 课程名 字符串 是 平均成绩 平均成绩 符点 否 优秀人数 优秀人数 数值 否 不及格人数不及格人数 数值 否成绩表 数据来源：成绩管理模块进行录入。表3.5 成绩表 名称 字段名称 类型 主键 学号 学号 数值 是 课程名 课程名 字符串 否 成绩 成绩 数值 否学生档案信息表数据来源：学生档案管理模块进行录入。表3.6 学生档案信息表 名称 字段名称类型主键学号学号 数值 是姓名姓名 字符串 否性别性别 字符串 否出生年月出生年月 日期 否邮政邮码邮政邮码数值否联系电话联系电话数值否班级班级数值否入学日期入学日期日期否第4章 详细设计4.1 目标详细设计阶段是确定应该怎样具体地实现所要求的系统，也就是说，经过此阶段的设计工作，应该得出对目标系统的精确描述，从而在编码阶段可以把这个描述直接翻译成用某种程序设计语言书写的程序。该阶段不仅仅是逻辑上正确地实现每个模块的功能，更重要的是设计出的处理过程应该尽可能简明易懂8。4.2 主要功能模块的创建4.2.1 登录模块 图4.1 登录界面该模块用来实现用户的登陆操作。它将用户权限分为超级用户和普通用户。超级用户可以执行对系统初浏览，查询，打印外的所有管理。普通用户为学生，只有浏览，查询和打印的权限。在输入用户密码过程中，如果出错三次以上，就会自动退出系统。关键代码如下：procedure TForm1.dengluClick(Sender: TObject);var sql:string;begin username:=trim(edit1.Text); password:=trim(edit2.Text); sql:=select * from yonghu where username= +username+; datamodule1.ADOQuery1.Close; datamodule1.ADOQuery1.SQL.Clear; datamodule1.ADOQuery1.SQL.Add(sql); datamodule1.ADOQuery1.Open; i:=i+1; if i=3 then begin MessageDlg(您已经错了三次!,mtError,mbOk,0); application.Terminate; end; if edit1.Text= then begin MessageDlg(您还没有输入用户名！,mtError,mbOk,0); edit1.SetFocus; end else begin if (datamodule1.ADOQuery1.Eof) and (datamodule1.ADOQuery1.Bof) then begin MessageDlg(没有你输入的用户名!,mtError,mbOk,0); edit1.SetFocus; edit1.Clear; end else begin if(datamodule1.ADOQuery1.FieldByName(password).Valuepassword) then begin MessageDlg(你输入的密码不正确！,mtError,mbOk,0); edit2.SetFocus; edit2.Clear; end else begin qx1:=datamodule1.adoquery1.fieldbyname(qx1).Value; qx2:=datamodule1.adoquery1.fieldbyname(qx2).Value; qx3:=datamodule1.adoquery1.fieldbyname(qx3).Value; qx4:=datamodule1.adoquery1.fieldbyname(qx4).Value; form2:=Tform2.Create(self); form2.Show; form1.Hide; end; end;4.2.2 添加用户模块 图4.2 添加用户界面用户通过输入新的用户名、密码，以及选择用户类别和权限来添加一个新的用户。如果选择超级用户，则四个权限不需要选择就全部拥有。如果选择普通用户，就需要自己选择所需的权限。关键代码如下：procedure TForm3.BitBtn1Click(Sender: TObject);beginif (edit1.Text=) thenbeginMessageDlg(用户名不能为空！,mtError,mbOk,0);edit1.SetFocus;endelsebeginif trim(edit3.Text)trim(edit2.Text) thenbeginMessageDlg(两次输入的密码不相同！!,mtError,mbOk,0); edit2.Text:=; edit3.Text:=; edit2.SetFocus; end else begin if radiobutton1.Checked=true then begin isqx1:=y; isqx2:=y; isqx3:=y; isqx4:=y; end else begin if checkbox1.Checked then isqx1:=y else isqx1:=n; if checkbox2.Checked then isqx2:=y else isqx2:=n if checkbox3.Checked then isqx3:=y else isqx3:=n; if checkbox4.Checked then isqx4:=y else isqx4:=n; end; try with adoquery1 do begin sql.Clear; sql.Add(insert into yonghu ); sql.Add(values(:username,:password,:qx1,:qx2,:qx3,:qx4); parameters.ParamByName(username).Value:=trim(edit1.Text); parameters.ParamByName(password).Value:=trim(edit2.Text); parameters.ParamByName(qx1).Value:=isqx1; parameters.ParamByName(qx2).Value:=isqx2; parameters.ParamByName(qx3).Value:=isqx3; parameters.ParamByName(qx4).Value:=isqx4; prepared:=true; execsql; end; showmessage(添加成功！) ; except showmessage(有可能你所输入的用户名已经存在！); edit1.Text:=; edit2.Text:=; edit3.Text:=; end; end; procedure TForm3.FormCreate(Sender: TObject);begin radiobutton1.Checked:=true;end;4.2.3 数据维护模块该模块包括两部分：数据的备份与恢复数据备份是管理员对数据进行的及时备份，以便在遇到特殊情况时可以对数据恢复，是一个很实用的功能。进入数据备份界面后，单击开始备份，弹出如图所示的对话框，选择要备份的路径。图4.3 数据维护对话框 备份成功后，会出现如下图所示界面：图4.4 数据备份界面在弹出的对话框中选择要还原的数据库文件后将出现如下图所示界面： 图4.5 数据恢复界面关键代码如下：procedure TForm14.BitBtn1Click(Sender: TObject);var filename1:string; filename2:string;beginfilename1:=extractfilepath(application.ExeName)+xs.mdb;if savedialog1.Execute then begin animate2.Visible:=true; animate2.Active:=true; filename2:=savedialog1.FileName; sleep(3000); animate2.Active:=false;if copyfile(pchar(filename1),pchar(filename2),false) then showmessage(备份成功！)else showmessage(备份失败！); copyfile(pchar(filename2),pchar(filename1),false);end;end;procedure TForm14.BitBtn2Click(Sender: TObject);begin form14.Close;end;procedure TForm14.BitBtn3Click(Sender: TObject);var filename1:string; filename2:string;begin opendialog1.Execute; filename1:=opendialog1.FileName; filename2:=extractfilepath(application.ExeName)+xs.mdb; animate1.Visible:=true; animate1.Active:=true; sleep(3000); animate1.Active:=false; if copyfile(pchar(filename1),pchar(filename2),false) then showmessage(恢复成功！) else showmessage(恢复失败！);end;end4.2.4档案浏览模块 图4.6 档案浏览界面该模块实现了对学生档案的浏览、修改、删除。管理员可以修改或删除学生信息，普通用户只能通过“第一条”、“上一条”、“下一条”、“最后一条”来浏览学生的基本信息。关键代码如下：with adotable1 dobegintryedit;fieldbyname(学号).AsString:=dbedit5.Text;/将文本赋值给字段fieldbyname(性别).AsString:=dbedit4.Text;fieldbyname(姓名).AsString:=dbedit1.Text;fieldbyname(班级).AsString:=dbedit6.Text;fieldbyname(联系电话).AsString:=dbedit2.Text;fieldbyname(邮政编码).AsString:=dbedit7.Text;fieldbyname(出生年月).AsDateTime:=strtodatetime(dbedit3.Text);fieldbyname(入学时间).AsDateTime:=strtodatetime(dbedit8.Text); post; showmessage(修改成功！); except cancel; showmessage(数据保存发生错误！请检查数据是否正确，且没有相同的学号！); procedure TForm8.BitBtn6Click(Sender: TObject);begin try adotable1.Delete; showmessage(记录已经删除！); except showmessage(记录删除时发生错误！); end;end;4.2.5查询模块 图4.7 学生档案查询界面 简单查询与高级查询两种查询方式查询数据库中的记录。并将查找到的符合条件的记录显示在图示的表中。关键代码如下： procedure TForm10.BitBtn1Click(Sender: TObject); var str:string; begin try adoquery1.Close; adoquery1.SQL.Clear; str:=select * from xsdangan where ; str:=str+combobox1.Text; str:=str+combobox2.Text; str:=str+edit1.Text+; adoquery1.SQL.Add(str); adoquery1.Open; except MessageDlg(查询条件错误！,mtError,mbOk,0); end;end;procedure TForm10.BitBtn2Click(Sender: TObject);var sqlstr:string;begin sqlstr:=select * from xsdangan where ; if (edit2.Text=) and (edit3.Text=) then begin showmessage(请至少输入一个查询条件！); exit; end; if (edit2.Text=) and (edit3.Text) then begin sqlstr:=sqlstr+学号+edit3.Text+; end; if (edit2.Text) and (edit3.Text=) then begin sqlstr:=sqlstr+学号+edit2.Text+; end; if (edit2.Text) and (edit3.Text) then begin sqlstr:=sqlstr + 学号+edit3.T