四队和一队三区

摘向，对自动派车流程进行分析和研究，并以Delphi7.0和Access2013、该系统完成了车辆使用申请和调度管理所需的功能，实现了车辆、 ：车辆管理，调度，数据库，自动Withthedevelopmentofarmed diversitytask,vehiclemanagementandthetraditionalschedulingmethodsarefacingmoreandmoreprominentproblemintheinformationage.Inordertosatisfythedemandofinformationconstructionofthearmed,informationsuchasmodernnetworktechnology,databasetechnologyandcommunicationtechnologyarefullyused.Thevehicleinformationmanagementmodeisbuilttoimprovethequalityandefficiencyofvehiclemanagement.Inthisthesis,basedontheprocessofArmed’susingvehicle,theArmedtothevehiclemanagementinformationasthemainresearchdirection，themethodofdispatchingvehicleonthreesidesispresented.BasedonDelphi7.0andAccess2013,themethodofdispatchingvehicleonthreeisrealizedbyprogrammingandbuildcorrespondingdatabase.Fortheauthorityofdifferentusers,differentsubsystemsareestablished.Statisticsandprocessingofdataarecompletedbythedatabaselink.Andthedispatchingvehiclebasedonnetworkisalsorealized.Thesystemrealizesthefunctionofvehiclemanagement,whichtrulyrealizestheautomation,thenetwork-realization,theinligence-realizationandtheinformation-realization.Theapplicationofthesystemcansavealotofmoney.ItisverysignificanttoimprovetheefficiencyandArmed’sbattleeffectiveness,andithastheverystrongpracticalsignificancetoimprovethearmyvehicletimelyand【】Vehiclemanagement,Dispatchingvehicle,Database 引1.1车辆管理发展现传统的车辆管理和调度方法在信息化时代所的问题越来越突出并且已，、随着遂行任务的不断增多在执行、处突等多样化重要性日益凸显。车辆的科学规范管理,既是日常管理工作的一部分,更是关乎安全稳定、确保任务顺利完成的重点。，、应用程序的开发，以及数据库的建立和。快捷的查询，从而解决了传统人工方式调度管理车辆效率低、可操作性差，查找、更新和等诸多问题自动派车系统的研制实现了车辆使用申请和调度管理所需的功能可以使车辆管理工作达到网络化信息化、自动化和智能化。该系统的开发应用，可以减少重复劳动，提高工作效率和的保障能力，预防车辆事故，还可以为节约大量经费，对提高。路和方法，以及具体的设计过程。主要做了以下工作：DelphiAccess数据库管理系统，讨论了常用数据方法，选择ADO作为数据接口；根据车辆管理和使用现状，以车辆派遣过程为基础，提出结合实际，设计出派车的流程算法，并以此算法为基础，建立了派车的流程图，作为最后系统设计的依据；统的功能设计，并利用Access2013建立相应的数据库。对车辆调度使用的信息进行处理最后通过数据库的实现数据的统计和处理，本Delphi7.0的集成环境界时还包括Access2013及其语言的简单介绍。第二章Delphi7.0DelphiWindows平台著名的快速应用程序开发工具。它的前身，即是（IDE由传统PascalObjectPascal，以图形用户界面为开发环境，透过2-1所示[5]。 Delphi7.0集成开发环境主界Delphi7.0在这块画布上可以描绘各种各样的windows应用程序。应用程序的用户界面是ObjectInspector和代码编辑器来控制组件的行为和外观。Delphi根据应用程序中对象编辑器（ObjectDelphi集成开发环境的左下部。其主要功能是查看和修改组件属性，并可以为组件定制不同的响应。在菜单中依次选择“View”→“ObjectInspector”菜单项或直接按“F11”键便可打开对象编辑器。其中属性2-22-2页2-3页 对象浏览FileEditDelphi7程序开发的全部功能和命令。 主菜位于主窗口的左下部，其中包括许多执行命令快捷按钮，如图2-2-43） 组件面组件面板其实是一个组件，位于主窗口右下部，包括“Standard“Additional“Win32 组件面系统数据接口的选Delphi数据接口有：ADO（ActiveXDataObject、BDE（BorlandDatabaseEngine、ODBC（OpenDatabaseConnectivity,开发数据库连接。ADO（ActiveXDataADO（ActiveXDataObject）是微软提供对各数据格式的接口（high-interface成，通过OLE.DB数据提供者数据库中数据。ADO提供了另外，它还允许用户使用数据库中各种系统资源。结合Delphi本身开放式数据Degrade，DebitBDEInternetADO，Delphi7.0能够让用户快速ADO所支持的数据库。BDEBorland独家支持的，在编程时用户只需要调用控件所提供的接口要bedpans，在源代码的uses段加入bed即可。微软ODBCOracle、Sybase等，提供了一种统一方案。ODBC内含的驱动程序与具体数据库有关，一个驱动是一个支持ODBC调用的函数模块。用户是通过调用驱动程序提供的接口函数来数据ODBCODBC最大的优点是能以统一的方式处理所有的数据库[6]。通过比较各种接口，我选择在本次毕业设计中使用ADO技术数据库。因为它提供了一个一致的、高兼容性的、高性能的数据接口。它既能实现数据库前端创建，还可以能实现中间层的设计。ADO应用范围涵盖了从一层到多WebADO提供了比OLE.DB更容易使用的接口，优化的数据，减少了网络负载和Delphi7.0的组件面板提供了多个组件，组件可以在组件面板上选择的，在窗体代码窗口和设计窗口中操作的元素，并且可以为其编写一定的处理代码，从而满足一定的功能需求。实际编程中，组件能插入Delphi开发环境的任TTimer是数据库开发程序中经常要使用的部件，它起接作用，自身没有太多的属性、和方法。TAOonntion组件：TAOonntion类封装连接对象，使用其可连接到的数据库。使用TAOonntion用其属性控制记录锁定计划、指针位置、光标类型、级别和连接超时的属性。以执行数据定义语句DDL（DataDefineLanguage），或者执行不需要返回结果的过程。TADOQuery组件：该组件是通过SQL语句实现对数据库数据的操作及提取，它可以直接运行数据定义语言（DDL），比如CREATE、ALTER、DROP等SQL命令。Tsavedialog组件：该组件类封装windows的“另存为”框，它允许用户Access2013OfficeAccess是微软把数据库引擎的图形用户界面和软件开发工 OfficeAccess2013主界面用来进行数据分析：access有强大的统计分析能力、数据处理，利用access用以开发软件，比如生产管理、库存管理、销售AccessBasic提供了丰富的开发环境。这个开发环境具有足够的灵活性并对Windows应用程序接口的控制方便，同时免遭用高级或低级SQLSQL语言即结构化查询语言,是关系数据库管理系统的标准语言。它是1974BoyceChamberlin提出。它是一种介于关系演算与关系代数之间的1975年~1979年IBM公司SanJoseResearchLaboratorySystemR并实现了该语言。由于它功能丰富，语言简捷倍SQL语言功能强大,DCLDDL和数据操作语言DML几个部分DML语言主要是用来数据库中的数据的,它包括一组用来数据库SQL语句,分别是用于检索数据的SELECT、从数据库删除数据的DELETEINSERTUPDATE。SQL语言是集数据查询、数据、数据定义、数据控制功能于一体，SQL语言使用广泛,是非过程化查询语言,不需要说明如何完成一个功能,只需描述需要什是使用查询优化器,可以查询配置一种最优的方Delphi7和技术以及便捷的Internet编程技术。最后是系统数据库的接口和所使用组OfficeAccess2013环境及其用途和优势进行了阐述，对SQL语3.1.1派车流程分要需要完成三个步骤，完成一次派车的流程可以概括为：，第二步：单位签字，由分管用车的单位进行，根据用户需求查阅后，如果同意使用申请，则将申请单递交给车辆调度中心进行车辆，第三步在申请和完成后车场管理员根据已批准申请单进行车辆查询，3-1NYNNYY 派车流程字系统、车辆调度管理系统。签字子系签字子系统为各单位分管用车的提供工作平台通过个人账号功能，方便集中了解各单位车辆申请情况。，车辆调度子系统的用户为车队的车辆管理员，登录系统后数据库提供信息，管理员的主要工作是对通过，用户登录表，每个子系统都需要建立相应的表用户信息（表3-3-1ID（主码8（3-3-2883-3便尽心，并将记录保存，供车场调度管理使用（表3-3）3-38（3-4）3-4883-3-583-3-63-2YNNY3-3Delphi7.0图3- 申请用车子系统登录界

图3- 申请表填写界图3- 申请情况查询界签字子系根据以上章节对签字的功能分析，可将签字子系统处理流程归纳如NYYYNNNYYN情况改 不同图3- 签字处理流结合签字流程，利用Delphi7.0对系统的各个界面进行设计签字界

图3- 签 子系统登录界图3-9 签字子系统界面NYYNNNYYYNN 字段进展情况 已签Y图3- 车辆调度处理流Delphi7.0图3- 调度管理子系统登录界图3- 调度管理子系统调度界图3- 调度管理子系统人员信息管理界图3- 调度管理子系统车辆信息管理界责的签字通过后由车队的车辆调度员根据车辆使用情况对车辑结构进行设计，建立数据库，实现对各种信息的集中处理。最后，是对派录的信息分别进行流程派车中的用车申请、申请单和车辆调度。最终实现三第四章定的基础经过老师耐心细致的指导与交流同时翻阅了大量的资料(包括专业知识及车辆管理的一些相关资料)，经过近一个月的努力，本文首先分析了车辆管理现状，其次对Delphi7.0OfficeAccess2013以及组件的选择做了概要的介绍。结合的用车实际及相关规定，分析、设计了自动派车系统，其功能基本符合用户需求，、要，也是解决车辆管理实际问题的需要。本系统的实现，弥补了部队车辆管理信息化的空白，实现车辆的使用申请和调度管理等功能，可以使车辆管理工作网络化，自动化和智能化。该系统的开发应用，可以减少重复劳动，提高工作效率和的保障能力，预防车辆事故，还可以为节约大量经费，对提高车辆调度的实效性和科学性具有很强的现实意义、本次毕业设计在指导老师的大力支持和引导下,并通过与广泛地交毕业设计是从学员工作岗位的一大转折点在提高自己动手能力的同时，也出基础知识扎根不牢等诸多问题。毕业是人生一个新的起点，我要正确认识自己存在的不足，勇于面对，不断提高自己的学习能力，丰富文化知识，[1]李江平、李，车辆和驾驶员管理指导，大学，2012[2]王明申、刘明琴，车辆管理模式分析，学报，2000[5]求是科技，Delphi7程序设计与开发技术大全，人民邮电,2004[6]何鹏飞，Delphi7程序设计，，2003[7]求是科技，Delphi7信息管理系统开发，人民邮电，2005[8]王沛，Delphi7.0编程篇，机械工业，2006[9]侯太平、童爱红，Delphi7.0数据库编程，[10]肖庆航、陆定淑，Delphi7.0数据库开发，，2004[11]萨师煊，数据库系统概论，高等教育,2006[12]张海藩、牟永敏，软件工程导论（第6版，,2008[13]本社，Access2013从 致同时还要感谢和我做相似题目、使用相同开发软件的同学，我们一起共最后，还要感谢在百忙之中为我的审稿的各位老师。附procedureTfrmlogin.FormCreate(SenderTObject);withdm.querysql.Add('select*fromtb_users1');whilenotEofdoprocedureTfrmlogin.BtnLoginClick(Sender:TObject);withdm.querydosql.Add('select*fromtb_users1whereUsername=:UNandPassWord=:PW');ifrecordCount<1thenMessageBox(handle,'对不起！用户名或错误！','提示procedureTMAIN.Button1Click(Sender: sql:='insertintosql:='insertintoprocedureTMAIN.Button3Click(Sender:TObject); procedureTForm2.FormShow(Sender:TObject);edit1.Text:=withADOQuery1doSQL.Add('select*from表procedureTForm2.Button1Click(Sender:TObject);withADOQuery1do 表 申请单位 procedureTForm2.Button6Click(Sender:TObject);ifADOQuery1.FieldByName('申请单位').AsString签字子系统登录界面主要代码procedureTfrmlogin.FormCreate(Sender:TObject);withdm.querydosql.Add('select*fromtb_users2');whilenotEof // procedureTfrmlogin.BtnLoginClick(Sender:TObject);withdm.querydosql.Add('select*fromtb_users2whereUsername=:UNandPassWord=:PW');ifrecordCount<1thenShowmessage('对不起！用户名或错误签字子系统界面主要代码：procedureTForm2.FormShow(SenderTObject);edit1.Text:=withADOQuery1doSQL.Add('select*from表procedureTForm2.Button1Click(Sender:TObject);withADOQuery1do 表 申请单 procedureTForm2.Button6Click(Sender:TObject);ifADOQuery1.FieldByName('申请单位').AsStringprocedureTfrmlogin.FormCreate(Sender:TObject);withdm.querydosql.Add('select*fromtb_users3');whilenotEofdoprocedureTfrmlogin.BtnLoginClick(Sender:TObject);withdm.querydosql.Add('select*fromtb_users3whereUsername=:UNandPassWord=:PW');ifrecordCount<1thenMessageBox(handle,'对不起！用