人员资料管理系统(delphi6制作并带有实体 注:本设计针对部队学员制作) 人员信息管理系统(delphi6制作,针对部队学员设计) xxxxx学院毕业论文 人员资料管理系统 学员姓名： 指导老师： 专 业： 年 级： 完成日期：

毕业论文

人员资料管理系统 摘 要：本文主要介绍了如何利用 delphi6.0 建立一个数据库，对单位人员资料实行计算机管理。降低资料管理的成本，提高工作效率。同时也可大大降低手工录入时的繁重工作量以及减少录入时的错误及查询带来的不便。且可灵活对人员资料进行编辑,对表单更深入的 关键词:数据库 模糊查询 宏 summary： this text introduced primarily how to make use of the delphi6.0 to establish a database, to unit personnel the data practices the calculator that lower the data management, increase work can lower consumedly the handicraft record fashionable heavy workload and decreases record the inconvenience that fashionable mistake and searches vivid to personnel the data proceeds the editor, to more thorough editor in table and list. 目 录 ­摘要(中文) --------------------------------------------------2 ­摘要(英文) --------------------------------------------------2 ­引言 --------------------------------------------------------4 ­正文 --------------------------------------------------------4 ­ 1﹑总体介绍及软件选择 -------------------------------------4 ­ 2﹑应用软件开发 -------------------------------------------5 ­ 2.1可行性研究阶段--------------------------------------6 ­ 2.2需求分析阶段----------------------------------------6 ­ 2.3系统设计阶段----------------------------------------8 ­ 2.4实现阶段--------------------------------------------15 ­ 2.5测试阶段--------------------------------------------15 ­ 2.6试运行阶段------------------------------------------15 ­ 3﹑结论及体会 ­致谢 ­附录 ­参考书目 引 言 随着计算机性能的不断优化，越来越多的计算机用户开始使用windows操作系统。用户对软件的操作提出了更高的要求。他们对软件使用的这种要求，直接影响着软件的生产和销售。这种要求迫使软件开发商，不得不制造出一些具有友好界面、简单方便的操作、较好可靠性能等特点的软件。于是产生了所谓可视化变成的语言，如 visual basic、visual c++、powerbuilder、delphi等。其特点是一改往日枯燥的代码编程方式，使程序员能够对所要处理的对象进行较为直观的操作。把那些发生在过去需要大量代码、语句才能完成的工作，精简到只需轻轻的拖动鼠标来完成，大大减少了程序员的工作量。本软件的设计采用了delphi6.0可视化编程语言 ，建立起人员资料数据库管理系统。软件的内容主要包括数据库浏览模块、数据库查询及更改模块、数据库输出到word模块。其中某些模块又包含一些小的子模块。软件操作的对象主要是表和表单，充分发挥了delphi6.0的新特性。 1.正 文
1.1总体介绍及软件选择 资料管理：是指在面对现有的单位实际情况：人员资料量大，变换频繁，整理查询工作繁琐，工作效率低。针对以上种种具体情况，通过细致地调查，论证。同时也得到了单位干部部门的大力相助的条件下，得到需求，从而设计本软件。 随着各个单位有人的频率提高，工作节奏的加快。人们越来越不愿浪费更多的时间在繁杂的人员资料的整理上。管理人员向往一种更加简便、快捷、有质量的工作方法。 所以我们通过建立数据库，主要实现以下的功能： 1.2 主要实现以下的功能 : 1.2.1数据库的浏览 1.2.2人员数据库的查询及管理 1.2.3数据库资料的输出（word文档） 1.2.4系统维护部分 1.2.5系统帮助部分 1.3 delphi6.0 具有的特点 1.3.1 易于使用 早期的数据库软件一般只能简单的存储和管理数据,不适用于编写数据库应用程序。即使能够编写数据库应用程序，仍需要客户具有很强的程序设计技巧，并且不能进行面向对象的程序设计。因而阻碍了数据库软件的广泛应用。 对于具备数据库应用开发能力的用户，使用delphi6.0 可以开发单独运行的应用系统，并可使用系统所提供的功能制作发布应用程序的软磁盘。delphi6.0 提供可视化的，面向对象的编程环境，可使用微软标准的activex控件。 对于没有数据库使用经验的用户，可以在windows 98环境中，运行delphi6.0 支持的或可脱离delphi6.0 支持单独运行的数据库应用系统。这是一种适合管理人员操作管理数据的方式。 delphi6.0 作为一个关系型数据库系统，不仅可以简化数据管理，使得应用程序的开发流程更为合理，而且它还在前期版本的基础上实现了计算机易于使用的构想。所以，许多使用delphi6.0 早期版本的用户在从事数据库开发时都可以转向delphi6.0 。对于刚刚进入数据库领域的新用户来说，使用delphi6.0建立数据库应用程序要比使用其它软件容易得多。 1.3.2可视化开发 对于以前的程序开发来说，要花费大部分的时间在编写代码上。delphi6.0 具有可视化开发环境，因此可以大大减少开发人员在编写代码上所花的时间。使得可以有更多的精力放在提高程序应用性、稳定性等方面。 可视化环境应用方便，开发人员可以直接看到工作是如何运行的。开发时间被缩短，调试也减少，并且维护也容易。 1.3.3 事件驱动 windows 是事件驱动的即运行在该环境下的程序并不是顺序执行的。它们不是一条指令接一条指令的执行，而是偶尔停下来与用户交互。程序被写成许多独立的片断，某些程序只有当有与之关联的事件发生时才会执行。例如有一段代码与某个按钮的clicked事件关联，通常只有当用户用鼠标单击该按钮时才会发生clicked 事件，否则代码不会被执行。 1.3.4 面向对象编程 delphi6.0提供面向对象程序设计的能力。借助delphi6.0 的对象模型，可以充分使用面向对象程序设计的所有功能，包括各种方便的控件的使用，能让操作者在很短的时间里设计出自己的应用数据库。界面友好，简单几个控件就可实现自己的一个小软件。 delphi6.0 类模型赋予用户进一步控制应用程序中对象的能力，不但可以在设计时通过table控件帮助用户创建自定义的数据库模型，在delphi6.0中，可以用dbgird可视地创建数据库，实现浏览功能。 相对于delphi6.0 早期版本而言，delphi6.0 具有更加强大的功能，包含了许多新特性。可以在应用程序或数据库开发过程中给用户提供更多的方便。 2.应用软件的开发

数据库应用系统是在数据库管理系统支持下运行的一类计算机应用系统。对大多数用户来说，数据库管理系统可以使用市场上出售的现成软件，不必自己设计。在此我们采用的是delphi6.0来实现我们所作的课题“人员资料管理系统”。所以开发一个数据库应用系统，包含了数据库的设计和相应程序设计两个方面的工作。 2.1 可行性研究 当系统开发人员接受开发任务后，首先要研究开发任务，判断是否有简单明显的解决办法。可行性研究的目的就是用最小的代价在尽可能短的时间内确定问题能否解决。可行性研究的目的不是解决问题而是确定问题是否值得去解决。主要从以下三方面对其可行性进行分析： 2.1.1 技术可行性：利用现有的技术可否实现此系统。 2.1.2 经济可行性：开发这个系统所产生的经济效益是否与其开发成本成比例。2.1.3 操作可行性：系统的操作方式在这个用户组织内是否行得通。可行性研究的任务是对以后的行动方针提出建议，如果问题没有可行性的解，分析人员应该建议停止开发这项工程，以避免时间、资源、人力和金钱的浪费；如果问题可行，分析人员应该推荐一个较好的解决方案，并且为工程制定一个初步的计划。 基于以上的研究特性，总结以往类似的系统功能，并与单位相关部门进行了深入的研讨，同时对相关技术进行了摸索，作出了可行的制作步骤，由单位提出相关需求。 2.2需求分析阶段 2.2.1 了解用户环境和要求 2.2.2 数据分析 2.2.3功能分析 人员管理系统一共分为以下几个功能模块 ： 2.2.3.1数据库的浏览模块 2.2.3.2 人员数据库的查询及管理模块 2.2.3.3数据库资料的输出（word文档）模块 2.2.3.3 系统帮助模块 主要系统流程图如下： 2.3系统设计阶段 2.3.1数据库管理系统的组成要素有： 数据库：由一组数据表组成，其中包含了相关的信息。一个数据库可以由单独的一张表组成。 数据表：由一组数据记录组成，每个表中包含了相同的信息。 记 录：表中一个单一的条目，由许多数据字段组成。 字 段：包含于记录内的一个特定的数据项目。 索 引：一种特殊类型的表，其中包含了关键字段的值（由用户定义）以及指向实际记录位置的指针。这些值和指针是按照特定的顺序（也由用户定义）存储的，他们用于代表数据库中采用这种顺序的数据。 查 询：一条sql命令，设计用于从一个或多个表中获得一组特定的记录，或者对一个表执行特定的操作。 过滤器：过滤器是数据库的一个组成部分，但是他用于把索引和排序顺序结合起来，决定应该显示什么数据。过滤器相当于对数据加上一种条件，如“姓王的人”等。 2.3.2 delphi 对 word 的控制 这个阶段中主要难题是数据库数据导出导word文档模块，delphi对word的兼容性也是相当的好。 2.3.2.1 vba代码含义
microsoft word是一个集成化环境，是美国微软公司的字处理系统，但是它决不仅仅是一个字处理系统，它集成了microsoft visual basic，可以通过编程来实现对word功能的扩展。
microsoft visual basic在word中的代码即word的宏，通过编写word宏，可实现一些文档处理的自动化，如实现文档的自动备份、存盘等，可扩展word文档的功能，因此，能够充分利用word的特性，甚至使word成为自己软件的一部分。
word的宏既有有利的一部分，因为它能够帮助我们实现文档的自动化，但是word的宏也不是纯粹的有利，有时它可能危害我们的文档、计算机系统甚至网络，从最开始的taiwan no1宏病毒到现在的melissa宏病毒，从最开始的简单的提示，耗尽系统资源到现在的乱发电子邮件，将个人的信息发送到网络上，甚至向硬盘的(自动批处理文件)中添加deltree c: -y，破坏整个windows系统。 2.3.2.2 word中内嵌的com技术
可以说word是对com技术支持最好的软件，这样说似乎是太极端了一点，但是word提供的强大的编程接口技术却能够是我们通过程序控制word的任何一部分。无论是文件的打开、存盘、打印还是文档中表格的自动绘制。
通过编程软件，可以灵活的操纵word，这里只以borland delphi为例，进行详细描述：
2.3.2.3 在delphi中调用word软件／文件的方法
在word中调用word软件，归纳起来有三种方法：
通过delphi的控件tolecontainer 将word嵌入
2.3.2.4使用delphi提供的servers控件调用word，使用word的属性
2.4.2.2通过真正的com技术，将office软件目录中文件中的类库全部导入delphi中，利用com技术编程
2.3.2.5使用createoleobject将启动word，然后以ole方式对word进行控制。 对几种方法的难易程度的判别 2.3.2.6 通过delphi的控件tolecontainer 将word嵌入 这是最简单的ole嵌入，能够直接将word文档调用，只需要使用就可以将word文档直接启动。且这样启动的word文档与delphi程序是一个整体（从界面上看），但是它存在不可克服的缺点，即不能通过delphi控制word文档，也就不能实现将灵活操纵word的目的。 2.3.2.7 使用delphi提供的servers控件调用word，使用word的属性
使用delphi的servers控件来操纵word，在编程时delphi能够实现代码提示，总体上看能够较好的实现delphi对word的控制，但是还有一些word的功能不能在delphi中调用（比如自己编写的vba宏代码）。且实现功能时本来在vba代码中可选则参数在delphi调用的时候必须添加，否则，连编译都不能通过。本方式启动的word与delphi程序分属两个窗体。此办法仅能作为一个参考。 2.3.2.8 通过真正的com技术，将office软件目录中文件中的类库全部导入delphi中，利用com技术编程利用真正的com技术，将文件类库导入，然后利用com技术进行使用。整体上类似使用delphi的servers控件，稍微比servers控件麻烦，优缺点与servers控件相同。 2.3.2.9使用createoleobject将启动word，然后以ole方式对word进行控制。
本办法是使用以createoleobjects方式调用word，实际上还是ole，但是这种方式能够真正做到完全控制word文件，能够使用word的所有属性，包括自己编写的vba宏代码。
与servers控件和com技术相比，本方法能够真正地使用word的各种属性，和在vba中编写自己的代码基本一样，可以缺省的代码也不需要使用。本方式启动的word与delphi程序分属两个窗体。缺点是使用本方法没有delphi代码提示，所有异常处理均需要自己编写，可能编写时探索性知识比较多。 2.3.3 word宏编辑器
word能够真正地进行vba代码的编辑，可以编写窗体、函数。
进入word宏编辑器的方法：工具->宏->visual basic编辑器，可进入visual basic编辑器界面。word的visual basic编辑器界面和真正的visual basic编辑器基本相同，在此不再向详述。在vba代码中，可以添加用户窗体、模块、类模块。用户窗体、模块、类模块的概念和visual basic完全相同。注释也与visual basic完全相同。
可以将光标停留在窗体、模块的任何一个子程序上，直接按“f5”运行当前子程序。 2.3.4 word的宏的概述
word充分地将文档编辑和vb结合起来，真正地实现文档的自动化。使用word编程，类似于使用visual basic，所不同的是，在word中，能够直接运行某一个子程序，直接看见结果，word的宏，只能解释运行，而visual basic，现在已经能够编写成真正的机器码，从代码的保护上来说，应该尽可能地减少word的vba代码数量，尤其是关键的代码。
vba宏，可分成四种：
2.3.4.1和命令名相同的宏
如filesave，fileopen，如果在vba代码中包含与word同名的函数，则直接执行这些vba代码，忽略word本身的命令。
2.3.4.2 word内特定的宏
这些宏包含autoexec（启动 word 或加载全局模板）、autonew（每次新建文档时）、autoopen（每次打开已有文档时）、autoclose（每次关闭文档时），autoexit（退出 word 或卸载全局模板时）。
如果vba代码中含有这些名称的函数，则满足相应的条件，相应代码就自动执行。
2.3.4.3相应事件的vba宏
这些宏是由事件触发的宏，如document_close在文档关闭的时候触发事件，document_new在新建文档的时候触发，document_open在打开文档的时候触发。
2.3.4.4 独立的宏
自己编写的vba代码，即不属于上面几种情况的vba代码，可以被其他vba代码调用，更重要的是，可以被其他程序调用。
这样，我们就可以屏弃word自动执行的宏，通过delphi直接调用相应宏来达到目的。
word命令宏的详细描述 word本身的命令函数包含很多，但是无论是word联机帮助还是msdn帮助，都没有这方面的介绍，因此只能凭自己的实验取探索，初步探测的函数如下：
宏名 解释 注释
filenew 新建
filenewdefault 新建空白文档
filesaveas 另存为
fileopen 打开
fileclose 关闭
fileprint 打印
fileprintpreview 打印预览
toolscustomize 工具栏里面的自定义
toolsoptions 工具选项
toolsrevisions 突出显示修订
toolsreviewrevisions 接受或拒绝修订
toolsrevisionmarksaccept 接受修订
toolsrevisionmarksreject 拒绝修订
toolsrevisionmarkstoggle 修订
toolsmacro 宏
toolsrecordmacrotoggle 录制新宏
viewsecurity 安全性
viewvbcode 查看vb编辑器环境
filetemplates 模板和可加载项
toolsprotectunprotectdocument 解除对文档的保护
inserthyperlink 插入超级链接
edithyperlink 编辑超级链接
deletehyperlink 删除超级链接
editlinks 查看、删除链接
editpasteashyperlink 粘贴超级链接
formatstyle 样式
editbookmark 书签 2.3.5 oleword时一些用用的代码 2.3.5.1 delphi程序启动word
采用createoleobjects的方法来启动word，调用vba代码，具体实现过程为：
首先使用getactiveoleobject('ation')判断当前内存中是否存在word程序，如果存在，则直接连接，如果没有word程序，则使用createoleobject('ation')启动word 2.3.5.2 delphi程序新建word文稿
格式：(template,newtemplate,documenttype,visible)
template： 使用模板的名称，
newtemplate： 新建文档的类型，true表示为模板，false表示为文档
documenttype： 文档类型，默认为空白文档
visible： 打捞的窗口是否可见 举例：doc_handle:=(template:='c:\',newtemplate:=false); 2.3.5.3delphi程序打开word文稿
格式：(filename,confirmconversions,readonly,passworddocument,
passwordtemplate,revent,writepassworddocument,writepasswordtemplate,
format,encoding,visible) filename： 文档名（包含路径）
confirmconversions： 是否显示文件转换对话框
readonly： 是否以只读方式打开文档
addtorecentfiles： 是否将文件添加到"文件"菜单底部的最近使用文件列表中
passworddocument： 打开此文档时所需要的密码
passwordtemplate： 打开此模板时所需要的密码
revert： 如果文档已经，是否重新打开文档
writepassworddocument： 保存对文档更改时所需要的密码
writepasswordtemplate： 保存对模板进行更改时所需要的密码
format： 打开文档时所需使用的文件转换器
encoding： 所使用的文档代码页
visible： 打开文档的窗口是否可见 举例：
doc_handle:=(filename:=doc_file,readonly:=false,
addtorecentfiles:=false); 2.3.6 delphi程序保存word文稿
格式：(filename, fileformat, lockcomments, password,
addtorecentfiles, writepassword, readonlyrecommended,
embedtruetypefonts, savenativepictureformat, saveformsdata,
saveasaoceletter) filename： 文件名。默认为当前文件夹和文件名。
fileformat 文档保存的格式。
lockcomments 如果为 true，则此文档只允许进行批注。
password 打开文档时的口令。
addtorecentfiles 如果为true，则将文档添至"文件"菜单中最近使用的文档列表中。
writepassword 保存对文档的修改所需的口令。
readonlyrecommended 如果为 true，在每次打开文档时，word 将建议用户采用只读方式。
embedtruetypefonts 如果为 true，则将文档与 truetype 字体一起保存。
savenativepictureformat 如果为 true，则从其他系统平台（例如 macintosh）导入的图形仅保存其 windows 版本。
saveformsdata 如果为 true，则将窗体中用户输入的数据存为一条数据记录。
saveasaoceletter 如果文档包含一个附加，当此属性值为 true 时，将文档存为一篇 aoce 信笺（同时保存邮件）。 举例：
(filename:=doc_file,fileformat=wdformatdocument,
addtorecentfiles=false); 2.3.7 从数据库读取文件到本地硬盘和从本地硬盘读取文件到数据库 在数据库上使用image二进制字段保存，使用stream流的方式。 创建文件流：
word_filestream:=(target_name,fmopenwrite or fmcreate);
on:=0; 保存到数据库的image字段：
tblobfield(yname(column_name)).savetostream(word_filestream); 从数据库读取文件到本地硬盘：
tblobfield(yname(column_name)).loadfromstream(word_filestream); 释放文件流：
; 2.3.8 全局消息的定义
因为word和delphi程序是两个软件，相互之间通讯比较麻烦，所以使用全局消息的方法进行。全局消息必须首先注册，windows返回系统空闲的消息号，当注册的消息相同时，windows系统返回同一个值，这样就保证了使用这个消息号在两个程序之间通讯。 定义消息的办法：
szmessagestring: pchar = 'xidian_11_stone';
fmyjoinmessage := registerwindowmessage(szmessagestring); 发送消息的方法：
sendmessage(对方句柄，消息，消息附带短变量，消息附带长变量) 2.3.9 delphi程序接收消息的方法
delphi接收消息有两种，一是重载特定消息，二是重载wndproc函数，在里面选择相应消息进行处理。
法一，每次只能处理一条消息，而法二能够同时处理多条消息。 对于法二，声明如下：
procedure wndproc(var message: tmessage);override
必须注意，使用时需要在处理完自己消息处理后继承wndproc(message)函数，否则系统会崩溃！ 2.3.10 word中combo对话框的动态生成以及change事件
建立类模块combohander，在内部定义事件
public withevents comboboxevent as dbarcombobox 定义combo控件产生事件的模块
dim ctlcomboboxhandler as new comboboxhandler 产生combo对话框
set cbo_choosedoc = commandbars("添加的菜单").(type:=msocontrolcombobox, temporary:=true) 进行文件句柄设置，以产生combo_change事件
set oxevent = cbo_choosedoc 产生事件后，在类模块combohander内选择comboboxevent的change事件，即可书写事件代码
sub comboboxevent_change(byval ctrl as dbarcombobox) 2.3.11 一些word的事件
vba代码中处理的word事件有：document_close
application事件中需要处理的有：documentbeforeclose，documentchange。 document_close：事件在文档关闭时产生事件
documentbeforeclose：在文档被关闭以前先于word判断文档是否保存，给出相应提示并进行相应处理。
documentchange：文档切换，在文档从自己修改的文稿和其他人修改的文稿之间切换产生事件，主要处理设置文档权限等。 2.5 实现阶段 2.5.1 界面设计 2.5.2 控件属性设计 2.5.3 添加程序代码 2.5.4系统安全性设计 2.5.5调试程序 ． 2.6 测试阶段 2.6.1 模块测试 2.6.2 联合测试 为了提高测试工作的质量，在测试过程中，注意了以下几点： (1) 测试工作由程序员之外的其他人员来进行，这样会获得更好的测试效果。 (2) 不仅要选择合理的输入数据作为测试用例，还要选用不合理的输入数据作为测试用例。 (3) 除了检查程序是否做了应该做的工作之外，还检查程序是否做了它不因该做的事情。 (4) 要长期保存所有的测试用例，直至系统被废弃不用为止。 2.7 试运行阶段 系统经过测试后，便可交付单位人事部门进行试运行。该阶段的基本任务是由用户来验证软件系统的功能。在试运行过程中，用户可以输入一些实际的数据，来验证系统的各个功能是否已达到预期的要求。同时，用户还应随时将系统中存在的一些问题反馈给软件人员，以便修改，直至最后完成系统的验收工作。 3.结论及体会 通过对人员资料管理系统软件的编写，使我将课本学习与实际应用结合起来，在实际问题的解决中，培养独立思考的能力和勇于创新的精神，并从中学到许多知识，特别是关于delphi6.0 软件的知识，同时也加深了对软件设计过程的了解，为以后的学习打下了一定基础。 由于水平、条件有限，加之时间仓促，论文在实用性等方面存在一些不足和纰漏，敬请各位领导和教授批评指正。 致 谢 在本文成稿之际，在此向所有给予我关心、支持和帮助的老师，同学和朋友致以深深的谢意。学校领导和教员对本次设计给予了精心指导和热心的帮助，并对论文中存在的不足提出了许多宝贵意见，对此我表示衷心的感谢。 最后，再次向百忙之中评阅本论文的教员以及答辩委员会的各位教授致以最诚挚的感谢！ 参考书目 : [1] 刘瑞新，文成林等编.delphi6.0 程序设计教程.北京：机械工业出版社，2000 [2] 史济民，汤观全编著.delphi6.0 及其应用系统开发.北京:清华大学出版社,2000 [3] 郑刚编著,delphi6.0实效编程百例 北京：人民邮电出版社，2002 [4] 朱欣娟，赵征等编 delphi6.0 入门 西安：西安电子科技大学出版社，1999