1、delphi 人员管理系统人员管理系统 设计文档编写: 审核: 批准: 2010年5月3日 目 录目录.21.概述.31.1系统来源.31.2系统的意义.31.3系统的目标.31.4系统面向的对象.32运行环境2.1硬件环境 42.2软件环境.43.操作说明3.1登陆模块.73.1.1功能描述.73.1.2数据流图.83.1.3操作流程.93.1.4相关算法.93.1.5界面设计.113.2大队人员信息增加模块.113.2.1功能描述.113.2.2数据流图.123.2.3操作流程.123.2.4相关算法.123.2.5界面设计.133.3大队人员信息查询模块.133.3.1功能描述.133.
2、3.2数据流图.143.3.3操作流程.143.3.4相关算法.143.3.5界面设计.164.数据库设计.184.1数据库命名规则.184.2数据库表汇总.184.3数据库表设计.194.3.1会员基本信息.19附.171 概述 1.1 系统来源一直以来,学员大队采用传统的人工方式管理学员,队干部档案,时间一长就会产生大量的文件和数据的积压,这对于查找,更新和维护都带来了不少困难。结合以上问题,我们小组讨论决定做此系统 1.2 系统的意义 制作此系统我运用了数据库应用程序里的应用技术,如Table,数据模块,多媒体信息,配置文件等,通过做此系统,使我更加了解Delphi管理数据库的应用。 1
3、.3 系统的目标 本系统是学员大队的人员管理系统,主要是为了方便大队对人员的管理,所以在开发的过程中,尽量简洁,操作起来一目了然,方便管理员使用。 1.4 系统面向的对象 主要是大队管理员。2 运行环境 2.1 硬件环境 机器的配置要求为:x86以上的cpu,256mb以上的内存 2.2 软件环境1)操作系统windows 98,windows xp,Linux2)数据库及数据源配置:Database Desktop管理表和数据3)开发工具:Delphi3操作说明 3.1 登陆模块3.11 功能描述 管理员通过输入正确的用户名和密码登陆到主界面。3.12 数据流图 3.13 操作流程3.14
4、相关算法 procedure TForm5.Button1Click(Sender: TObject);begin with self.Table1 do /针对 table1 的操作 begin self.Table1.SetKey; /查询模式 self.Table1.FieldByName(User).AsString:=edit1.Text;/将table1中字段zh的每一项数据转化为string 并与edit1中输入的值想匹对 if gotokey then /如果有相对应的,指针指向那一条记录 begin if self.Table1.FieldByName(Password).A
5、sString=self.Edit2.Text then begin self.IsOK:=true; Form5.Close(); end else begin self.Edit2.Clear; showmessage(密码不正确,请重新输入); end; end else begin self.Edit1.Clear; self.Edit2.Clear; showmessage(帐号不存在,请重新输入); end; end;end;end. 3.15 界面设计3.2 大队人员信息增加模块3.21 功能描述管理员可以通过点击增加,修改对大队人员信息进行增加和修改。 3.22 数据流图 3.
6、23 操作流程 3.24 相关算法 procedure TForm3.Button1Click(Sender: TObject);begin with self.Table1 do begin self.Table1.Append; Table1.FieldByName(Id).AsString:=self.Edit1.Text; Table1.FieldByName(Name).AsString:=self.Edit2.Text; Table1.FieldByName(Sex).AsString:=self.Edit3.Text; Table1.FieldByName(IdCard).AsS
7、tring:=self.Edit4.Text; Table1.FieldByName(Style).AsString:=self.Edit5.Text; Table1.FieldByName(RegDate).AsDateTime:=StrToDate(self.Edit6.Text);Table1.FieldByName(Sumtime).AsInteger:=strtoint(self.Edit7.Text);3.25 界面设计 3.3 学员信息查询 3.31 功能描述可以根据证件号码和队别进行查询 3.32 数据流图 3.33 操作流程 3.34 相关算法 procedure TForm
8、2.Button1Click(Sender: TObject);var ls_sql,ls_clause:ansistring;begin ls_clause:=; if CheckBox1.Checked then begin ls_clause:=ls_clause+ID=+Edit1.Text+; end; ls_sql:=select * from PERS ; if ls_clause then ls_sql:=ls_sql+where +ls_clause; ls_sql:=ls_sql+ order by ID ; if CheckBox2.Checked then begin
9、ls_clause:=ls_clause+Name=+Edit2.Text+; end; ls_sql:=select * from PERS ; if ls_clause then ls_sql:=ls_sql+where +ls_clause; ls_sql:=ls_sql+ order by Name ; if CheckBox3.Checked then begin if ls_clause then ls_clause:=ls_clause+ and ; ls_clause:=ls_clause+sex=+ComboBox1.Text+; end; query1.Close; que
10、ry1.SQL.Clear; query1.SQL.ADD(ls_sql); query1.prepare; query1.Open;3.35 界面设计4数据库设计 4.1 数据库命名规则 4.2 数据库表汇总 干部信息表 字段名说明类型宽度Number证件号码 A 20Name姓名 A 20Sex性别 A 2age年龄 A 10mz 民族 A 20db 队别 A 20rwsj入伍时间 D xrzw现任职务 A 20 Jx,zl军衔,资历 A 20 学员信息表字段名说明类型宽度Number证件号码 A20Name姓名 A20 Sex性别 A20Sex年龄 A20mz民族 A20db队别 A20rwsj入伍时间 Dzy专业 A20
copyright@ 2008-2022 冰豆网网站版权所有
经营许可证编号:鄂ICP备2022015515号-1