汽车租赁公司业务管理系统正文-无忧无虑毕设网

无忧无虑毕设网 ():毕业设计源码下载 毕业设计源码下载： 本文配套程序下载地址 ： 无忧无虑毕设网 ()-大学生毕业设计站 ,免费毕业设计论文 ,无忧无虑毕设网 大学生毕业设计 ,出售各类毕业设计源码 ,论文 ,程序源码 ,网站源码 ,免费视频教程 ,我们将竭诚为您服务！ 第一章 前言 1.1 选题背景及意义 现在的中国汽车市场是一个充满竞争、充满挑战的行业。为了推陈出新，吸引消费者，各家整车厂商殚精竭虑，无数。新概念、新产品和新服务模式层出不穷，原因无它，都想整合各种资源，最大程度吸引消费者的眼球，形成交易。汽车金融类服务的出现，正是在这种整体环境下应运而 生的，而汽车租赁则是其中颇具代表的一种金融服务产品 汽车 租赁作为道路运输行业一种新的融资服务形式、一种新的出行消费方式和 汽车 生产厂家一种新的 汽车 营销渠道，在我国正迎来良好的发展机遇。我国 汽车 租赁业已经引起社会各界和世界 汽车 租赁行业的高度关注，正逐步成为 汽车 产业链的重要一环，对我国经济和道路运输业的发展发挥着重要的作用。目前，全国多数城市的 汽车租赁行业正在各地 交通 部门的 管理 下健康有序发展，中国租车市场的巨大增长诱惑，正在吸引着越来越多的目光。 随着汽车租赁业的迅速发展，租赁业务量也变的越来越多，以往人工处理数据的方式已阻碍了公司的发展，汽车租赁业务管理系统的开发迫在眉睫。 同时 使用汽车租赁管理系统 也更加 可以规范 企业 的管理和经营行为，减少 企业 的经营成本，提高工作效率。 本设计结合企业的实际需要， 利用计算机网络和数据库技术 ,主要完成了汽车租赁业务管理 系统的需求分析、数据库设计、应用程序设计与开 发工作。 1 2 汽车租赁管理学的历史及发展趋势 汽车租赁业的发展背景 生 活环境及工作方式变化： 随着世界经济形势的变化和西方国家产业结构的变化，人们对拥有汽车的观念也在变化。越来越多的家庭、个人由于工作环境、劳动方式的变化，不再求长期拥有汽车，而是以 “ 招之即来 ” 的方式使用各种汽车。用户认为，租赁汽车可以节省大笔投资，不必支付诸如养路费、保险费和维修费等之类的费用，甚至不需要建车库。因为可按小时、天等时间单位来租车，亦可要求租赁公司派出司机来开车。 生活及工作中个性化需求日益突出： 由于工作上的特殊要求和业余生活的丰富无忧无虑毕设网 ():毕业设计源码下载 毕业设计源码下载： 多样化，人们对汽车的功能和配置在某一特定时间内有特殊的需求。这在通常情况下一般汽车是满足不了的，但是租赁公司就可以提供这类专用汽车以满足不同用户的不同需要。如 “ 办公汽车 ” 、 “ 旅游度假汽车 ” 、 “ 多媒体汽车 ” 等。 汽车作为经营辅助手段的观念成为时代潮流： 越来越多的中小企业利用租赁汽车来完成其经营活动是当代汽车租赁市场呈现出的一个明显的发展趋势。 1997 年，美国汽车租赁营业额每月平均增长 20.5%，其中，与中小企业发生的营业 额每月平均增长 31%。在日本 1997 年新开业的中小企业中，有 80%是主要靠租赁汽车来完成各种经营业务活动。 汽车租赁业未来的发展趋势 汽车租赁公司的规模化经营趋势日益加剧 ： 通过多次并购和特许经营等模式的创新，世界主要汽车租赁公司已从最初的小规模经营发展成为现在遍布全球主要国家，平均租赁站点数千个，运营车辆数十万辆，雇员数万人的特大型跨国公司。而日趋突出的规模化经营带来的效益规模化是全球发展的潮流。 跨行业的合作更为广泛： 汽车租赁业与金融、保险、航空运输、旅游、酒店服务、汽 车制造等多行业的合作更为紧密，通过对客户需求的全方位服务，实现汽车租赁持续的发展动力。 对潜在市场的争夺越来越激烈： 随着欧美等发达国家汽车租赁市场业务的日趋成熟，亚洲和亚太地区等有发展潜力的新兴市场已成为各汽车租赁业巨头争相抢夺的焦点。赫兹在亚太地区投入 10 多亿美元，进行业务拓展；阿维斯以其优质服务在东南亚和大洋洲已占据了稳固的市场份额，欧洲汽车着眼于中东市场。随着中国入世和更为全面的对外开放，中国 “ 这一广阔且远未充分开发的市场 ” 将成为各大公司争夺的重点 。 信息网络和电子商务等新技术日益普及： 汽车租赁公司通过引入电子商务和互联网络的广泛普及应用，将更加快捷、高效地进行业务拓展，有效降低管理成本，实现经营业务的持续稳定增长，最终从而使其自身的经营管理水平和竞争能力不断提高。 1.3 本课题研究的主要内容 随着汽车租赁业的迅速发展，租赁业务量也变的越来越多，以往人工处理数据的方式已阻碍了公司的发展，汽车租赁业务管理系统的开发迫在眉睫。 用 Delphi 语言开发 SQL数据库中数据，设计汽车租赁公司管理系统，处理实际遇到的汽车租赁公司业务问题。 本设计结合企业的实际需要， 利用计算机网络和数据库技术 ,主要完成 了汽车租赁业务管理系统的需求分析、数据库设计、应用程序设计与开发工作。 该 系统无忧无虑毕设网 ():毕业设计源码下载 毕业设计源码下载： 包括客户会员 与非会员 管理、日常租赁与归还管理、车辆管理以及保险公司管理等功能，通过对数据库的控制和管理，可实现结算审核、查询、增加、删除、修改等功能 。 第二章 系统分析及 总体设计 2.1 系统分析 2.1.1需求分析 通过调查和分析要求具有以下功能： （ 1) 登陆信息管理：进入系统的帐户和密码，分管理员和普通用户权限。 （ 2) 客户信息管理：客户信息包括客户编号，客户姓名，年龄，性别，电话。 （ 3) 会员信息管理：会员信息包括客户编 号，会员姓名，年龄，性别，电话。 （ 4) 车辆信息管理：车辆信息包括汽车编号，汽车颜色，车牌号码，车辆类型。 （ 5）类型信息管理：类型信息包括汽车编号，汽车品牌，汽车厂家地址。 （ 6）保险公司信息管理：此信息包括汽车编号，公司名称，负责人，保险资金。 （ 7）汽车租赁信息管理：此信息包括汽车编号，出租天数，出租价格，租车人。 （ 8）汽车归还信息管理：汽车归还信息包括汽车编号，实际使用天数，实付金额，经办人，回车公里数。 2.1.2 设计思路 本次软件的设计按照功能模块的分析规划中所设定的模块进行模块化设计。在 各个模块中又可以应数据库操作的不同划分为不同的操作块。例如对于数据的添加、删除、修改都属于对数据表的管理维护，可将其共同归属为数据的管理模块，不同的操作只是需对应为不同的操作块；通过管理权限进行可分为普通用户和管理员两种不同的管理模块。 本软件的前端界面的设计主要采用 Delphi，而对于后端的数据库，由于对 SQL Sever较为熟悉，并且 SQL Sever的视图、触发器、以及存储过程的使用将大大的方便数据库的维护、管理和查询操作，大大加速程序的执行速度；所以使用 SQLSever2000来提供的支持。而 SQL Sever编程和 Delphi编程的结合使用可以地进一步扬长避短，发挥其各自的优点，例如，对于简单的数据库操作在 Delphi中的实现容易，并且也不会降低程序的执行速度；而对于复杂算法执行， SQL Sever下的执行将远远快于 Delphi下的执行。因此，此方案是可行且最好的。 对于软件窗体的设计，将遵循直观、简洁的原则；数据库的设计将遵照一致性及完整性的原则。设计思想：始终围绕方便用户使用。 无忧无虑毕设网 ():毕业设计源码下载 毕业设计源码下载： 2.1.3可行性分析 随着人们生活水平的不断提高，人们对汽车的消费和需求也越来越旺盛。很多汽车销售公司的业务环节仍然运 用人工记账的传统方法，既容易出错又会导致账目混乱，查询和统计起来也非常不方便，费时又费力，严重时会给公司造成难以挽回的损失。 结合上述问题，人们开发了汽车租赁公司管理系统， 使得人们 不但能使各业务环节协调一致，而且操作简单，账目清晰。通过账目查询，公司能在最短的时间内获得市场信息，从而制订相应的决策 。汽车租赁公司管理系统使用 Delphi 7.0 开发，它是目前最为流行的可视化快速应用程序开发环境，对数据库有强大的支持。后台数据库使用 SQL Server 2000 数据库，以保证数据的安全和执行高效。 2.2 总体设计 2.2.1系统设计工具概述 1. DELPHI 的介绍 Delphi 是 Inprise 公司 (即原 Borland)推出的基于真正面向对象语言 Object Pascal语言的可视化编程工具，是当今世界上最快的编译器。能大大提高编程效率。面向对象的程序设计是现在最成功的高级语言程序设计方法，面向对象的程序设计的目的是创建可重用代码，通过把属性和方法封装进 “对象 ”中，以更好地模拟现实世界 . Delphi 是全新的可视化编程环境，为我们提供了一种方便、快捷的 Windows 应用 程序开发工具。它使用了 Microsoft Windows图形用户界面的许多先进特性和设计思想，采用了弹性可重复利用的完整的面向对象程序语言 (Object-Oriented Language)、当今世界上最快的编辑器、最为领先的数据库技术。 Delphi 7是 “第四代编程语言 ”的杰出代表，它是一个完全导向的、高度可视化的集成开发环境 ， 非常人性化。具有简单、高效、功能强大的特点 。和 VC相比， Delphi更简单、更易于掌握，而在功能上却丝毫不逊色；和 VB相比， Delphi 则功能更强大、 更实用 。 Delphi7 是 Inprise 公司于 2002 年 8 月在美国推出 的一款非常优秀的可视化应用程序开发工具的最新版本。与以往的版本相比， Delphi7 突出了对 NET、WEBservices、 跨平台开发的准备和支持， Delphi7 提供了开发电子商务应用程序的众多新特征，可概括为： （ 1）提供了一些工具，对 NET架构进行准备。 （ 2）使用模板驱动构架 （ Model Driven Architecture-MDA） 。 （ 3）通过引入 Atozed Software 公司 的 IntraWeb 技术。 无忧无虑毕设网 ():毕业设计源码下载 毕业设计源码下载： （ 4）通过 Borland Kylix3 For Delphi 版本，重新编译并分发为 Linux 平台应用，这不仅体现了 Delphi 7 的跨平台的兼容性。 （ 5）通过 Delphi 7，可以使用户的商业开发与 WEBservices 进行整合。 （ 6）使用 Delphi 7，通过浏览可用的 UDDI 目录，采用网络指纹技术。 （ 7） Delphi 7的 BizSnap 技术，强有力的扩展了使用商业 XML文档。因此，可以在Delphi 7中开发与商业伙伴所使用 Web Services 的平台进行无缝结 合的应用程序，包括支持 Microsoft 的 NET、 BizTalk等。 （ 8）在 Delphi 7中，通过由 MDIAS发展而来的 DataSnap 技术。 （ 9）在 Delphi 7中，引入 Rave Reports 技术，使程序员快速开发跨平台的报表。 （ 10）在 Delphi 7 中，提供了支持 Windows XP 主题风格的 VCL组件。 2.SQL Server 2000 简介 SQL Server 2000 是 Microsoft 公司推出的 SQL Server 数据库管理系统的最新版本该版本继承了 SQL Server 7.0 版本的优点同时又比它增加了许多更先进的功能具有使用方便可伸缩性好与相关软件集成程度高等优点可跨越从运行 Microsoft Windows 98 的膝上型电脑到运行 Microsoft Windows 2000 的大型多处理器的服务器等多种平台使用 。 SQLServer200能够满足今天的商业环境要求不同类型的数据库解决方案 ,此外 还为您的数据管理与分析带来了灵活性，允许单位在快速变化的环境中从容响应，从而获得竞争优势。作为一个完备的数据库和数据分析包，SQLServer2000为快速开发新一代企业 级商业应用程序、为企业赢得核心竞争优势打开了胜利之门。 SQL Server 2000建立在 SQL Server 6.5和 SQL Server 7.0坚固而雄厚的技术基础之上 ,是公认的运行在 Windows NT平台上的最佳数据库。 SQL Server 2000 已经在性能和可扩展性方面确立了世界领先的地位，是一套完全的数据库和数据分析解决方案。与以前的版本相比， SQL Server 2000 的特点体现在如下几个方面 : 1 与 Internet的紧密结合 SQL Server 2000 的数据库引擎集成了对 XML的支持，同时可以扩展、易于使用和安全的特点，成为建设大型 Web应用的 Windows DNA架构相集成。同时， SQL Server 2000所携带的诸如英语查询以及 Microsoft查询服务等为开发 Web应用提供了友好而强大的查询界面。 2.可扩展性和可用性 无忧无虑毕设网 ():毕业设计源码下载 毕业设计源码下载： 为了兼顾各种配置计算机的使用， SQL Server 2000的数据库引擎可以运行在从装 Windows 98 的台式机、笔记本电脑安装 SQL Server 2000数据中心的多处理器计算机上。 SQL Server 2000企业版，具有联盟服务器（ federeted servers）、视图索引（ indexed views）以及超大规模的内存支持等特征，完全可以满足最大规模的 Web站点的性能需求。 3 企业级数据库 SQL Server 2000关系数据库引擎具备有完善而强大的数据处理功能。它在有效保证数据库一致性的基础上，尽量降低成千上万的数据库用户进行并发访问时的管理和延迟成本。 SQL Server 2000的分布式查询允许用户同时引用多处数据源，但友好的界面使用户觉得好象自始至终是在操作一个数据源。 4 简单、友好的操作方式 SQL Server 2000包含一 整套的管理和开发工具。这些工具都具有非常友好的用户界面，在提供强大功能的同时易于安装、使用和发布。用户可以把更多的精力放在自己的业务问题上，可以非常迅速地建立并发布强大而复杂的数据库应用系统。 5 数据仓库支持 SQL Server 2000为了满足现代企业对大规模数据进行有效分析和利用的要求，包含了一系列提取、分析、总结数据的工具从而联机分析处理成为可能。同时， SQL Server 2000提供了英语查询工具和编程接口，使得以英语为基础设计和管理、查询数据库成为可能。 2.2.2功能框图及模块分析 1功能框 图 当用户使用该系统时，首先是管理员输入密码和角色经系统开始验证，假如密码和角色都正确，系统则进入主截面，用户在登陆后可以进入密码修改界面进行修改密码。在系统主界面下，分布着系统的子界面，每个子界面都具有不同的功能模块，它们之间是互相独立的，主界面统一对系统各个子界面进行调度。整个系统流程图呈树状。如图 2.1所示 为系统的功能框图 ： 无忧无虑毕设网 ():毕业设计源码下载 毕业设计源码下载： 图 2-1功能框图 2. 模块分析 为了便于系统的设计开发 ,根据系统功能要求 ,使用了模块化设计 ,软件研究所管理信息系统可以分为七个 功能模块： 登录界面： 该模块的主要功能是 使管理 信息 系统的用户 按 其权限 进入主界面。 主界面： 该模块提供管理系统的主界面，是主系统的唯一入口和出口，该界面提供用户选择并调用各子模块 。 系统管理界面： 该模块的功能是可以对用户的密码进行修改。 基本信息管理 界面： 系统管理模快块 主界面 基本信息模块 客户会员管理 日常信息管理 类型信息 保险信息 车辆信息 客户信息 会员信息 汽车租赁 汽车归还 登陆界面 开场 flash 密码修改 无忧无虑毕设网 ():毕业设计源码下载 毕业设计源码下载： 该模块的功能是对 汽车类型信息、保险公司信息、车辆信息等信息的设置 。 日常业务管理模块界面： 该模块的主要功能是对汽车租赁、汽车归还信息的添加、修改、删除。 客户会员管理模块： 该模块的功能是对客户信息、会员信息的添加、修改、删除。 2.2.3系统数据 流图 用户进入软件研究所管理信息系统之前需要进行权限验证，只有合法的用户才能进行相应的管理操作；普通用户登陆之后只能查询和修改自己的信息，浏览一些公共信息。需要处理的模块包含：登录模块，修改密码模块，主界面模块， 日常业务管理模块（包括汽车租赁、汽车归还的查询等），客户会员管理模块（包括客户信息、会员信息的查询，添加，修改等），基本信息管理模块（包括汽车类型信息、保险公司信息、车辆信息）。 数据库模块包括如图 2-2 所示的几个方面。 图 2-2 数据库模块 管理员 普通用户 修改密码 操作 数据库模块 登陆信息 客户信息 会员信息 车辆信息 类型信息 保险公司 汽车租赁 汽车归还 无忧无虑毕设网 ():毕业设计源码下载 毕业设计源码下载： 图 2-3 系统权限及 修改密码流程 图 2-4管理员运行流程 图 2-5普通用户运行流程 普通用户 管理 查询 管理员 管理 添加 修改 删除 查询 无忧无虑毕设网 ():毕业设计源码下载 毕业设计源码下载： 第三章 数据库的设计 在系统后台数据库设计中，为了达到减少数据的冗余度，在设计数据库时通常进行规范化分析，并使各个数据库表满足某种范式的要求。在关系数据库设计中，关系模型要求数据库表中每行记录都必须是惟一的，而不允许出现相同的记录。在设计数据库表时，可以通过定义主键来保证记录（实体）的惟一性。一个表的主键由一 个或多个字段组成，其值具有惟一性，而不允许取空值，主键的作用惟一地标识表中的每一条记录。 3.1 实体描述 根据需求调研的结果，汽车租赁公司管理系统中，涉及到的实体有：类型信息表，保险公司信息表，车辆信息表，客户信息表，会员信息表，汽车租赁信息表，汽车归还信息表等。类型信息表，它包括一些基本结构的属性信息：汽车编号、汽车品牌、汽车厂家地址等；保险公司信息表包括信息： 汽车编号，公司名称，负责人，保险资金等；车辆信息表包含信息：汽车编号，汽车颜色，车牌号码，车辆类型等；汽车租赁信息包含：汽车编号，出租天数 ，出租价格，租车人信息等；汽车归还信息表：包括汽车编号，实际使用天书，实付金额，经办人，回车公里数等；会员信息包含客户编号，会员姓名，年龄，性别，电话等信息；客户信息表包括信息：客户编号，客户姓名，年龄，性别，电话等信息。 E-R 方法 （ Entity-Relationship Approach） 即实体联系方法，这种方法用 E-R图来表示实体及其联系。 ER 图是用来描述某一组织 (单位 )的概念模型， 在数据库中有严格的界定 ,是P.P.S.Chen于 1976 年提出的实体 -联系方法 (Entity-Relationship Approach).该方法用 E R图来描述现实世界的概念模型 它能 提供了表示实体、属性和联系的方法。构成 ER图的基本要素是实体、属性和关系 ； 实体是指客观存在并可相互区分的事特；属性指指实体所具有的每一个特性。 图 3-1为系统 系统 E-R 图 无忧无虑毕设网 ():毕业设计源码下载 毕业设计源码下载： 类型信息表 汽车编号 汽车品牌 汽车厂家地址 保险公司信息表 汽车编号 公司名称 负责人 保险资金 车辆信息表 汽车编号 汽车颜色 车牌号码 车辆类型 汽车租赁信息表 汽车编号 出租天数 出租价格 租车人 汽车归还信息表 汽车编号 实际使用天数 实付金额 经办人 回车公里数 客户信息表 客户编号 客户姓名 年龄 性别 电话 会员信息表 客户编号 会员姓名 年龄 性别 电话 1 1 1 1 1 1 1 1 1 N 1 1 1 1 图 3-1系统 E-R图 3.2 数据表的设计 根据对软件的需求和功能分析，整个汽车租赁公司管理系统中的数据库总共设计了下面这些表，分别为：登陆表，类型信息表，保险公司信息表，车辆信息表，客户信息表，会员信息表，汽车租赁信息表，汽车归还信息表。 下面着重阐述各表的数据结构 无忧无虑毕设网 ():毕业设计源码下载 毕业设计源码下载： 表 3-1 登陆信息表 字段名 数据类型 长度 主键否 功能描 述 登陆身份 char 10 是 登陆身份 登陆密码 char 10 登陆密码 级别 varchar 10 级别 如表 3-1所示为登陆系统信息表，登陆信息表用来保存进入系统用户信息，表中包括登陆身份和登陆密码、权限。登陆身份在这里是主键。 表 3-2 类型信息表 字段名 数据类型 长度 主键否 功能描述 汽车编号 nvarchar 8 是 汽车编号 汽车品牌 char 12 汽车品牌 汽车厂家地址 char 10 汽车厂家地址 如表 3-2所示为类型信息表，类型信息表用来保存汽车类型信息 ，表中包括登汽车编号，汽车品牌，汽车厂家地址。汽车编号在这里是主键。 表 3-3 客户信息表 字段名 数据类型 长度 主键否 功能描述 客户编号 varchar 10 是 客户编号 客户姓名 char 10 客户姓名 年龄 varchar 10 年龄 性别 varchar 2 性别 电话 varchar 10 电话 如表 3-3所示为客户信息表，客户信息表用来保存客户信息，表中包括客户编号，客户姓名，年龄，性别，电话。客户编号在这里是主键。 表 3-4 会员信息表 字段名 数据类型 长度 主键 否 功能描述 客户编号 varchar 10 是 客户编号 会员姓名 char 10 客户姓名 年龄 varchar 10 年龄 性别 varchar 2 性别 无忧无虑毕设网 ():毕业设计源码下载 毕业设计源码下载： 电话 varchar 10 电话 如表 3-4所示为会员信息表，会员信息表用来保存会员信息，表中包括客户编号，会员姓名，年龄，性别，电话。客户编号在这里是主键。它和表 3关联是客户的编号和名字是不变化的 表 3-5 汽车租赁信息表 字段名 数据类型 长度 主键否 功能描述 汽车编号 varchar 10 是 汽车编号 出租天数 char 10 出租天数 出租价格 varchar 10 出租价格 租人车 varchar 2 租车人 如表 3-5所示为汽车租赁信息表，汽车租赁信息表用来保存汽车租赁信息，表中包括汽车编号，出租天数，出租价格，租车人。汽车编号在这里是主键。 表 3-6 汽车归还信息表 字段名 数据类型 长度 主键否 功能描述 汽车编号 varchar 10 是 汽车编号 实际使用天数 char 10 实际使用天 实付金额 varchar 10 实付金额 经办人 varchar 2 经办人 回车公里数 varchar 10 回车公里数 如表 3-6 所示为汽车归还信息表，汽车租赁信息表表中包括汽车编号， 实际使用天数 ， 实付金额 ， 经办人，回车公里数 。汽车编号在这里是主键。 3.3 后台数据库的配置 系统数据库建立完成后，前台界面访问数据库时，需要控件访问后台数据库。Delphi7 中有 BDE 和 ADO 两个数据访问控件，在使用 Delphi 自带数据库 DataBase Desktop时，就用 BDE 控件访问。这里系统后台数据库设计采用了 SQL Server 2000，因此使用 ADO数据库控件访问 SQL Server 数 据库。 ADO 数据控件使用 Microsoft ActiveX Data Object（ ADO）快速地建立数据绑定控件和数据提供者之间的连接。使用 ADO 控件访问 SQL Server 数据库时，通常需要做以下几件事情： ADOQuery （ 1） Delphi中的 Form窗体或 Data Module 中添加 ADO数据控件； （ 2） 使用 ADO 数据控件连接到一个 SQL Server 数据库。 无忧无虑毕设网 ():毕业设计源码下载 毕业设计源码下载： 数据库连接模块如图 3-2所示。 图 3-2 数据库连接模块 1设计步骤 （ 1）在 Delphi 中选择“ File” /“ New” /“ Form”菜单项，新建一个数据模块，命名为“ Form1”。 （ 2）在“ ADO”组件页中点选“ ADOQuery”组件，添加到窗体上，用 ADOQuery 组件用到连接数据库上。 （ 3）点选 ADOQuery 1组件，在“ Object Inspector”窗口中，单击 ConnectionString属性右侧的【 】按钮， 弹出对话框如 图 3-3所 示 。 无忧无虑毕设网 ():毕业设计源码下载 毕业设计源码下载： 图 3-3 数据连接对话框 （ 4）单击【 Build】按钮，在弹出的对话框中的“提供程序”选项卡中设置希望连接的数据， 如图 3-4所示 。 图 3-4 连接属性对话框 （ 5）选择“连接”选项卡，设置连接相关设置， 如图 3-5所示。 无忧无虑毕设网 ():毕业设计源码下载 毕业设计源码下载： 图 3-5 连接属性对话框 （ 6）单击【测试连接】按钮，如果连接成功，则提示成功，单击【确定】按钮完成数据库的连接。 （ 7）这里需要指出的是，尽管 ADOTable 组件的属性、事件和方法与 Table组件非常相似，但还有不同之处，比如 Table组件有 findly方法，但在 ADOTable组件却取消了 findly 方法。 ADOQuary 组件的使用方法和 Query 组件类似，其ConnectionString 属性和 Connection 属性的设置与 ADOTable 组件同。值得注意的是，在程序中为参数赋值时和 Query组件稍有区别。一般情况下原来的赋值语句为：PararmByname( p1 ).value:=a1 ；而在 ADOQuery 中需要这样写：Parameter.ParaByname( P1 ).value： =a1；另外 原代码 中使用的 Prepare 方法在这里也不能再使用。 无忧无虑毕设网 ():毕业设计源码下载 毕业设计源码下载： 第四章 系统详细设计 4.1 开场 FLASH 模块设计 开场 flash 模块是系统运行是先弹出的一个 flash 图片模块，该模块上面设置了定时控件， 5秒后会自动跳转到登陆界面，或者手动点该 flash模块也可以直接进入登陆界面。如图 4-1所示，为开场 fiash模块。 图 4-1 Flash 模块 整个 flash模块使用的控件为 Additional 中的 Image控件和 System 中 Timer 控件。首先 点选 Tmage 组件，在“ Object Inspector ”窗口中，单击“ Align”选择其“ alClient ”属性，即设置该控件占布整个 Form 窗口，然后点“ picture”可以添加所需要的图片；点下 Timer 控件在“ Object Inspector ”窗口中名其“ Name”为“ Timer1 ” 在 Timer控件的单击事件中添加如下代码： procedure Tflash.Timer1Timer(Sender: TObject)； 无忧无虑毕设网 ():毕业设计源码下载 毕业设计源码下载： begin inc(itime)； /计算时间， 5秒后自动关闭 if itime=5 then begin timer1.Enabled := false； flash.Visible := false； close； end； end； procedure Tflash.Image1Click(Sender: TObject)； begin close； /点击界面 ,flash关闭 end； procedure Tflash.FormClose(Sender: TObject； var Action: TCloseAction)； begin Action := cafree； end； end. 4.2 登录模块设计 系统登陆实现了整个系统中权限检查，管理员输入用户名和密码口令，便可登陆系统进入系统主界面。 系统登录主要用于对进入汽车租赁公司管理系统的用户进行安全性检查，阻止非法用户进入该系统。验证操作员及其密码，主要通过记录集结果（ RecordCount）结合 If语句判断用户选定的操作员及其输入的密码是否符合数据库中的操作员和密码 ，如果符合则允许登录，否则提示用户用户名或密码不正确。 如图 4-2所示，为系统登陆界面 无忧无虑毕设网 ():毕业设计源码下载 毕业设计源码下载： 图 4-2 登陆系统模块 整个系统登陆界面使用的 Delphi 控件是 Standard 选项卡中的 Edit、 Lable 和Button。单击运行的 Button，激发 Button1 Click 事件，对 Button1 Click 事件下进行编写 代码，这里的编程思想是，把要写入用户名和密码相对应的两个 Edit 中的字符串与登陆密码表中的用户名、密码进行查找，查找完毕后并进行比较大小，如果相等，则布尔变量为 true，则弹出主界面窗口。否则的话，系统弹出提示信息，“登录身份或密码错误！”。此外在程序中添加管理员权限的语句，使管理员和普通用户进入界面实现功能不一样。 在【确定】按钮的单击事件中添加如下代码： procedure Tlogin.Button1Click(Sender: TObject)； begin if (edit1.Text) and (edit2.Text) then/登录身份与密码不为空则查询 begin with login.ADOQuery1 do begin close； sql.Clear； sql.Add(select * from denglu where 登录身份=+edit1.text+ and 登录密码 =+edit2.text+)； open； if eof then /查询不到满足条件的记录 无忧无虑毕设网 ():毕业设计源码下载 毕业设计源码下载： showmessage(登录身份或密码错误 ) else begin ModalResult := mrOK； /查询到了就返回 mrok if (login.ADOQuery1.FieldByName(级别 ).AsString=管理员 )then begin teac_info.GroupBox3.Visible:=true； teac_info.GroupBox4.Visible:=true； teac_info.GroupBox5.Visible:=true； pro_info.GroupBox3.Visible:=true； pro_info.GroupBox4.Visible:=true； pro_info.GroupBox5.Visible:=true； end else begin teac_info.GroupBox3.Visible:=false； teac_info.GroupBox4.Visible:=false； teac_info.GroupBox5.Visible:=false； pro_info.GroupBox3.Visible:=false； pro_info.GroupBox4.Visible:=false； pro_info.GroupBox5.Visible:=false； cla_info.GroupBox3.Visible:=false； cla_info.GroupBox4.Visible:=false； cla_info.GroupBox5.Visible:=false； huiyuan.GroupBox3.Visible:=false； huiyuan.GroupBox4.Visible:=false； huiyuan.GroupBox5.Visible:=false； end； end； end； end else showmessage(登录身份和密码不能为空 ) end； 在【取消】按钮的单击事件中添加如下代码： procedure Tlogin.Button2Click(Sender: TObject)； begin Application.Terminate； end； 系统登录流程图如图 4-3所示。 无忧无虑毕设网 ():毕业设计源码下载 毕业设计源码下载： 图 4-3 系统登录流程图 4.3 主窗体的设计 在登陆窗体中输入用户名和正确的密码口令后，系统弹出主窗体。 主窗体中主要控制方式是通过菜单和工具栏按钮来调用子窗体，汽车租赁公司管理系统主窗体运行结果如图 4-4所示 。 无忧无虑毕设网 ():毕业设计源码下载 毕业设计源码下载： 图 4-4主体窗口模块 在菜单设计器中，按照系统功能需求，添加了五组功能选择菜单，分别为功能选项（包括类型信息、保险公司信息、车辆信息等）、系统管理（密码修改）、客户信息管理（客户信息、会员信息）、日常业务管理（汽车租赁、汽车归还）、退出系统（退出系统）。 程序设计思想是，主窗体统一对系统中 8个子窗体进行调度，并且每个子窗体的功能都不相同。双击 Main3. Sui.MainMenu1(菜单编辑器 )中的下拉菜单， 在Tmain.N2Click下编写程序，实现单击菜单选项弹出一个子窗体，一般用 form.show、form.BringToFront 或 form.showmodal语句 。 特别注意的是 ， 在调用一个子窗体时，必须在 implementation 后引用这个子窗体的单元。 4.4 系统管理模块的设计 此模块即为 修改密码模块。 这个模块可以使登陆用户自主修改自己的登陆密码。如图 4-5所示 无忧无虑毕设网 ():毕业设计源码下载 毕业设计源码下载： 图 4-5密码修改模块 这个模块使用的空间和登陆模块是一样的。 4.5功能选项模块的设计 此模块包含类型信息、保险公司信息、车辆信息。 4.5.1类型信息窗体 类型信息 窗体 界面见图 4-6所示。 此界面的作用是汽车类型的基本信息，可以进行查询、修改、添加、删除。 图 4-6 类型信息模块 无忧无虑毕设网 ():毕业设计源码下载 毕业设计源码下载： 类型信息界面使用的 Delphi控件是 Standard选项卡中的 Edit、 Lable和 Button。单击运行的 Button，激发 Button Click 事件，对 Button Click 事件下进行编写代码，这里的编程思想是，把要写入用汽车编号和汽车品牌相对应的两个 Edit 中的字符串与类型信息表中的用进行查找。 这里还用到 Data Controls 中的 DBGrid 的控件和 Data Access 中的 DataSource控件以及 ADD中的 ADOQuary 控件来连接数据库显示类型信息表。 步骤： （ 1）在 Delphi 中选择“ File” /“ New” /“ Form”菜单项，新建一个数据模块，命名为“ teac_info4”； （ 2）在 Form上添加 DBGrid 、 DataSource 、 ADOQuery 组件； （ 3）点选 DataSource1 组件，在“ Object Inspector”窗口中，单击 DataSet 属性右侧选择 ADOQuery1； （ 4）点选 ADOQuery1 组件， 在“ Object Inspector”窗口中，单击 ConnectionString属性右侧的【 】按钮连接数据库，接着单击 SQL属性窗口添加程序： select * from leixing语句； （ 5）点选 DBGrid1 组件， 在“ Object Inspector”窗口中，单击 DdataSource 属性选择 DataSource1。 上图为管理员权限用户进入系统界面，普通权限用户只能进行查询等功能。如图4-7 所示： 图 4-7 普通权限用户进入界面 无忧无虑毕设网 ():毕业设计源码下载 毕业设计源码下载： 普通 用户和管理员用户界面比少了添加、修改、删除等功能。他是通过登陆界面中的一段权限程序来实现的。具体如下： if (login.ADOQuery1.FieldByName(级别 ).AsString=管理员 )then begin teac_info.GroupBox3.Visible:=true； teac_info.GroupBox4.Visible:=true； teac_info.GroupBox5.Visible:=true； end else begin teac_info.GroupBox3.Visible:=false； teac_info.GroupBox4.Visible:=false； teac_info.GroupBox5.Visible:=false； end； end； 这个是通过屏蔽 teac_info4上的 3个 GroupBox 组件来实现的。 4.5.2保险公司信息窗体 保险公司信息模块是对汽车编号，公司名称，负责人，保险资金等进行添加、修改、查询、删除、浏览。 4.5.3车辆信息窗体 车辆信息管理模块是对汽车编号，汽车颜色，车牌号码，车辆类型等一些查询、修改的模块。如图 4-8所示： 无忧无虑毕设网 ():毕业设计源码下载 毕业设计源码下载： 如图 4-8 车辆信息模块 4.6客户管理模块的设计 此模块包含客户信息、会员信息。 4.6 1 客户信息模块 客户信息模块：客户信息包括客户编号，客户姓名，年龄，性别，电话。 此模块就是对模块中信息的各种处理 。 4.6 2 会员信息模块 会员信息模块是对客户编号，会员姓名，年龄，性别，电话等信息的查询、修改、添加、删除等。 如图 4-9所示： 图 4-9 会员信息模块 整个会员信息界面使用的 Delphi 控件是 Standard 选项卡中的 Edit、 Lable、Button以及一些连接数据库的控件。单击运行的 Button，激发 Button1 Click事件，对 Button1 Click 事件下进行编写代码，代码如下： procedure Thuiyuan.Button8Click(Sender: TObject)； begin adoquery1.Close； 无忧无虑毕设网 ():毕业设计源码下载 毕业设计源码下载： adoquery1.SQL.clear； adoquery1.SQL.Add(select * from huiyuan )； adoquery1.Open； end； procedure Thuiyuan.Button7Click(Sender: TObject)； begin adoquery1.Post； showmessage(修改成功 )； end； procedure Thuiyuan.Button6Click(Sender: TObject)； begin adoquery1.Edit； end； procedure Thuiyuan.Button5Click(Sender: TObject)； begin adoquery1.Delete； showmessage(修改成功 )； end； procedure Thuiyuan.Button3Click(Sender: TObject)； begin adoquery1.Append； end； procedure Thuiyuan.Button4Click(Sender: TObject)； begin adoquery1.Post； showmessage(修改成功 )； 无忧无虑毕设网 ():毕业设计源码下载 毕业设计源码下载： end； procedure Thuiyuan.Button2Click(Sender: TObject)； begin adoquery1.Close； adoquery1.SQL.clear； adoquery1.SQL.Add(select * from huiyuan where 会员姓名=+edit2.text+)； adoquery1.Open； end； procedure Thuiyuan.Button1Click(Sender: TObject)； begin adoquery1.Close； adoquery1.SQL.clear； adoquery1.SQL.Add(select * from huiyuan where 客户编号=+edit1.text+)； adoquery1.Open； end； procedure Thuiyuan.FormClose(Sender: TObject； var Action: TCloseAction)； begin Action := cafree； end； procedure Thuiyuan.FormCreate(Sender: TObject)； begin adoquery1.Open； end； 无忧无虑毕设网 ():毕业设计源码下载 毕业设计源码下载： procedure Thuiyuan.SpeedButton1Click(Sender: TObject)； begin huiyuan.Hide； end； end. 4.7日常业务管理模块的设计 这个模块包括汽车租赁模块和汽车归还模块。 4.7 1 汽车租赁模块 汽车租赁信息包括汽车编号，出租天数，出租价格，租车人。 该模块是对其进行查询、添加 、修改、删除、浏览。 4.7 2 汽车归还模块 汽车归还信息模块：汽车归还信息包括汽车编号，实际使用天数，实付金额，经办人，回车公里数。汽车归还模块运行后显示 如下图 4-10所示： 图 4-10 汽车归还信息模块 1. 窗体设计步骤 （ 1） 新建一个窗体，命名窗体为 “ guihuan” ,设置“ caption”属性为无忧无虑毕设网 ():毕业设计源码下载 毕业设计源码下载： “ guihuan ”。 （ 2） 在“ standard”组件中选择“ GroupBox”组件，在窗体上添加 3 个“ GroupBox” 组件，分别命名 为“ GroupBox1”， “ GroupBox2”， “ GroupBox3”。 （ 3） 将 3个 “ GroupBox”组件的“ caption”属性分别设置为“按编号查询”，“按负责人查询”，“按里程查询”。 （ 4） 在每个“ GroupBox”组件上添加“ standard”组件中“ Edit”组件和“ Button”组件，把“ Edit”组件中的“ Text”设置为空白，“ Button”组件的“ caption”属性为“确定”。 （ 5） 在窗体“ guihuan”中添加 Data Controls 中的 DBGrid 的控件，打开其“ Columns”属性，在里面添加表信息，如图 4-11所示： 图 4-11 （ 6） 在窗 体“ guihuan”中添加 DataSource1 、 ADOQuery1 组件，点选 DataSource1 组件，在“ Object Inspector”窗口中，单击 DataSet属性右侧选择 ADOQuery1；点选 ADOQuery1 组件， 在“ Object Inspector”窗口中，单击 ConnectionString 属性右侧的【 】按钮连接数据库，接着单击 SQL属性窗口添加程序： select * from leixing 语句；最后点选 DBGrid1 组件， 在“ Object Inspector”窗口中，单击 DdataSource属性选择 DataSource1。 2 查询程序的设计 在 Delphi 中是通过 ADOQuery 控件来实现 对 SQL 语言支持的，也就是说用 Delphi 开发数据库应用程序时，使用 SQL语言操作数据库中的数据的唯一途径是经过 ADOQuery无忧无虑毕设网 ():毕业设计源码下载 毕业设计源码下载： 控件。 ADOQuery控件是一个数据集控件，它在 Delphi控件选择板上的 ADO上，它与DED上的 TTable控件一样具有很多共同的特性，而同时它提供了比 TTable控件更加强大的数据库操作功能。 ADOQuery 控件在 SQL 编程中占据了十分重要的位置。它实现了 Delphi 对 SQL 语言的支持，在 Delphi 开发的数据库应用中， SQL 语句是通过ADOQuery 控件传递到要访问的数据库系 统的数据库引擎中，由数据库引擎具体执行SQL语句，以实现对数据的操作。在本程序的设计中，主要采用动态的 SQL语句，根据输入的查询条件的不同，将查询条件按照参数的形式传递到 SQL语句中，通过执行SQL语句查询出符合条件的记录。 procedure Tguihuan.Button2Click(Sender: TObject)； begin adoquery1.Close； adoquery1.SQL.clear； adoquery1.SQL.Add(select * from guihuan where 汽车编号=+edit1.text+)； adoquery1.Open； end； procedure Tguihuan.Button3Click(Sender: TObject)； begin adoquery1.Close； adoquery1.SQL.clear； adoquery1.SQL.Add(select * from guihuan where 经办人=+edit2.text+)； adoquery1.Open； end； procedure Tguihuan.Button4Click(Sender: TObject)； begin adoquery1.Close； adoquery1.SQL.clear； 无忧无虑毕设网