酒店管理系統(tǒng)介紹

1、酒店客房餐飲管理系統(tǒng)實現(xiàn)酒店客房餐飲管理系統(tǒng)實現(xiàn)酒店客房餐飲管理系統(tǒng)功能完善，能管理普通酒店的客房住宿和餐飲等服務。本系統(tǒng)采用DELPHI和SQLSERVER工具開發(fā)，分為前臺和后臺管理。前臺與后臺管理程序相對獨立，均共用一個數(shù)據(jù)庫。下面對該系統(tǒng)的部份功能和模塊以及代碼進行分析。一前臺管理1數(shù)據(jù)模塊該模塊是整個程序數(shù)據(jù)的提供者，以及包括大部分的處理函數(shù)和實現(xiàn)功能。單元文件名：u_data.pas數(shù)據(jù)模塊名：DM_main。部分代碼分析：

2、返回指表中某字段的最大值，返回值為整型。因此該函數(shù)只能應用字段為整型的表。functionTDM_main.GetMaxId(aTableaField:string):integervarsSql:stringbeginResult:=0sSql:=max(%s)from%swithQ_getmaxdobeginSQL.Text:=Fmat(sSql[aFieldaTable])OpenifnotIsEmptythenResult:=F

3、ields[0].AsInteger1Closeendend接下來這個函數(shù)也是返回最大值，但是其為一個訂單的最大編號為字符型。functionTDM_main.GetMaxderId:stringvarid:Stringcount:IntegerbeginwithQ_count_derdobeginOpencount:=Fields[0].ValueCloseendid:=000IntToStr(count)id:=Copy(idlen

4、gth(id)34)constC1=52845C2=22719functionEncrypt(S:StringKey:Wd):StringS：加密的字符串；Key：密鑰varI:Integerj:IntegerbeginResult:=SfI:=1toLength(S)dobeginResult[I]:=(byte(S[I])x(Keyshr8))Key:=(byte(Result[I])Key)C1C2ends:=ResultResu

5、lt:=fi:=1tolength(s)dobeginj:=Integer(s[i])Result:=Result(65(jdiv26))(65(jmod26))endend3主模塊系統(tǒng)的主界面，包括系統(tǒng)登陸。在沒有進行登陸之前4個功能按鈕為灰色。第一個按鈕為客房管理，其次是餐飲管理，再次是客戶查詢，最后是收費管理。4客房管理模塊客房管理包括客房預定，入住，調(diào)整。其界面如下：操作介紹：預定：首先在證件編號文體框中輸入相關的證件編號，按回