delphi酒店管理系统毕业设计

DELPHI酒店管理系统毕业设计摘要酒店宾馆作为一个服务性行业,从客房的营销即客人的预定开始,到入住等级直至最后退房结账,整个过程应该能够体现以宾客为中心,提供快捷、方便的服务,提高酒店的管理水平,简化各种复杂操作,在最合理、最短的时间内完成酒店业务的规范操作。虽然信息化并不是酒店走向成功的关键元素,但它可以帮助那些真正影响成败的要素发挥更大的效用。因此,采用全新的计算机网络和管理系统,将成为提高酒店的管理效率,改善服务水准的重要手段之一。酒店行业的激烈竞争使得争取客源、提高酒店满员率、指定正确营销策略已经成为一项重要的任务,而借助于当前蓬勃发展的IT工具来拓展销售能力,创造可观的经济效益已经成为许多酒店的首选。作为一种有效的统计分析手段,计算机管理系统发挥了其强大的优势,在数据保存、数据交换等方面均快速可靠,这是手工操作无法实现的。本系统使用DELPHI和SOLSRVER2000开发而成。本文设计的酒店管理系统,包括基础设置,预定管理和房态管理三个部分,实现了基本的计算机管理系统的要求。关键词酒店管理基础设置酒店预定管理房态管理ABSTRACTHOTELASASERVICEINDUSTRIES,FROMTHEMARKETINGISTHEGUESTROOMRESERVATION,CHECKINLEVELTOCHECKUNTILTHECHECKOUT,WHOLEPROCESSSHOULDBEABLETOEMBODYTHEGUESTSASTHECENTER,PROVIDEQUICK,CONVENIENTSERVICE,IMPROVETHELEVELOFMANAGEMENT,SIMPLIFYCOMPLICATEDOPERATION,THEMOSTREASONABLE,INTHESHORTESTTIMEOFCOMPLETEHOTELBUSINESSSTANDARDOPERATIONALTHOUGHINFORMATIZATIONANDNOTTHEKEYELEMENTSOFTHEHOTELTOSUCCESS,BUTITCANHELPTHOSEWHOREALLYAFFECTTHESUCCESSOFFACTORSPLAYAGREATERUTILITYTHEREFORE,USINGNEWCOMPUTERNETWORKANDMANAGEMENTSYSTEM,IMPROVETHEMANAGEMENTWILLBECOMEEFFICIENCYANDIMPROVETHESERVICELEVELISONEOFTHEIMPORTANTMEANSTHEHOTELINDUSTRYCOMPETITIONFORTOURISTS,IMPROVETHEHOTELTHATWERECORRECT,DESIGNATEDMARKETINGSTRATEGYHASBECOMEANIMPORTANTTASK,ANDWITHTHEVIGOROUSDEVELOPMENTOFTOOLSTOEXPANDSALESABILITYOFIT,CREATECONSIDERABLEECONOMICBENEFITSHASBECOMETHEPREFERREDHOTELSASANEFFECTIVEMEANSOFSTATISTICALANALYSIS,THECOMPUTERMANAGEMENTSYSTEMFORTHESTRONGSUPERIORITY,DATASTORAGEANDDATAEXCHANGEINSUCHASPECTSASFASTANDRELIABLE,ITISIMPOSSIBLETOREALIZETHEMANUALOPERATIONTHISSYSTEMUSESDELPHIANDSOLSRVER2000DEVELOPMENTTHISPAPERDESIGNSTHEHOTELMANAGEMENTSYSTEM,INCLUDINGTHEBASISSET,MANAGEMENTANDROOMMANAGEMENTDEPARTMENT,REALIZETHEBASICCOMPUTERMANAGEMENTSYSTEMREQUIREMENTSKEYWORDSHOTELMANAGEMENT,BASICCONFIGURATION,HOTELMANAGEMENT,ROOMMANAGEMENT目录引言1第一章系统的分析211开发环境简介2111SQLSERVER2000数据库2112DELPHI70的开发环境212本次设计任务及要求213系统的功能需求2131功能概述3132用户环境4133其他要求4134需求分析414系统的性能需求6141系统的用户界面6142系统的可靠性和稳定性6143系统的开放性6144系统的易维护性7第二章系统的总体设计821静态数据8211业务流程图8212系统ER图922数据库信息表10第三章系统的详细设计1531系统模块的功能设计15311创建工程15312创建系统主窗体1532完成客房类型设置功能2233完成客房信息设置功能2534完成房态管理功能3335完成预订管理功能3436编译并运行系统37第四章系统的使用说明3841系统的服务器架设3841酒店管理系统的启动和运行38结论40参考文献41谢辞42引言在信息高度发达的今天,酒店业务涉及的各环节已不再仅仅是传统的住宿、结算业务,而是更广泛、更全面的服务性行业代表。酒店宾馆作为一个服务性行业,从客房的营销,即客人的预定开始,到入住登记直至最后退房结账,整个过程应该能够体现以客人为中心,提供快捷、方便的服务,令客人感受到一种顾客至上的享受,提高酒店的管理水平,简化各种复杂操作,在最合理最短时间内完成酒店业务规范操作,这样才能令客人舒适难忘,增加客人回头率。面对酒店业内激烈的竞争形势,各酒店均在努力拓展其服务领域的广度和深度。虽然信息化并不是酒店走向成功的关键元素,但它可以帮助那些整整影响成败的要素发挥更大的效用。因此,采用全新的计算机网络和管理系统,将成为提高酒店的管理效率,改善服务水准的重要手段之一。本系统设计的主要目标是设计一个面向中小型酒店的简单易用的酒店管理系统。前台以DELPHI为开发工具,设计软件的界面和各个功能模块后台使用SQLSERVER2000进行系统数据库的连接和管理。本系统基本包含了酒店主要业务功能,其分为基础设置、业务管理、房间管理三大部分。基础设置中有客房类型设置、客房信息设置功能业务管理包含预定管理、入住管理、消费记帐和收银退房功能房间管理可以根据实际需要设置和及时更新房间状态。第一章系统的分析11开发环境简介111SQLSERVER2000数据库MICROSOFTSQLSERVER2000是一个关系数据库管理系统,还是典型的客户机/服务器结构的数据库系统。SQLSERVER2000工具和实用程序包括企业管理器、服务管理器、查询分析器、事件探查器、导入和导出数据、服务器网络使用工具、客户端网络使用工具、联机帮助文档。其中,做常用的是企业管理器,它可用于管理SQLSERVER服务器建立与管理数据库建立与管理表、视图、存储过程、触发程序、角色、规则、默认值等数据库对象,以及备份数据库、恢复数据库等。112DELPHI70的开发环境DELPHI是BORLAND公司研发的可视化软件开发系统,其DELPHI7是最成熟的一个版本。它基于OBJECTPASCAL语言,具有语法眼镜、结构清晰、可读性强和代码执行效率高等优点。DELPHI采用了可重复利用的面向对象的程序设计、组件化的变成方式,并提供高度集成化的图形用户界面设计工具、时间驱动的程序设计方法和先进的数据库技术等许多先进特性和设计思想。随着应用的深入,DELPHI7已经成为基于WINDOWS操作系统的程序设计主流语言之一。12本次设计任务及要求本次设计旨在设计一个酒店管理系统,该系统主要包括以下内容基础设置包括客房类型和客房信息设置。预定管理用于管理客户的预定业务。房态管理包括查询当日酒店实时房态、修改客房的状态。系统应具有良好的可操作性、可靠性、健壮性和可维护性。系统的功能需求本系统采用面向对象和结构化程序设计思想相结合的方法进行系统的设计开发。由于窗体和组件也是一个类,所以在进行用户界面的设计时,我们同样需要从面向对象的角度来考虑。面向对象设计方法以对象为基础,解决了传统结构化开发方法中客观世界描述工具与软件结构的不一致性问题,缩短了开发周期,解决了从分析和设计到软件模块结构之间多次转换映射的繁杂过程。结构化设计方法是把程序被划分成许多个模块,这些模块类似为一个树型结构。这棵树的根就是主模块,叶子就是工具模块和最低级的功能模块同时,这棵树也表示调用结构。每个模块都调用自己的直接下级模块,并被自己的直接上级模块调用。对上述各项功能进行集中、分块、按照结构化程序设计的要求,设计系统功能模块图。131功能概述根据前面介绍的酒店管理的业务流程和信息化管理的目标,一个通用的酒店管理系统应包含图11所示的功能,其中每个功能都由若干相关联的子功能模块组成。除此之外系统还应该包括信息系统必须具备的通用功能,例如权限设置、数据备份与恢复等。图11酒店管理系统功能结构图基础设置功能管理酒店客房预订功能管理房态功能更新客房的相关信息前台接待管理功能前台收银管理功能报表管理功能此外,当不需要使用系统的上述功能时,也可退出系统。132用户环境服务器硬件要求处理器PENTIUM3以上内存512MB硬盘40G服务器端软件要求操作系统WINDOWS2000或WINDOWSXP数据库服务器MICROSOFTSQLSERVER2000客户端软件要求操作系统WINDOWS2000或WINDOWSXP开发工具DELPHI70和MICROSOFTSQLSERVER2000133其他要求访问容量最大并发用户数为100134需求分析酒店管理系统主要划分为客房类型设置模块、客房信息设置模块、预订管理模块、房态管理模块三个部分。而在系统的详细设计中,要求对每个模块的具体功能进行设计,为之后的界面设计及程序代码实现提供依据。1基础设置“基础设置”用于对客房类型,客房价格,客房信息,系统参数等项目进行初始化设置,并且这些设置不经常发生变动。包含的功能模块如下图所示图12“基础设置”功能模块“客房类型设置”用于设置本酒店客房的分类信息,内容包括房类名称、房价、可预订数等。“客房信息设置”用于设置客房的初始信息,包括房间号、房类编号、楼层、额定人数、房间特征备注等。“房价设置”用于设置房价的折扣信息,内容包括折扣名称种类、折扣额度、房类编号、折后房价、折扣有效时间等。“系统参数设置”用于设置管理系统的各种参数值,例如酒店名称,房态显示模式等。2预订管理“预订管理”用于管理客户的预定业务,包含以下功能模块图13“预订管理”功能模块“来宾预订”包括散客和团体进行预订管理,主要信息包括房类、房间数、房价、入住日期和对预订房间进行排房,入住等。“预订查询”用于查询客户的预定情况。“修改预订”用于对预订资料进行重新修改操作。“房态表”用于查询当日酒店实时房态,可进行开房、登记、留言、换房等各项工作。“可预订客房表”用于按照房类统计各种房间类型的可预订情况。3房态管理“房态管理”用于管理客房信息和客户住宿历史的信息,并且还可用于查询酒店目前可以使用的客房和酒店当前的房态,同时该模块还可以对房态为维修房的客房情况、房态为在住散客的客房情况、房态为在住团的客房情况以及房态为其他状态的客房情况进行统计分析。其包含的功能模块如图14所示。图14“房态管理”功能模块“可用房间查询”用于查询目前酒店可以使用的客房。“房态维护”用于维护客房的状态。“房态统计”用于按照不同的分类统计房态的信息,例如按照客房类型、楼层、朝向等状态进行分类。“维修房报表”用于统计分析房态为维修房的客房情况。“其他相关报表”用于统计分析房态为其他状态的客房情况。14系统的性能需求141系统的用户界面本系统使用窗口界面,界面整洁美观,清晰明了界面控件排列有序,文体清晰易懂,操作方便,易于功能的切换能清楚标明用户当前所在的位置退出方便,界面保持一致。142系统的可靠性和稳定性在服务器和交换机选型、综合布线和网络设计、软件设计等方面应充分考虑可靠性和稳定性。在设计时要采用容错技术。在设备造型方面,要保证硬件设备的可靠性和软件的兼容性,同时必须考虑采用先进成熟的技术和产品,最大限度地减少故障的发生。同时系统的数据库中记录着整个系统正常运行时的所有数据,包括酒店的收费信息、住房记录、酒店中没个房间的信息、客户的私人信息等。这些信息都是系统正常运行的保证,因此必须要保证这些信息的绝对安全。143系统的开放性设计系统时应考虑系统的数据结构对使用单位是开放的,使用单位可结合本单位的实际情况,增添或减少该系统的管理功能,自行完成二次开发。144系统的易维护性易维护性是系统成功与否的重要决定因素,既要做到日常的管理操作简便,又要易于排除故障。第二章系统的总体设计本系统按照软件工程学理论,采用面向对象和结构化程序设计思想相结合的方法进行系统的设计开发。由于窗体和组件也是一个类,所以在进行用户界面的设计时,我们同样需要从面向对象的角度来考虑。面向对象设计方法以对象为基础,解决了传统结构化开发方法中客观世界描述工具与软件结构的不一致性问题,缩短了开发周期。21静态数据211业务流程图业务流程图如图21所示。图21酒店管理系统业务流程图系统ER图系统ER图如图22所示。图22系统ER图22数据库信息表根据以上需求分析,一个基本的酒店管理系统数据库中大致包括几十张数据表,分别存放相应子功能的数据信息,其中“客房信息”和“客户信息”是关键的表,用于存放酒店客房的基本信息和酒店入住客户的信息。其他设计客房的数据表,都只记录相应的客房编号。其中“客房信息”和其他数据表间的关系是1N的关系。图23数据库关系图1客房信息表客房信息表主要用于保存酒店所有的客房信息,其中包括有客房编号、类型编号、楼层编号、床数、客房描述、状态以及备注,具体见表21所示。表21客房信息表字段名称字段类型主键外键是否为空客房编号VARCHAR12是否类型编号VARCHAR4是否楼层编号INT4是否床数INT4是客房描述VARCHAR40是状态VARCHAR4是备注VARCHAR100是额定人数INT4是是否可拼房BIT1是2预订单数据表预订单数据表主要在管理散客预定房间时使用,其中包括有预订单号、客房类型、抵店时间、离店时间、客房编号、客房价格、预收款、预订人、和操作员。预订单数据表见表22所示。表22预订单数据表字段名称字段类型主键外键是否为空预定单号VARCHAR36是否客房类型VARCHAR4是否抵店时间SMALLDATETIME否离店时间SMALLDATETIME是客房编号VARCHAR12是客房价格MONEY8是预收款MONEY8是预订人VARCHAR20是VARCHAR40是操作员VARCHAR10是会员编号INT4是单据状态VARCHAR20是入住人数INT4是入住价格MONEY8是折扣DECIMAL5是折扣原因VARCHAR60是3入住单数据表入住单数据表主要在散客入住酒店时使用,并且其信息可以由预订单转入,其中包括有入住单号、预订单号、抵店时间、离店时间、客房编号、客房价格、预收款、预订人、操作员和应收账款入住单数据表具体见表23所示。表23入住单数据表字段名称字段类型主键外键是否为空入住单号VARCHAR36是否预定单号VARCHAR36是是抵店时间SMALLDATETIME是离店时间SMALLDATETIME是客房编号VARCHAR12是是客房价格MONEY8是预收款MONEY8是预订人VARCHAR20是VARCHAR40是操作员VARCHAR10是应收账款MONEY8是会员编号INT4是客房类型VARCHAR4是单据状态VARCHAR20是入住人数INT4是入住价格MONEY8是4客房类型表客房类型表主要用于保存酒店所有客房的类型信息包括类型编号、类型名称、价格和可超预订数。客房类型表具体见表24所示。表24客房类型表字段名称字段类型主键外键是否为空类型编号VARCHAR4是否类型名称VARCHAR40是价格MONEY8是可超预订数DECIMAL5是拼房价格MONEY8是是否可拼房BIT1是5楼层信息表楼层信息表主要用于保存酒店的楼层编号及其名称,具体见表25所示。表25楼层信息表字段名称字段类型主键外键是否为空楼层编号INT4是否楼层名称VARCHAR60是6账单明细表账单明细表用于记录客户消费的明细账单,包括账单编号、入住单号、消费内容、消费金额、消费时间、备注等,具体见表26所示。表26账单明细表字段名称字段类型主键外键是否为空账单编号INT4是否入住单号VARCHAR36是否消费内容VARCHAR40是消费金额MONEY8是消费时间SMALLDATET4是备注VARCHAR80是第三章系统的详细设计系统的详细设计主要包括系统模块功能的设计,系统界面的设计以及界面上控件相关代码的实现。由于程序的结构师MDI多文档窗体程序,单击主窗体上的各相应菜单选项即可调用各个功能子窗体。本次的酒店管理系统在功能上主要实现了客房基础设置、客房信息设置、房态管理、预定管理等功能,其中客房基础设置和信息设置集中到一个模块中,房态管理和预定管理集成在一个模块中,管理员通过客房类型设置与客房信息设置功能来设置本酒店客房的分类信息,内容包括房类名称、房价、房间号、房类编号、楼层、额定人数和可超预订数等。系统模块的功能设计总体设计中酒店管理系统主要划分为客房类型设置模块、客房信息设置模块、预订管理模块、房态管理模块三个部分。而在系统的详细设计中,要求对每个模块的具体功能进行设计,为之后的界面设计及程序代码实现提供依据。311创建工程启动DELPHI,利用默认的设置新建一个工程,并将其保存为“HOTELDPR”。单击PROJECT|OPTIONS菜单命令,在APPLICATION选项卡中修改工程的TITLE属性为“酒店管理系统”,并为项目选择一个EXE程序的图标。312创建系统主窗体1利用系统默认生成的窗体作为主窗体,并为其添加主菜单控件和其他控件,布局见图31所示。图31酒店管理系统主窗体2窗体及其控件的属性设置如下表31所示。表31主窗体属性设置控件类型对象控件名属性取值说明TFORMMAINNAMEMAINCAPTION酒店管理系统FORMSTYLEFSMDIFORMPOSITIONPODESKTOPCENTERHEIGHT620WIDTH7603MDI主窗体的设计主要是为了根据用户的选择调用不同的子窗体,该窗体代码如下UNITMAINFORMINTERFACEUSESWINDOWS,MESSAGES,SYSUTILS,VARIANTS,CLASSES,GRAPHICS,CONTROLS,FORMS,DIALOGS,MENUS,STDCTRLS,JPEG,EXTCTRLS,BUTTONSTYPETMAINCLASSTFORMMAINMENU1TMAINMENUN1TMENUITEMN2TMENUITEMN3TMENUITEMN4TMENUITEMN5TMENUITEMIMAGE1TIMAGELABEL1TLABELBITBTN1TBITBTNBITBTN2TBITBTNBITBTN3TBITBTNBITBTN4TBITBTNBITBTN5TBITBTNN6TMENUITEMN7TMENUITEMN8TMENUITEMPROCEDUREN2CLICKSENDERTOBJECTPROCEDUREN3CLICKSENDERTOBJECTPROCEDUREN5CLICKSENDERTOBJECTPROCEDUREN6CLICKSENDERTOBJECTPROCEDUREN7CLICKSENDERTOBJECTPROCEDUREN8CLICKSENDERTOBJECTPROCEDUREN9CLICKSENDERTOBJECTPROCEDUREN10CLICKSENDERTOBJECTPROCEDUREBITBTN1CLICKSENDERTOBJECTPROCEDUREBITBTN2CLICKSENDERTOBJECTPROCEDUREBITBTN3CLICKSENDERTOBJECTPROCEDUREBITBTN4CLICKSENDERTOBJECTPROCEDUREBITBTN5CLICKSENDERTOBJECTPRIVATEPRIVATEDECLARATIONSPUBLICPUBLICDECLARATIONSROOMNUMINTEGER/储存选择的空房间号YDNUMSTRING/储存选择的预定单号RZNUMSTRING/储存选择的入住单号FUNCTIONFINDFORMCAPTIONSTRINGBOOL/判断子窗体是否已经存在ENDVARMAINTMAINIMPLEMENTATIONRDFMUSESROOMTYPEFORM,ROOMINFOFORM,RESERVATIONFORM,DEBTFORM,ROOMSTATUSFORM,RESIDEFORM,CHECKOUTFORM/通过用户定义的函数,判断窗体是否已存在FUNCTIONTMAINFINDFORMCAPTIONSTRINGBOOLVARIINTEGERBEGINFORI0TOMAINMDICHILDCOUNTDOBEGIN/通过对窗体标题判断窗体是否存在IFMAINMDICHILDRENICAPTIONCAPTIONTHENBEGIN/如果窗体已存在,则恢复窗体,并返回TRUESENDMESSAGEMDICHILDRENIHANDLE,WM_SYSCOMMAND,SC_RESTORE,0MDICHILDRENIENABLEDTRUEMDICHILDRENISHOWMDICHILDRENISETFOCUSRESULTTRUEBREAKENDELSE/如窗体不存在,则返回FALSE,程序将创建窗体RESULTFALSEENDEND/显示【客房类型设置】窗体PROCEDURETMAINN2CLICKSENDERTOBJECTVARNEWFORMTROOMTYPEBEGINIFFINDFORM客房类型设置FALSETHENNEWFORMTROOMTYPECREATEAPPLICATIONNEWFORMCAPTION客房类型设置END/显示【客房信息设置】窗体PROCEDURETMAINN3CLICKSENDERTOBJECTVARNEWFORMTROOMINFOBEGINIFFINDFORM客房信息设置FALSETHENNEWFORMTROOMINFOCREATEAPPLICATIONNEWFORMCAPTION客房信息设置END/显示【预定管理】窗体PROCEDURETMAINN5CLICKSENDERTOBJECTVARNEWFORMTRESERVATIONBEGINIFFINDFORM预定管理FALSETHENNEWFORMTRESERVATIONCREATEAPPLICATIONNEWFORMCAPTION预定管理END/显示【入住管理】窗体PROCEDURETMAINN6CLICKSENDERTOBJECTVARNEWFORMTRESIDEBEGINIFFINDFORM入住管理FALSETHENNEWFORMTRESIDECREATEAPPLICATIONNEWFORMCAPTION入住管理END/显示【消费记帐】窗体PROCEDURETMAINN7CLICKSENDERTOBJECTVARNEWFORMTDEBTBEGINIFFINDFORM消费记帐FALSETHENNEWFORMTDEBTCREATEAPPLICATIONNEWFORMCAPTION消费记帐END/显示【收银退房】窗体PROCEDURETMAINN8CLICKSENDERTOBJECTVARNEWFORMTCHECKOUTBEGINIFFINDFORM收银退房FALSETHENNEWFORMTCHECKOUTCREATEAPPLICATIONNEWFORMCAPTION收银退房END/显示【房态管理】窗体PROCEDURETMAINN9CLICKSENDERTOBJECTVARNEWFORMTROOMSTATUSBEGINIFFINDFORM房态管理FALSETHENNEWFORMTROOMSTATUSCREATEAPPLICATIONNEWFORMCAPTION房态管理END/退出程序PROCEDURETMAINN10CLICKSENDERTOBJECTBEGINCLOSEENDPROCEDURETMAINBITBTN1CLICKSENDERTOBJECTVARNEWFORMTROOMTYPEBEGINIFFINDFORM客房类型设置FALSETHENNEWFORMTROOMTYPECREATEAPPLICATIONNEWFORMCAPTION客房类型设置ENDPROCEDURETMAINBITBTN2CLICKSENDERTOBJECTVARNEWFORMTROOMINFOBEGINIFFINDFORM客房信息设置FALSETHENNEWFORMTROOMINFOCREATEAPPLICATIONNEWFORMCAPTION客房信息设置ENDPROCEDURETMAINBITBTN3CLICKSENDERTOBJECTVARNEWFORMTRESERVATIONBEGINIFFINDFORM预定管理FALSETHENNEWFORMTRESERVATIONCREATEAPPLICATIONNEWFORMCAPTION预定管理ENDPROCEDURETMAINBITBTN4CLICKSENDERTOBJECTVARNEWFORMTROOMSTATUSBEGINIFFINDFORM房态管理FALSETHENNEWFORMTROOMSTATUSCREATEAPPLICATIONNEWFORMCAPTION房态管理ENDPROCEDURETMAINBITBTN5CLICKSENDERTOBJECTBEGINCLOSEENDEND32完成客房类型设置功能1选择FILE|NEW|OTHER菜单命令,弹出NEWITEMS窗体,在HOTEL选项卡中选择PARENT项,单击OK按钮,就可以派生一个新的子窗体。2讲窗体的NAME属性设置为“ROOMTYPE”,CAPTION属性设置为“客房类型管理”病保存为“ROOMTYPEPAS”。选择PROJECT|OPTIONS菜单命令,讲ROOMTYPE窗体从自动创建的窗体列表中删除,然后再向窗体中添加新的控件并修改原有控件的属性,如图32所示。图32【客房类型设置】窗体“客房类型设置”用于设置本酒店客房的分类信息,内容包括房类名称、房价、可预订数等。“房价设置”用于设置房价的折扣信息,内容包括折扣名称种类、折扣额度、房类编号、折后房价、折扣有效时间等。“系统参数设置”用于设置管理系统的各种参数值,例如酒店名称,房态显示模式等。选择【基础设置】|【客房类型设置】菜单命令,可以进入【客房类型设置】功能窗体,在其中可以管理客房类型。这是一个非常简单的子窗体,通过单击工具栏上的【新增】、【修改】或【删除】按钮可以新增客房的类型,修改某个客房类型或者删除某个客房类型。对数据记录的编辑和输入都是在窗体下方面板中的文本框中进行的,而在新增记录是,程序会自动计算生成一个新的类型编号,一面与已有的编号重复。3各控件的属性如表32所示。表中仅列出派生窗体中需要修改的空间属性和新添加的控件的属性。表32客房类型设置窗体空间属性设置控件类型对象名属性取值说明LABEL共3个CAPTIONEDITEDIT3VISIBLEFALSEADOTABLEADOTABLE1TABLENAME客房类型ACTIVETRUEDBEDITDBEDIT13DATASOUREDATASOURE1DATAFIELD如其上方的标签DBCOMBOBOX面板下方六个DATASOUREDATASOURE14设置该窗体的代码如下UNITROOMTYPEFORMINTERFACEUSESWINDOWS,MESSAGES,SYSUTILS,VARIANTS,CLASSES,GRAPHICS,CONTROLS,FORMS,DIALOGS,PARENTFORM,ADODB,DB,IMGLIST,GRIDS,DBGRIDS,COMCTRLS,TOOLWIN,STDCTRLS,BUTTONS,EXTCTRLS,MASK,DBCTRLS,JPEGTYPETROOMTYPECLASSTPARENTDBEDIT1TDBEDITDBEDIT2TDBEDITDBEDIT3TDBEDITLABEL6TLABELLABEL7TLABELLABEL8TLABELIMAGE1TIMAGELABEL9TLABELIMAGE2TIMAGEIMAGE3TIMAGEIMAGE4TIMAGEPROCEDURETOOLBUTTON6CLICKSENDERTOBJECTPRIVATEPRIVATEDECLARATIONSPUBLICPUBLICDECLARATIONSENDVARROOMTYPETROOMTYPEIMPLEMENTATIONRDFMPROCEDURETROOMTYPETOOLBUTTON6CLICKSENDERTOBJECTVARCODEINTEGERBEGININHERITED/为新增的客房类型生成新的编号ADOQUERY1CLOSEADOQUERY1SQLCLEARADOQUERY1SQLADDSELECT类型编号最大编号FROM客房类型ADOQUERY1OPENCODEADOQUERY1FIELDBYNAME最大编号ASINTEGERCODECODE1DBEDIT1TEXTINTTOSTRCODEENDEND33完成客房信息设置功能1选择FILE|NEW|OTHER菜单命令,从PA