毕业设计(论文)-Delphi 7汽车零件销售管理系统

目录
前言 (2)
1 系统的可行性分析 (2)
2 系统需求分析 (3)
2.1 系统调查 (3)
2.2 数据流图 (4)
3 系统概要设计 (5)
3.1 系统功能模块 (5)
3.2 数据库概念模型设计 (6)
3.3 开发平台选择 (8)
4 详细设计 (9)
4.1 各功能模块设计 (9)
4.2 数据库表的设计 (10)
5 系统实现 (13)
5.1 用户界面设计 (13)
5.2 基础信息模块的实现 (15)
5.3 基础业务功能模块的实现 (17)
5.4 系统查询模块的实现 (20)
5.5 系统报表模块................................................................. 错误!未定义书签。

5.6 系统设置......................................................................... 错误!未定义书签。

5.7 数据备份......................................................................... 错误!未定义书签。

6结束语......................................................................................... 错误!未定义书签。

参考文献........................................................................................ 错误!未定义书签。

汽车零件销售管理系统的实现
摘要:汽车零件销售管理系统是从销售公司实际业务出发，分析了汽车零件管理的工作流程，并以入库管理和出库管理为重点，实现了对汽车零件的材料管理、出入库管理、查询管理等功能,描述了两个子系统的模块结构设计及实施过程中的技术要点。

用户可以通过相应的模块，对汽车零件的基本情况进行更新、删除和查询，对零件材料的出库和入库进行管理，并实现了出入库明细进行查询，对出库、入库和客户信息的报表生成，同时设计了数据备份等系统管理功能。

本系统是使用Delphi 7.0开发工具,Access数据库结合BDE数据访问对象来实现数据库的操作。

关键词:汽车零件销售管理；Delphi 7；管理信息系统
The Development of Vehicle Components Sale Management System
Abstract:The vehicle components sale management system is a management information system which was developed according to the actual operation of the distribution company and the analysis of the vehicle components management’process.It makes the vehicle components going into&out of the storage management as its two major modules and has functions to manage the material,going into&out of storage and query of vehicle components.This test makes an particular explanation about the design of these two subsystems’ module frame and the important technique used in the process of its ers can update,delete and search the basic information about vehicle components,manage the going into&out of the storage vehicle components materials according to corresponding modules.This sale management system can create report forms of going into&out of the storage and copy data automatically, at the same time it set popedom according to different users.This system uses the Delphi7 as its development tool, and the Access database as well as BDE data access object to operate the database.
Key words:vehicle components sale management; Delphi 7; management information system
前言
当今时代是飞速发展的信息时代，在各行各业中离不开信息的处理，这正是计算机被广泛应用于信息管理环境的原因。

计算机的最大好处在于利用它能够进行信息管理,利用计算机进行信息管理不仅提高了工作效率，而且对于复杂的信息计算机能够充分发挥它的优越性。

信息管理系统是进行信息的采集、存储、加工、维护和使用的系统。

它是随着管理科学和技术科学的发展而形成的。

随着科学技术的不断提高,计算机科学日渐成熟，它已进入人类社会的各个领域并发挥着越来越重要的作用。

作为计算机应用的一部分,使用计算机对进销存信息进行管理,具有手工管理无法比拟的优点。

例如:检索迅速、查找方便、可靠性高、存储量大、保密性好、寿命长、成本低等。

这些优点能够极大地提高信息管理的效率,也是企业走向科学化、正规化、与世界接轨的重要条件。

因此，开发这样一套管理软件是有必要的。

1 系统的可行性分析
开发的系统是给用户提供更方便的操作环境，首先系统要具有可行性。

本系统主要从技术可行性、经济可行性、操作可行性三个方面进行分析。

技术可行性:该系统所需硬件设备，市场上有销售且价格适中，操作系统采用Windows系列操作系统，开发工具采用Delphi，数据库管理采用Access,这些软件在MIS开发中已被大量应用，技术上都比较成熟,因此在技术上是可行的。

经济可行性:该系统所需的成本并不高,给企业带来的效益远远超过所需要的成本,因此开发这个系统在经济上是可行的。

操作可行性:本系统的操作并不需要有很高的计算机专业知识,一般的操作员都很容易学会,操作简单易行,具有一般电脑操作知识即可,所以本系统在操作上也是可行的。

2 系统需求分析
2.1 系统调查
随着人们生活水平的不断提高,汽车走进企业走单位走进家庭是当前发展的必然趋势,这么多的车辆免不了要修车和换零件。

零件销售企业通常都有来自四面八方的客户,要求各种不同型号车辆的零件,面对这种较为复杂的情况,很多小型零件销售公司还采用手工记录,因此会有以下一些问题:
1.对零件的管理工作缺乏规范性,有关人员对零件的基本情况缺乏了解。

2.手工记录工作量大,出错率高,容易给日常工作带来麻烦。

3.如果负责人对货物信息掌握不及时、不准确,会影响到企业的决策效果。

根据现实情况,汽车零件销售管理系统开发工作,有以下几个开发目标: （1）提高管理效率,降低人工成本。

（2）系统具有可移植性、数据共享性,能适应企业未来业务的发展。

（3）通过系统加工的数据，及时调整营销策略。

基于以上的开发目标，系统开发有三个方面的需求:功能需求、报表需求和安全性需求。

1.功能需求:系统涉及部分零件资料，包括零件入库、出库等功能；提供强大的查询功能，可进行不同类型查询；系统还要提供客户信息的添加、修改。

2.报表需求:系统要对客户信息和零件的入库、出库和退货信息生产报表便于管理者查看信息。

3.安全性需求:根据汽车零件销售公司的管理流程,为了增强系统安全性,进入系统前需进行身份验证,用户登录后,根据不同操作需求,完成对汽车零件入库、出库、退货的管理。

图2-1为登录时的流程图。

2.2 数据流图
数据流图是对系统调研阶段绘制的业务流程图进行分析的基础上,从系统的科学性、管理的合理性、实际运行的可行性角度出发,将信息处理功能和彼此之间的联系自顶向下逐层分解,从逻辑上精确地描述系统应具有的数据加工功能、数据输入、数据输出。

本系统数据流图如图2-1(系统顶层数据流图)和2-2(系统第一层数据流图)所示。

事务
数据库信息
图2-2系统顶层数据流图
图2-3系统第一层数据流图
3 系统概要设计
3.1 系统功能模块
汽车零件销售管理系统从功能上可以划分为如下几个功能模块(如图3-1) :
图3-1系统功能模块图
3.2 数据库概念模型设计
3.2.1 系统实体图
系统中涉及到多个实体,各自有不同的属性下面用实体图来表示各个实体。

主要包括客户实体、汽车零件实体和用户实体
(1) 客户实体图
图3-2客户信息实体图
(2)汽车零件实体图
图3-3汽车零件实体图
(3)用户实体图
图3-4用户实体图
3.2.1 系统E-R图
系统各种功能的实现都离不开数据库的支持,因此数据库的设计是本系统不可缺少的一部分。

对数据库进行E-R图的分析帮助我们进一步的了解系统各个功能之间的联系,本系统E-R图如3-5所示。

3.3 开发平台选择
本系统的开发选择了Delphi 7开发工具和Access数据库,下面简单介绍一下Delphi 7和Access。

3.3.1 Delphi 7介绍
本系统是采用delphi 7开发工具进行开发的,Delphi不仅是编辑器和编译器,还是一种使用构件进行编程的工具,可使软件开发工作更简单。

Delphi作为一种面向对象的可视化开发工具,其主要特性主要有以下几点:
(1)应用程序的快速开发。

Delphi是基于Object Pascal的开发工具,它具
有高性能的32位本地优化代码编译器。

其应用程序像C++语言编写的
应用程序一样,可直接运行,能够最终生成可单独执行的DLL与EXE文
件。

(2)高效的可视化构件库与面向对象的架构。

(3)具有集成的快速报表生成工具和集成的图表构件,能将企业数据库转换
成决策信息。

(4)能可视化地创建构件,通过鼠标拖放生成构件模板;具有对Windows和
Server的完全支持。

(5) 具有多种操作向导,可加速程序编写和减少语法错误。

(6) 具有开放式数据库架构,可轻松连接企业内的各式数据库结构。

(7) 具有集成的数据库开发工具、强大的客户/服务器运算开发功能。

(8) 具有可伸缩的多层面数据库架构,便于维护和增加重要性。

(9) 具有Web数据库应用程序开发的能力。

在Delphi众多的优势当中，它在数据库方面的特长显得尤为突出：适应于多种数据库结构，从客户机／服务机模式到多层数据结构模式；高效率的数据库管理系统和新一代更先进的数据库引擎；最新的数据分析手段和提供大量的企业组件。

3.3.2ACCESS简介
Microsoft所推出的Microsoft SQL Server 与Microsoft Access两大数据库管理系统是目前应用最广泛的两种。

Access数据库系统虽然不如SQL Server功能齐全,但对于本管理系统的应用来说,已经是绰绰有余了。

Microsoft Access就是一种采用关系结构的数据库管理系统,它具备一般数据库管理系统所拥有的功能,从而具有易学易用的特性,使它成为最适合的数据库入门软件。

相对于其他大型数据库管理系统,Microsoft Access提供了一个经济
实惠的解决方案它不但在价格上比其他系统便宜许多,而且“麻雀虽小,五脏俱全”,因此十分适合用来开发小型的数据库应用系统。

在Access数据库中包含常用的5个数据库对象,分别是“表”、“查询”、“窗体”、“报表”、“页”。

•表是存放数据的容器，被设计成行和列的格式，就像电子表中的那样。

•查询是一个Access对象，它询问数据库中有关数据的问题。

根据设计方法的不同，查询能够在数据库中检索并组合来自不同表的数据。

•窗体是一个窗口，它提供一种很方便的途径来查看数据库中已有记录或向数据库中增添新记录。

•报表是一个Access对象，设计来显示数据，其作用类似于窗体，但主要是用于数据打印，不能输入数据。

•页是一种特殊类型的窗体，它使用户能够利用Web浏览器查看和编辑Access的表。

4 详细设计
4.1 各功能模块设计
1.基础信息模块
(1) 产品信息管理模块:产品信息管理模块包括产品的添加、修改和保存三个部分。

用户可以通过前进键和后退键逐个查看产品信息。

(2) 客户信息管理模块:客户信息管理模块包括客户信息的添加、修改和保存三个部分。

用户可以通过前进键和后退键逐个查看客户信息。

2.基础业务模块
(1) 入库登记管理模块:入库登记管理主要是对入库零件信息录入,然后生产入库信息报表。

(2) 出库登记管理模块:出库登记管理主要是对出库零件信息录入,然后生成出库信息报表。

(3) 退货登记管理模块:退货登记管理主要是对客户不满意退回的零件信息的记录,然后生成退货信息报表。

3.系统查询模块
本系统提供了强大的信息查询功能包括产品信息查询、客户信息查询、入库信息查询、出库信息查询和退货信息查询5个。

用户可以有条件的对这些信息进行查询,如果数据库中有所要查询的信息,列表中将会列出零件的全部信息。

4. 系统报表模块
本系统提供对某些信息的报表输出,主要有客户信息报表、产品信息报表、入库信息报表、出库信息报表和退货信息报表,在用户对基础信息和基础业务进行操作后就会生成相应的报表,用户可以查看相关报表。

5. 系统设置模块
系统设置是指用户管理，系统中只有管理员可以对用户进行访问，用户管理中有用户的添加、修改。

系统的用户包括管理员和操作员。

6. 系统维护
系统维护主要是数据备份，数据备份中有入库数据备份、出库数据备份和退货数据备份三个内容。

系统流程图如图4-1所示。

图4-1系统流程图
4.2 数据库表的设计
根据系统的E-R图和实体图,本系统所需要的数据表包括客户信息表、入库产品信息表、出库产品信息表、退货产品信息表、用户管理表和汽车零件信息表。

4.3 系统运行环境
系统要正常运行,必然要一个稳定的运行环境。

一般用户对windows界面比较熟悉,因此建议使用windows98/2000/xp操作系统。

另外系统的硬件配置是根据用户对系统的稳定性要求、系统的容量以及用户的维护水平来决定。

本系统的硬件配置要求在256MB/20G以上的计算机。

5 系统实现
5.1 用户界面设计
由于汽车零件管理系统的最终使用者是对计算机并不精通的业务管理人员,从他们的应用需求出发,系统采用了传统的基于菜单选择、填写表格和简单回答等友好的人机互交方式。

为了保证系统的安全性,进入系统之前必须经过必要的安全性验证。

简洁、清晰、友好是此界面设计的风格。

图5-1是用户登录界面。

图5-1用户登录证界面
主要代码实现是:
procedure TPASS.FormCreate(Sender: TObject);
begin
Table1.DatabaseName:='moed'; //设置与该组件连接的数据库名
// table1.DatabaseName:='db1';
TAble1.TableName:='pass'; //指定该组件封装的数据表名
TAble1.open;
end;
procedure TPASS.FormShow(Sender: TObject);
begin
EDIT1.setfocus; // 将焦点定位到操作员输入框
pass1:=0; //设置变量为0
end;
procedure TPASS.Edit1KeyDown(Sender: TObject; var Key: Word;Shift: TShiftState);
begin
If Key = 13 Then edit2.SetFocus ; //回车移动焦点
end;
procedure TPASS.Edit2KeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
If Key = 13 Then BITBTN1.SetFocus ; //回车移动焦点
end;
procedure TPASS.BitBtn1Click(Sender: TObject); //确定
begin
if TAble1.locate('DLSF;KL',V ARarrayOF([Edit1.TExt,edit2.Text]),[loCaseInsensitive]) then begin
bel1.caption:=Table1.FieldByName('xm').Asstring;
MRQP.statusbar1.panels[1].text:='操作员：'+PASS.Table1.fieldbyname('xm').asstring; //主窗体状态栏显示操作员
close;
End
Else begin
pass1:=pass1+1; //累计密码输入错误次数
showmessage('口令错误，请从新输入。

');
Edit2.Text:='';
Edit2.setfocus; //重新输入密码
if pass1=3 then begin //三次输入错误密码
showmessage('没有口令，系统无法识别您的身份。

');
PASS.close; //退出
MRQP.close;
end;
end;
end;
procedure TPASS.BitBtn2Click(Sender: TObject); //退出
begin
pass.close;
mrqp.close;
end;
end.
主界面由主菜单、树形目录和工具栏组成,如图5-2,在界面的上方为主菜单区,用于显示本菜单子功能,用户可以用鼠标或光标来选择下拉菜单项选择。

用户双击左边的树形目录也可进入工作状态,工具栏只要单击即可进行工作。

图5-2系统界面
5.2 基础信息模块的实现
5.2.1 产品信息管理模块
本模块主要是对零件信息进行录入,主要含有以下信息:产品编号、产地、
产品名称、平日单价、产品型号、批发价、单位、零售价、车型、建议价等主要信息，本模块有添加、修改和查询功能。

图5-3产品信息管理模块界面
5.2.2 客户信息管理模块
本模块主要是对客户信息进行录入,主要含有以下信息:客户编号、联系电话、网址、客户全称、地址、开户银行、联系电话、邮编、银行帐号、联系人、传真、纳税号等信息, 本模块有添加、修改、查询等功能。

模块设计界面如图5-4:
图5-4客户信息管理界面
产品信息管理(CPXXGL)和客户信息管理(KHXXGL)的实现代码如下:
procedure TCPXXGL.Button1Click(Sender: TObject);//添加新产品(TKHCCG为添加客户信息) var I:integer;
begin
try
st;
if table1.fieldbyname('cpbh').asstring<>'' then
I:=strtoint(table1.fieldbyname('cpbh').asstring)+1
else i:=1;
Table1.close;
Table1.open;
Table1.append;
ENFALSE;
dbedit1.Text:=formatfloat('000000',i); //生成6位产品编号
Dbedit2.setfocus;
Except on Exception do showmessage('数据连接错误！');
end;
end;
procedure TCPXXGL.Button3Click(Sender: TObject); //保存产品信息
begin
try
Table1.Post;
Table1.close;
Table1.open;
ENTRUE;
table1.indexfieldnames:='id';
button1.setfocus;
Except on Econverterror do showmessage('aaaaaaaa');
on Exception do showmessage('数据连接错误！');
end;
end;
procedure TCPXXGL.FormKeyPress(Sender: TObject; var Key: Char);
begin
if key=#13 then //回车
begin
if (activecontrol is TDBedit) then
Perform(WM_nextdlgctl,0,0);
end;
end;
procedure TCPXXGL.FormClose(Sender: TObject; var Action: TCloseAction); //退出
begin
CPXXGL.Release;
end;
5.3 基础业务功能模块的实现
5.3.1 产品入库登记模块
本模块主要是对入库信息进行管理,主要含有以下信息：客户信息添加(客户
编号、联系人、邮编、客户全称、地址等等)、产品信息添加(产品编号、批发价、数量、产品名称、零售价、产品标识、单价、实付款等等)，添加的结果在表格中列出。

本模块界面如5-5所示:
图5-5产品入库登记模块界面
5.3.2 产品出库登记模块
有入库模块就会有相对应的出库模块,本模块是登记出库信息,主要有:客户信息(编号、全称、电话等)、产品信息(编号、产品名称、价格、数量、金额等)添加完成后,便可在下列表查看得到。

本模块主要界面如图5-6所示:
图5-6产品出库登记模块
5.3.3 产品退货登记管理模块
本模块包含出货信息一览、信息查询栏和系统操作栏,其中出货信息一览中包括全部的产品信息和客户信息。

系统操作栏包括了查询、刷新、退货、退出四个操作。

信息查询栏的选择条件有客户编号、客户全称等。

其界面如5-7所示:
图5-7产品退货登记管理模块退货子系统的实现代码主要有:
procedure Tcpckth.FormShow(Sender: TObject);
begin
Combobox1.itemindex:=0; // 设置默认查询框查询字段
edit1.text:=''; //默认查询值为空
tuihou:='cpbh'; //默认查询字段
end;
procedure boBox1Click(Sender: TObject);
begin
case combobox1.ItemIndex of //选择查询字段
0:begin
tuihou:='cpbh';
end;
1:begin
tuihou:='cpmc';
end;
2:begin
tuihou:='cpxh';
end;
3:begin
tuihou:='khbh';
end;
4:begin
tuihou:='khqc';
end;
5:begin
tuihou:='jsr';
end;
end;
end;
procedure Tcpckth.BitBtn2Click(Sender: TObject); //刷新
begin
table1.Filtered:=false;
end;
procedure Tcpckth.BitBtn1Click(Sender: TObject); //查询
begin
table1.filtered:=true;
table1.filter:=format(tuihou+'='+'''%s''',[edit1.text]);
end;
procedure Tcpckth.BitBtn3Click(Sender: TObject); //退货
begin
if table1.fieldbyname('cpmc').asstring<>'' then begin
if messagedlg('您真的要退货吗！', mtInformation,[mbyes,mbno],0)=mryes
then begin
cpckthsl.showmodal; //调入退货数量输入窗体
end;
5.4 系统查询模块的实现
5.4.1 产品信息查询
产品信息录入完了之后,就可以通过本查询模块对数据库中的信息进行有条件的查询。

产品信息查询的界面如下:
图5-8产品信息查询模块
5.4.2 客户信息查询
客户信息查询可以通过客户编号、客户全称、联系电话和联系人四个元素进行查询,在选择查询条件进行查询后就会显示所要查询的内容,要返回按刷新按钮即可,退出则按退出按钮。

客户信息查询的界面如图5-9:
图5-9客户信息查询界面
5.4.3 入库/出库/退货查询
入库出库退货的查询是对产品进出的记录,它们都拥有相同的界面,查询方法也是一样的。

系统的入库、出库和退货查询可以供管理人员及时的了解产品的销售情况,为决策提供进一步的证据。

图5-10、5-11、5-12分别是出库、入库和退货的查询报表。

5-10产品出库查询界面
5-11产品退货查询界面
图5-12 产品出库查询界面。