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

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

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

3、ields[0].AsInteger1Closeendend接下來(lái)這個(gè)函數(shù)也是返回最大值，但是其為一個(gè)訂單的最大編號(hào)為字符型。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)登陸。在沒(méi)有進(jìn)行登陸之前4個(gè)功能按鈕為灰色。第一個(gè)按鈕為客房管理，其次是餐飲管理，再次是客戶查詢，最后是收費(fèi)管理。4客房管理模塊客房管理包括客房預(yù)定，入住，調(diào)整。其界面如下：操作介紹：預(yù)定：首先在證件編號(hào)文體框中輸入相關(guān)的證件編號(hào)，按回