高校人事管理系统课程设计报告.docx
《高校人事管理系统课程设计报告.docx》由会员分享，可在线阅读，更多相关《高校人事管理系统课程设计报告.docx（26页珍藏版）》请在冰豆网上搜索。
高校人事管理系统课程设计报告
——《高校人事管理系统》课程设计报告
目录
前言3
1.1系统设计背景3
1.2小组分工3
第一章：
系统的总体设计4
2.1系统任务与目标4
2.1.1系统任务4
2.12系统目标4
2.2系统需求分析5
2.21功能需求5
2.22性能需求5
2.3总体设计6
2.3.1系统层次模块图6
2.3.2数据库设计7
第二章系统的详细设计10
3.1系统的项目文件10
3.2主控制平台的界面效果11
3.3系统设置模块界面效果12
3.4基本信息模块各个功能的界面效果19
3.5工资与考核模块各个功能的界面效果21
3.6查询模块各个功能的界面效果22
第三章课程设计总结25
前言
1.1系统设计背景
随着计算机技术的飞速发展，计算机在高校管理中应用的普及，利用计算机实现高校人事管理势在必行。
对于高校来说，利用计算机支持高校高效率完成人事管理的日常事务，是适应现代高校制度的要求，推动高校人事管理走向科学化、规范化的必要条件；计算机管理所无法比拟的优点检索迅速、查找方便、可靠性高、存储量大、保密性好、寿命长、成本低等。
这些优点能够极大的提高人事管理的效率，也是高校科学化、正规化的管理与世界接轨的重要条件。
本系统结合高校的实际管理制度，经过实际的需求分析，采用功能强大的Delphi7.0作为开发工具而开发出的单机版高校人事管理系统。
1.2小组分工
1.2.1组员（姓名：
XX）
（1）个人主要工作
主要负责系统的总体构架、基本信息模块、工资与考核模块、查询模块的设计与功能实现。
（2）主要收获
熟练掌握了Delphi7.0的相关控件的功能，能够独自开发小的系统。
（3）自我评定□优□良□中□及格□不及格
1.2.2组员（姓名：
XX）
（1）个人主要工作
主要负责系统的需求分析、系统设置模块、基本信息模块、关于与帮助模块的设计与功能实现。
（2）主要收获
熟练掌握了Delphi7.0的相关控件的功能，能够独自开发小的系统。
（3）自我评定□优□良□中□及格□不及格
第一章：
系统的总体设计
2.1系统任务与目标
2.1.1系统任务
高校人事管理系统主要负责管理职工的基本信息、职工的工资与绩效考核、职工就职信息、职工的离职信息和职工的退休相关的信息等。
该系统主要包括系统设置、基本信息、工资与考核、查询和关于与帮助五大主要功能模块。
以下分别对系统的功能和模块进行概述。
●系统设置，主要负责高校人事管理系统的用户管理、权限设置、更改密码和退出。
●基本信息，主要负责高校人事管理系统的部门信息、职工基本信息、职工就职信息、职工离职信息、职工退休信息五个功能模块。
●工资与考核，主要负责高校人事管理系统的职工工资信息和职工绩效考核内容的记录。
●查询，主要负责高校人事管理系统的职工基本信息查询、职工就职信息查询、职工工资信息查询和职工绩效考核信息查询四个功能模块。
2.12系统目标
高校人事管理系统是为了满足高校对高校人事相关信息的管理要求而开发的。
一般而言，高校人事管理系统应达到一下目标。
●能够管理高校的所有人员的基本信息，能够实现人员基本信息的添加、修改、删除、保存功能。
●能够管理高校所有人员的就职信息，包括职工所在部门信息、就职时间信息的添加、修改、删除、保存功能。
●能够管理高校所有人员的离职信息，包括职工离职原因信息、离职时间信息、离职去向信息的添加、修改、删除、保存功能。
●能够管理职工的绩效考核结果的信息，包括考核内容、考核人、绩效成绩信息的添加、修改、删除、保存功能。
●能够快速地进行信息查询。
2.2系统需求分析
2.21功能需求
本系统需要实现一下一些基本功能：
●能够管理高校的所有人员的基本信息，能够实现人员基本信息的添加、修改、删除、保存功能。
●能够管理高校所有人员的就职信息，包括职工所在部门信息、就职时间信息的添加、修改、删除、保存功能。
●能够管理高校所有人员的离职信息，包括职工离职原因信息、离职时间信息、离职去向信息的添加、修改、删除、保存功能。
●能够管理高校所有人员的退休信息，包括职退休时间信息的添加、修改、删除、保存功能。
●能够管理职工的绩效考核结果的信息，包括考核内容、考核人、绩效成绩信息的添加、修改、删除、保存功能。
●能够快速地进行信息查询。
2.22性能需求
系统的运行对运行环境的要求：
1、硬件环境
●处理器：
InterPentium166MX或更高。
●内存：
32MB.
●硬盘空间：
1GB。
●显卡：
SVGA显示适配器。
2、软件环境
●操作系统：
Windows98/2000/XP
●数据库：
MicrosoftAccess2000.
2.3总体设计
2.3.1系统层次模块图
高校人事管理系统可以分为五个主要功能模块：
系统设置、基础信息、工资与考核、查询、关于与帮助。
五大主要功能模块又分别对应了各自的子模块，如图1所示：
2.3.2数据库设计
1、ADO综述
本系统是通过对象模型ADO来访问数据库的，ADO使我们能够编写应用程序，以通过OLE.DB提供者访问和操作数据库服务器中的数据。
ADO最主要的优点是易于使用、速度快、内存支出少和磁盘遗迹小。
ADO支持建立客户端/服务器和基于Web的应用程序的关键功能。
ADO的目标是访问、编辑和更新数据源。
3、表结构实现
根据系统功能设计的要求以及功能模块的划分，对于系统用户信息数据库，可以列出以下数据项和数据结构：
●用户信息表的定义
字段名称
字段描述
数据类型
是否为空
用户账号
用户账号
文本
主键
用户姓名
用户姓名
文本
密码
密码
文本
级别
级别
文本
备注
备注
文本
●职工表的定义
字段名称
字段描述
数据类型
是否为空
职工编号
职工编号
文本
主键
职工姓名
职工姓名
文本
性别
性别
文本
年龄
年龄
数字
级别
级别
文本
电话
电话
文本
政治面貌
政治面貌
文本
所属部门
所属部门
文本
备注
备注
文本
●部门信息表的定义
字段名称
字段描述
数据类型
是否为空
部门编号
部门编号
文本
主键
部门名称
部门名称
文本
负责人
负责人
文本
备注
备注
文本
●就职信息表的定义
字段名称
字段描述
数据类型
是否为空
部门编号
部门编号
文本
主键
职工编号
职工编号
文本
主键
就职时间
就职时间
文本
备注
备注
文本
●离职信息表的定义
字段名称
字段描述
数据类型
是否为空
部门编号
部门编号
文本
主键
职工编号
职工编号
文本
主键
离职时间
离职时间
时间
离职去向
离职去向
文本
离职原因
离职原因
文本
备注
备注
文本
●退休信息表的定义
字段名称
字段描述
数据类型
是否为空
部门编号
部门编号
文本
主键
职工编号
职工编号
文本
主键
退休时间
退休时间
时间
备注
备注
文本
●工资信息表的定义
字段名称
字段描述
数据类型
是否为空
部门编号
部门编号
文本
主键
职工编号
职工编号
文本
主键
工资
工资
货币
状态
状态
文本
备注
备注
文本
●绩效考核信息表的定义
字段名称
字段描述
数据类型
是否为空
部门编号
部门编号
文本
主键
职工编号
职工编号
文本
主键
绩效考核
绩效考核
文本
考核内容
考核内容
文本
考核人
考核人
文本
考核时间
考核时间
时间
备注
备注
文本
第二章系统的详细设计
根据已有的需求信息和总体设计，可以进行系统的详细设计和实现。
为此我们建立了一个Delphi工程。
系统的设计和实现如下：
3.1系统的项目文件
每一个Delphi工程都有一个项目文件，在本系统中项目文件如下所示：
programRSGL;
uses
Forms,
Unit_Mainin'Unit_Main.pas'{frm_Main},
Unit_JgInfoMagin'Unit_JgInfoMag.pas'{frm_JgInfoMag},
Unit_YHGLin'Unit_YHGL.pas'{frm_YHGL},
Unit_BMXXGLin'Unit_BMXXGL.pas'{frm_Bmxx},
Unit_Zgjbxxin'Unit_Zgjbxx.pas'{Form_Zgjbxx},
Unit_zggzjbxxin'Unit_zggzjbxx.pas'{Form_zggzxx},
Unit_dlin'Unit_dl.pas'{Form_dl},
Unit_zgjzxxin'Unit_zgjzxx.pas'{Form_zgjzxx},
Unit_jxkhin'Unit_jxkh.pas'{Form_jxkh},
Unit_zgjbxxcxin'Unit_zgjbxxcx.pas'{Form_zgjbxxcx},
Unit_zgjzxxcxin'Unit_zgjzxxcx.pas'{Form_zgjzxxcx},
Unit_zggzxxcxin'Unit_zggzxxcx.pas'{Form_zggzxxcx},
Unit_jxkhxxcxin'Unit_jxkhxxcx.pas'{Form_jxkhxxcx},
Unit_qxglin'Unit_qxgl.pas'{Form_qxgl},
Unit_zglzxxin'Unit_zglzxx.pas'{Form_zglzxx},
Unit_zgtxxxin'Unit_zgtxxx.pas'{Form_zgtxxx};
{$R*.res}
begin
Application.Initialize;
Application.CreateForm（Tfrm_Main,frm_Main）;
Application.Run;
end.
3.2主控制平台的界面效果
主控制平台使用简单和直观的布局如图所示。
主控制平台主要实现对模块的调用和显示工作。
●主窗体的菜单
双击MainMenu1控件，将弹出菜单编辑窗口，在菜单编辑窗口中按照模块结构来编辑系统的主要单项。
3.3系统设置模块界面效果
●用户管理功能
用户管理功能主要负责对用户基本信息的维护，包括用户信息的添加、修改、删除、保存等。
用户信息管理的主要代码：
unitUnit_YHGL;
interface
uses
Windows,Messages,SysUtils,Variants,Classes,Graphics,Controls,Forms,
Dialogs,StdCtrls,ExtCtrls,Grids,DBGrids,DB,ADODB;
type
Tfrm_YHGL=class（TForm）
Panel1:
TPanel;
Label1:
TLabel;
。
。
。
。
。
。
DBGrid1:
TDBGrid;
DataSource1:
TDataSource;
ADOQuery1:
TADOQuery;
procedurebtn_addClick（Sender:
TObject）;
procedurebtn_MdClick（Sender:
TObject）;
procedureDBGrid1CellClick（Column:
TColumn）;
procedurebtn_delClick（Sender:
TObject）;
procedurebtn_saveClick（Sender:
TObject）;
procedureFormClose（Sender:
TObject;varAction:
TCloseAction）;
procedureFormCreate（Sender:
TObject）;
private
{Privatedeclarations}
public
{Publicdeclarations}
end;
const
none:
Integer=0;
add:
Integer=1;
upd:
Integer=2;
del:
Integer=3;
save:
Integer=4;
var
openType:
Integer;
frm_YHGL:
Tfrm_YHGL;
implementation
{$R*.dfm}
procedureTfrm_YHGL.btn_addClick（Sender:
TObject）;
begin
edt_Yhzh.Clear;
edt_Yhxm.Clear;
edt_Mm1.Clear;
edt_Mm2.Clear;
Mem_Bz.Clear;
btn_Md.Enabled:
=False;
btn_del.Enabled:
=False;
btn_save.Enabled:
=True;
openType:
=add;
edt_Yhzh.ReadOnly:
=False;
edt_Yhxm.ReadOnly:
=False;
edt_Mm1.ReadOnly:
=False;
edt_Mm2.ReadOnly:
=False;
Mem_Bz.ReadOnly:
=False;
edt_Yhzh.SetFocus;
end;
procedureTfrm_YHGL.btn_MdClick（Sender:
TObject）;
begin
edt_Yhzh.Enabled:
=False;
edt_Mm1.ReadOnly:
=False;
edt_Mm2.ReadOnly:
=False;
edt_Yhxm.ReadOnly:
=False;
Mem_Bz.ReadOnly:
=False;
btn_add.Enabled:
=False;
btn_del.Enabled:
=False;
btn_save.Enabled:
=True;
OpenType:
=upd;
edt_Yhxm.SetFocus;
end;
procedureTfrm_YHGL.DBGrid1CellClick（Column:
TColumn）;
begin
ifADOQuery1.RecordCount=0thenExit;
edt_Yhzh.Text:
=ADOQuery1.FieldByName（'用户账号'）.AsString;
edt_Yhxm.Text:
=ADOQuery1.FieldByName（'用户姓名'）.AsString;
edt_Mm1.Text:
=ADOQuery1.FieldByName（'密码'）.AsString;
edt_Mm2.Text:
=ADOQuery1.FieldByName（'密码'）.AsString;
cmb_Yhjb.ItemIndex:
=cmb_Yhjb.Items.IndexOf（ADOQuery1.FieldByName（'级别'）.AsString）;
Mem_Bz.Text:
=ADOQuery1.FieldByName（'备注'）.AsString;
btn_add.Enabled:
=True;
btn_Md.Enabled:
=True;
btn_save.Enabled:
=False;
end;
procedureTfrm_YHGL.btn_delClick（Sender:
TObject）;
begin
ifedt_Yhzh.Text=''thenExit;
ADOQuery1.Delete;
edt_Yhzh.Clear;
edt_Yhxm.Clear;
edt_Mm1.Clear;
edt_Mm2.Clear;
Mem_Bz.Clear;
end;
procedureTfrm_YHGL.btn_saveClick（Sender:
TObject）;
begin
ifopenType=addthen
begin
ifedt_Yhzh.Text=''then
begin
ShowMessage（'请输入用户账号！
'）;
Exit;
end;
ifedt_Yhxm.Text=''then
begin
ShowMessage（'请输入用户姓名！
'）;
Exit;
End；
ifedt_Mm1.Text=''then
begin
ShowMessage（'请输入密码！
'）;
Exit;
end;
ifedt_Mm2.Text=''then
begin
ShowMessage（'请再次输入密码！
'）;
Exit;
end;
ifTrim（edt_Mm1.Text）<>Trim（edt_Mm2.Text）then
begin
ShowMessage（'两次输入的密码不一致！
'）;
Exit;
end;
ifcmb_Yhjb.Text=''then
begin
ShowMessage（'请选择用户级别！
'）;
Exit;
end;
ADOQuery1.Insert;
ADOQuery1.FieldByName（'用户账号'）.AsString:
=edt_Yhzh.Text;
ADOQuery1.FieldByName（'用户姓名'）.AsString:
=edt_Yhxm.Text;
ADOQuery1.FieldByName（'密码'）.AsString:
=edt_Mm1.Text;
ADOQuery1.FieldByName（'级别'）.AsString:
=cmb_Yhjb.Text;
ADOQuery1.FieldByName（'备注'）.AsString:
=Mem_Bz.Text;
btn_save.Enabled:
=False;
btn_add.Enabled:
=true;
btn_Md.Enabled:
=true;
btn_del.Enabled:
=true;
ShowMessage（'保存成功！
'）;
ADOQuery1.Post;
ADOQuery1.close;
ADOQuery1.open;
end;
ifopenType=updthen
begin
ifADOQuery1.Locate（'用户账号',edt_Yhzh.Text,[loPartialKey]）then
begin
ifedt_Yhxm.Text=''then
begin
ShowMessage（'请输入用户姓名！
'）;
Exit;
end;
ifedt_Mm1.Text=''then
begin
ShowMessage（'请输入密码！
'）;
Exit;
end;
ifedt_Mm2.Text=''then
begin
ShowMessage（'请再次输入密码！
'）;
Exit;
end;
ifTrim（edt_Mm1.Text）<>Trim（edt_Mm2.Text）then
begin
ShowMessage（'两次输入的密码不一致！
'）;
Exit;
end;
ifcmb_Yhjb.Text=''then
begin
ShowMessage（'请选择用户级别！
'）;
Exit;
end;
ADOQuery1.Edit;
ADOQuery1.FieldByName（'用户姓名'）.AsString:
=edt_Yhxm.Text;
ADOQuery1.FieldByName（'密码'）.AsString:
=edt_Mm1.Text;
ADOQuery1.FieldByName（'级别'）.AsString:
=cmb_Yhjb.Text;
ADOQuery1.FieldByName（'备注'）.AsString:
=Mem_Bz.Text;
ADOQuery1.Post;
ADOQuery1.close;
ADOQuery1.open;
OpenType:
=none;
btn_add.Enabled:
=True;
btn_del.Enabled:
=True;
btn_save.Enabled:
=False;
ShowMessage（'保存成功！
'）;
edt_Yhzh.Clear;
edt_Yhxm.Clear;
edt_Mm1.Clear;
edt_Mm2.Clear;
Mem_Bz.Clear;
cmb_Yhjb.ItemIndex:
=-1;
Mem_Bz.Clear;
edt_Yhzh.ReadOnly:
=True;
edt_Yhxm.ReadOnly:
=True;
edt_Mm1.ReadOnly:
=True;
edt_Mm2.ReadOnly:
=True;
Mem_Bz.ReadOnly:
=True;
edt_Yhzh.Enabled:
=True;
btn_save.Enabled:
=true;
btn_add.Enabled:
=true;
btn_Md.Enabled:
=false;
btn_del.Enabled:
=true;
end
end;
end;
procedureTfrm_YHGL.FormClose（Sender:
TObject;varAction:
TCloseAction）;
begin
frm_YHGL.Release;
end;
procedureTfrm_YHGL.FormCreate（Sender:
TObject）;
begin
Mem_Bz.Clear;
end;
end.
3.4基本信息模块各个功能的界面效果
●部门信息
●职工基本信息
●就职信息
●离职信息
●退休信息
3.5工资与考核模块各个功能的界面效果
●职工工资信息
●职工绩效考核
3.6查询模块各个功能的界面效果
●职工基本信息查询
●职工就职信息查询
●职工工资信息查询
●绩效考核信息查询
查询的主要代码：
procedureTForm_z
升级会员 