酒店客房餐饮管系统实现(doc 14).docVIP

酒店客房餐饮管理系统实现 酒店客房餐饮管理系统功能完善，能管理普通酒店的客房住宿和餐饮等服务。本系统采用DELPHI和SQL SERVER工具开发，分为前台和后台管理。前台与后台管理程序相对独立，均共用一个数据库。下面对该系统的部份功能和模块以及代码进行分析。 一．前台管理 数据模块 该模块是整个程序数据的提供者，以及包括大部分的处理函数和实现功能。 单元文件名：u_data.pas,数据模块名：DM_main。 部分代码分析： 返回指表中某字段的最大值，返回值为整型。因此该函数只能应用字段为整型的表。 function TDM_main.GetMaxId(aTable,aField:string):integer; var sSql:string; begin Result:=0; sSql:=select max(%s) from %s; with Q_getmax do begin SQL.Text:=Format(sSql,[aField,aTable]); Open; if not IsEmpty then Result:=Fields[0].AsInteger+1; Close; end; end; 接下来这个函数也是返回最大值，但是其为一个订单的最大编号为字符型。 function TD