delphi 人员管理系统Word文档下载推荐.docx

1、3.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.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 系统来源一直以来，学员大队采用传统的

2、人工方式管理学员，队干部档案，时间一长就会产生大量的文件和数据的积压，这对于查找，更新和维护都带来了不少困难。结合以上问题，我们小组讨论决定做此系统 1.2 系统的意义 制作此系统我运用了数据库应用程序里的应用技术，如Table，数据模块，多媒体信息，配置文件等，通过做此系统，使我更加了解Delphi管理数据库的应用。 1.3 系统的目标 本系统是学员大队的人员管理系统，主要是为了方便大队对人员的管理，所以在开发的过程中，尽量简洁，操作起来一目了然，方便管理员使用。 1.4 系统面向的对象 主要是大队管理员。2 运行环境 2.1 硬件环境 机器的配置要求为：x86以上的cpu，256mb以上的

3、内存 2.2 软件环境1）操作系统windows 98，windows xp，Linux2）数据库及数据源配置：Database Desktop管理表和数据3）开发工具：Delphi3操作说明 3.1 登陆模块3.11 功能描述 管理员通过输入正确的用户名和密码登陆到主界面。3.12 数据流图3.13 操作流程3.14 相关算法 procedure TForm5.Button1Click（Sender: TObject）;begin with self.Table1 do /针对 table1 的操作 begin self.Table1.SetKey; /查询模式 self.Table1.Fi

4、eldByName（User）.AsString:=edit1.Text;/将table1中字段zh的每一项数据转化为string 并与edit1中输入的值想匹对 if gotokey then /如果有相对应的，指针指向那一条记录 if self.Table1.FieldByName（Password）.AsString=self.Edit2.Text then self.IsOK:=true; Form5.Close（）; end else self.Edit2.Clear; showmessage（密码不正确，请重新输入）; end; self.Edit1.Clear;帐号不存在，请重新

5、输入end;end. 3.15 界面设计3.2 大队人员信息增加模块3.21 功能描述管理员可以通过点击增加，修改对大队人员信息进行增加和修改。 3.22 数据流图3.23 操作流程3.24 相关算法 procedure TForm3.Button1Click（Sender: with self.Table1 do begin self.Table1.Append; Table1.FieldByName（Id=self.Edit1.Text;Name=self.Edit2.Text;Sex=self.Edit3.Text;IdCard=self.Edit4.Text;Style=self.Ed

6、it5.Text;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 TForm2.Button1Click（Sender:var ls_sql,ls_clause:ansistring; ls_clause:=; if CheckBox1.Checked

7、 then=ls_clause+ID=+Edit1.Text+ ls_sql:select * from PERS if ls_clause then ls_sql:=ls_sql+where +ls_clause; order by ID if CheckBox2.Checked thenName=+Edit2.Text+ order by Name if CheckBox3.Checked then then ls_clause: and sex=+ComboBox1.Text+ query1.Close; query1.SQL.Clear; query1.SQL.ADD（ls_sql）; query1.prepare; query1.Open;3.35 界面设计4数据库设计 4.1 数据库命名规则 4.2 数据库表汇总 干部信息表 字段名说明类型宽度Number证件号码 A 20Name姓名 ASex性别 2age年龄 10mz 民族db 队别rwsj入伍时间 D xrzw现任职务 Jx,zl军衔，资历 学员信息表2020 民族队别zy专业