第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: