完成酒店管理系统

源代码在线查看: hotel.dpr

软件大小: 1063 K
上传用户: dounob
关键词: 管理系统
下载地址: 免注册下载 普通下载 VIP

相关代码

				program Hotel;
				
				uses
				  Forms,
				  Login in 'Login.pas' {LoginFrm},
				  MainDinner in 'MainDinner.pas' {MainDinnerFrm},
				  MainRoom in 'MainRoom.pas' {MainRoomFrm},
				  MainSail in 'MainSail.pas' {MainSailFrm},
				  Admin in 'Admin.pas' {AdminFrm},
				  UserReg in 'UserReg.pas' {UserRegFrm},
				  PassWd in 'PassWd.pas' {PassWdFrm},
				  SaleInput in 'SaleInput.pas' {SaleInputFrm},
				  DinnerInput in 'DinnerInput.pas' {DinnerInputFrm},
				  RoomInput in 'RoomInput.pas' {RoomInputFrm},
				  TaxSet in 'TaxSet.pas' {TaxSetFrm},
				  DiscountSet in 'DiscountSet.pas' {DiscountSetFrm},
				  Salequery in 'Salequery.pas' {SaleQueryFrm},
				  DinnerQuery in 'DinnerQuery.pas' {DinnerQueryFrm},
				  RoomQuery in 'RoomQuery.pas' {RoomQueryFrm},
				  SaleChart in 'SaleChart.pas' {SaleChartFrm},
				  RoomChart in 'RoomChart.pas' {RoomChartFrm},
				  DinnerChart in 'DinnerChart.pas' {DinnerChartFrm},
				  DinnerUser in 'DinnerUser.pas' {DinnerUserFrm},
				  DinnerUserModify in 'DinnerUserModify.pas' {DinnerUserModifyFrm},
				  DinnerUserDel in 'DinnerUserDel.pas' {DinnerUserDelFrm},
				  DinnerMenu in 'DinnerMenu.pas' {DinnerMenuFrm},
				  DinnerMenuModify in 'DinnerMenuModify.pas' {DinnerMenuModifyFrm},
				  DinnerMenuDel in 'DinnerMenuDel.pas' {DinnerMenuDelFrm},
				  DinnerOrder in 'DinnerOrder.pas' {DinnerOrderFrm},
				  DinnerOrderModify in 'DinnerOrderModify.pas' {DinnerOrderModifyFrm},
				  DinnerOrderDel in 'DinnerOrderDel.pas' {DinnerOrderDelFrm},
				  DinnerUserSql in 'DinnerUserSql.pas' {DinnerUserSqlFrm},
				  DinnerMenuSql in 'DinnerMenuSql.pas' {DinnerMenuSqlFrm},
				  DinnerOrderSql in 'DinnerOrderSql.pas' {DinnerOrderSqlFrm},
				  GuestSql in 'GuestSql.pas' {GuestSqlFrm},
				  RoomState in 'RoomState.pas' {RoomStateFrm},
				  GroupPay in 'GroupPay.pas' {GroupPayFrm},
				  TouristPay in 'TouristPay.pas' {TouristPayFrm},
				  HistorySql in 'HistorySql.pas' {HistorySqlFrm},
				  tourist in 'tourist.pas' {TouristFrm},
				  TouristNew in 'TouristNew.pas' {TouristNewFrm},
				  ChangeNum in 'ChangeNum.pas' {ChangeNumFrm},
				  RoomModify in 'RoomModify.pas' {RoomModifyFrm},
				  ChangeName in 'ChangeName.pas' {ChangeNameFrm},
				  RoomEdit in 'RoomEdit.pas' {RoomEditFrm},
				  Group in 'Group.pas' {GroupFrm},
				  UserDel in 'UserDel.pas' {UserDelFrm},
				  UserModify in 'UserModify.pas' {UserModifyFrm},
				  MainCheck in 'MainCheck.pas' {MainCheckFrm},
				  DinnerCheck in 'DinnerCheck.pas' {DinnerCheckFrm},
				  TodayDis in 'TodayDis.pas' {TodayDisFrm},
				  RoomCheck in 'RoomCheck.pas' {RoomCheckFrm},
				  GroupCheck in 'GroupCheck.pas' {GroupCheckFrm},
				  TouristSql in 'TouristSql.pas' {TouristSqlFrm},
				  GroupSql in 'GroupSql.pas' {GroupSqlFrm},
				  GroupDel in 'GroupDel.pas' {GroupDelFrm};
				
				{$R *.res}
				
				begin
				  Application.Initialize;
				  Application.CreateForm(TLoginFrm, LoginFrm);
				  Application.CreateForm(TMainDinnerFrm, MainDinnerFrm);
				  Application.CreateForm(TMainRoomFrm, MainRoomFrm);
				  Application.CreateForm(TMainSailFrm, MainSailFrm);
				  Application.CreateForm(TAdminFrm, AdminFrm);
				  Application.CreateForm(TUserRegFrm, UserRegFrm);
				  Application.CreateForm(TPassWdFrm, PassWdFrm);
				  Application.CreateForm(TSaleInputFrm, SaleInputFrm);
				  Application.CreateForm(TDinnerInputFrm, DinnerInputFrm);
				  Application.CreateForm(TRoomInputFrm, RoomInputFrm);
				  Application.CreateForm(TTaxSetFrm, TaxSetFrm);
				  Application.CreateForm(TDiscountSetFrm, DiscountSetFrm);
				  Application.CreateForm(TSaleQueryFrm, SaleQueryFrm);
				  Application.CreateForm(TDinnerQueryFrm, DinnerQueryFrm);
				  Application.CreateForm(TRoomQueryFrm, RoomQueryFrm);
				  Application.CreateForm(TSaleChartFrm, SaleChartFrm);
				  Application.CreateForm(TRoomChartFrm, RoomChartFrm);
				  Application.CreateForm(TDinnerChartFrm, DinnerChartFrm);
				  Application.CreateForm(TDinnerUserFrm, DinnerUserFrm);
				  Application.CreateForm(TDinnerUserModifyFrm, DinnerUserModifyFrm);
				  Application.CreateForm(TDinnerUserDelFrm, DinnerUserDelFrm);
				  Application.CreateForm(TDinnerMenuFrm, DinnerMenuFrm);
				  Application.CreateForm(TDinnerMenuModifyFrm, DinnerMenuModifyFrm);
				  Application.CreateForm(TDinnerMenuDelFrm, DinnerMenuDelFrm);
				  Application.CreateForm(TDinnerOrderFrm, DinnerOrderFrm);
				  Application.CreateForm(TDinnerOrderModifyFrm, DinnerOrderModifyFrm);
				  Application.CreateForm(TDinnerOrderDelFrm, DinnerOrderDelFrm);
				  Application.CreateForm(TDinnerUserSqlFrm, DinnerUserSqlFrm);
				  Application.CreateForm(TDinnerMenuSqlFrm, DinnerMenuSqlFrm);
				  Application.CreateForm(TDinnerOrderSqlFrm, DinnerOrderSqlFrm);
				  Application.CreateForm(TGuestSqlFrm, GuestSqlFrm);
				  Application.CreateForm(TRoomStateFrm, RoomStateFrm);
				  Application.CreateForm(TGroupPayFrm, GroupPayFrm);
				  Application.CreateForm(TTouristPayFrm, TouristPayFrm);
				  Application.CreateForm(THistorySqlFrm, HistorySqlFrm);
				  Application.CreateForm(TTouristFrm, TouristFrm);
				  Application.CreateForm(TTouristNewFrm, TouristNewFrm);
				  Application.CreateForm(TChangeNumFrm, ChangeNumFrm);
				  Application.CreateForm(TRoomModifyFrm, RoomModifyFrm);
				  Application.CreateForm(TChangeNameFrm, ChangeNameFrm);
				  Application.CreateForm(TRoomEditFrm, RoomEditFrm);
				  Application.CreateForm(TGroupFrm, GroupFrm);
				  Application.CreateForm(TUserDelFrm, UserDelFrm);
				  Application.CreateForm(TUserModifyFrm, UserModifyFrm);
				  Application.CreateForm(TMainCheckFrm, MainCheckFrm);
				  Application.CreateForm(TDinnerCheckFrm, DinnerCheckFrm);
				  Application.CreateForm(TTodayDisFrm, TodayDisFrm);
				  Application.CreateForm(TRoomCheckFrm, RoomCheckFrm);
				  Application.CreateForm(TGroupCheckFrm, GroupCheckFrm);
				  Application.CreateForm(TTouristSqlFrm, TouristSqlFrm);
				  Application.CreateForm(TGroupSqlFrm, GroupSqlFrm);
				  Application.CreateForm(TGroupDelFrm, GroupDelFrm);
				  Application.Run;
				end.
							

相关资源