酒店客房餐飲管理系統(tǒng)實(shí)現(xiàn)-wenkub
2023-04-24 07:38:53 本頁面
【正文】 新輸入！39。 IsPass:=Flag。 //在用戶請(qǐng)中查詢?cè)撚脩艉兔艽a是否存在 Flag:=( not IsEmpty)。 [39。 with Q_login do begin Close。var Flag:Boolean。end。+FormatDateTime(39。+IntToStr(count)。 Close。var id:String。 end。 with Q_getmax do begin :=Format(sSql,[aField,aTable])。var sSql:string。單元文件名：,數(shù)據(jù)模塊名：DM_main。本系統(tǒng)采用DELPHI和SQL SERVER工具開發(fā)，分為前臺(tái)和后臺(tái)管理。前臺(tái)與后臺(tái)管理程序相對(duì)獨(dú)立，均共用一個(gè)數(shù)據(jù)庫。部分代碼分析：返回指表中某字段的最大值，返回值為整型。begin Result:=0。 Open。end。 count:Integer。 end。 id:=Copy(id, length(id)3, 4)。yymmdd39。系統(tǒng)登陸函數(shù)：在進(jìn)行系統(tǒng)的操作處理時(shí)，必須登陸。begin if =false then :=True。 [39。PASSWD39。 if Flag then begin Login:=FieldValues[39。 end else begin Login:=39。, 39。 Close。begin :=False。const C1 = 52845。//S：加密的字符串；Key：密鑰var I: Integer。 Key := (byte(Result[I]) + Key) * C1 + C2。39。end。4． 客房管理模塊客房管理包括客房預(yù)定，入住，調(diào)整。選擇一個(gè)房間，再點(diǎn)擊“新建”按鈕，然后點(diǎn)擊“添加”。5． 餐飲管理包括選菜、點(diǎn)菜、打單：下面是其相代碼說明：procedure (Sender: TObject)。39。order_detail39。 with Q_foodetail do begin Append。 Fields[3].AsString:=。 Close。 //更新總訂單的總金額 with do begin Edit。 end。begin with Q_foodetail do begin if IsEmpty then Exit。 Open。 total:=(sid)。,sid,[])。 end。 with do begin Open。 Fields[2].AsString:=Trim()。 ParamByName(39。 Open。二．后臺(tái)管理1． 數(shù)據(jù)模塊該模塊是整個(gè)程序數(shù)據(jù)的提供者，以及包括大部分的處理函數(shù)和實(shí)現(xiàn)功能。 passwo
公司管理相關(guān)推薦
鄂ICP備17016276號(hào)-1