第1页共15页编号：时间：2021年x月x日书山有路勤为径，学海无涯苦作舟页码：第1页共15页酒店客房餐饮管理系统实现酒店客房餐饮管理系统功能完善，能管理普通酒店的客房住宿和餐饮等服务。本系统采用DELPHI和SQLSERVER工具开发，分为前台和后台管理。前台与后台管理程序相对独立，均共用一个数据库。下面对该系统的部份功能和模块以及代码进行分析。一．前台管理1．数据模块该模块是整个程序数据的提供者，以及包括大部分的处理函数和实现功能。单元文件名：u_data.pas,数据模块名：DM_main。部分代码分析：返回指表中某字段的最大值，返回值为整型。因此该函数只能应用字段为整型的表。functionTDM_main.GetMaxId(aTable,aField:string):integer;varsSql:string;beginResult:=0;sSql:='selectmax(%s)from%s';withQ_getmaxdobeginSQL.Text:=Format(sSql,[aField,aTable]);Open;ifnotIsEmptythenResult:=Fields[0].AsInteger+1;Close;end;end;接下来这个函数也是返回最大值，但是其为一个订单的最大编号为字符型。functionTDM_main.GetMaxOrderId:string;varid:String;count:Integer;beginwithQ_count_orderdobeginOpen;count:=Fields[0].Value;Close;第2页共15页第1页共15页编号：时间：2021年x月x日书山有路勤为径，学海无涯苦作舟页码：第2页共15页end;id:='000'+IntToStr(count);id:=Copy(id,length(id)-3,4);id:='F'+FormatDateTime('yymmdd',now)+id;Result:=id;end;系统登陆函数：在进行系统的操作处理时，必须登陆。该函数对用户输入的用户名和密码数据库验证。其密码是进行加密的（加密模块稍后分析）functionTDM_main.Login(user,passwd:String):String;varFlag:Boolean;beginifDatabase.Connected=falsethenDatabase.Connected:=True;passwd:=Copy(passwd+passwd,1,10);//加密处理passwd:=Encrypt(passwd,111);withQ_logindobeginClose;Params.ParamValues['ID']:=user;Params.ParamValues['PASSWD']:=passwd;Open;//在用户请中查询该用户和密码是否存在Flag:=(notIsEmpty);ifFlagthenbeginLogin:=FieldValues['NAME'];IsPass:=Flag;endelsebeginLogin:='';Application.MessageBox('请重新输入！','登录失败',MB_OK);end;Close;end;end;系统登出：procedureTDM_main.Logout;beginDatabase.Connected:=False;//断开数据库的连接end;第3页共15页第2页共15页编号：时间：2021年x月x日书山有路勤为径，学海无涯苦作舟页码：第3页共15页2．加密模块：单元文件名：crypt.pas。简单的加密算法。constC1=52845;C2=22719;functionEncrypt(S:String;Key:Word):String;//S：加密的字符串；Key：密钥varI:Integer;j:Integer;beginResult:=S;forI:=1toLength(S)dobeginResult[I]:=char(byte(S[I])xor(Keyshr8));Key:=(byte(Result[I])+Key)*C1+C2;end;s:=Result;Result:='';fori:=1tolength(s)dobeginj:=Integer(s[i]);Result:=Result+Char(65+(jdiv26))+Char(65+(jmod26));end;end;3．主模块系统的主界面，包括系统登陆。在没有进行登陆之前4个功能按钮为灰色。第4页共15页第3页共15页编号：时间：2021年x月x日书山有路勤为径，学海无涯苦作舟页码：第4页共15页第一个按钮为客房管理，其次是餐饮管理，再次是客户查询，最后是收费管理。4．客房管理模块客房管理包括客房预定，入住，调整。其界面如下：第5页共15页第4页共15页编号：时间：2021年x月x日书山有路勤为径，学海无涯苦作舟页码：第5页共15页操作介绍：预定：首先在证件编号文体框中输入相关的证件编号，按回车键，显示如下窗口：输入完整后单击添加则返回上一个界面，相关的数据将自动填写。然后在右边选择相应的客房等级。在网格中将显示该等级的所有空闲房号。选择一个房间，再点击“新建”按钮然后点击“添加”。客房预定完毕。入住：在证件编号文体框中输入相关的证件编号，按回车键。如果该客户已经预定则自动显示信息，否则将弹出上面的窗口要求输入信息。第6页共15页第5页共15页编号：时间：2021年x月x日书山有路勤为径，学海无涯苦作舟页码：第6页共15页5．餐饮管理包括选菜、点菜、打单：下面是其相代码说明：proc...
