bath.dpr

东华休闲山庄洗浴、餐饮、客房管理系统

program Bath;

uses
  Forms,
  AbortUnit in 'bath\AbortUnit.PAS' {AbortForm},
  ChangeUnit in 'bath\ChangeUnit.pas' {ChangeForm},
  GuestSelectUnit in 'bath\GuestSelectUnit.pas' {GuestSelectForm},
  LoginUnit in 'bath\LoginUnit.pas' {LoginForm},
  LogUnit in 'bath\LogUnit.pas' {LogForm},
  MainUnit in 'bath\MainUnit.pas' {MainForm},
  PasswordUnit in 'bath\PasswordUnit.pas' {PasswordForm},
  PayUnit in 'bath\PayUnit.pas' {PayForm},
  SKEditUnit in 'bath\SKEditUnit.pas' {SKEditForm},
  SKKDUnit in 'bath\SKKDUnit.pas' {SKKDForm},
  StateEditUnit in 'bath\StateEditUnit.pas' {StateEditForm},
  SysSetUnit in 'bath\SysSetUnit.pas' {SysSetForm},
  TTEditUnit in 'bath\TTEditUnit.pas' {TTEditForm},
  TTKDUnit in 'bath\TTKDUnit.pas' {TTKDForm},
  YDDJUnit in 'bath\YDDJUnit.pas' {YDDJForm},
  YDGLUnit in 'bath\YDGLUnit.pas' {YDGLForm},
  YYCXUnit in 'bath\YYCXUnit.pas' {YYCXForm},
  ZJXFUnit in 'bath\ZJXFUnit.pas' {ZJXFForm},
  BKJZUnit in 'bath\BKJZUnit.pas' {BKJZForm},
  BrowseKSDAUnit in 'bath\BrowseKSDAUnit.pas' {BrowseKSDAForm},
  CFZDUnit in 'bath\CFZDUnit.pas' {CFZDForm},
  GZGLUnit in 'bath\GZGLUnit.pas' {GZGLForm},
  HBZDUnit in 'bath\HBZDUnit.pas' {HBZDForm},
  SelectBKZDUnit in 'bath\SelectBKZDUnit.pas' {SelectBKZDForm},
  SelectKRXXUnit in 'bath\SelectKRXXUnit.pas' {SelectKRXXForm},
  SelectKSDAUnit in 'bath\SelectKSDAUnit.pas' {SelectKSDAForm},
  SelectLBXXUnit in 'bath\SelectLBXXUnit.pas' {SelectLBXXForm},
  SelectXFQDUnit in 'bath\SelectXFQDUnit.pas' {SelectXFQDForm},
  SetGoodUnit in 'bath\SetGoodUnit.pas' {SetGoodForm},
  SetGroupUnit in 'bath\SetGroupUnit.pas' {SetGroupForm},
  SetGuestSourceUnit in 'bath\SetGuestSourceUnit.pas' {SetGuestSourceForm},
  SetRoomUnit in 'bath\SetRoomUnit.pas' {SetRoomForm},
  SetUserUnit in 'bath\SetUserUnit.pas' {SetUserForm},
  XFTDUnit in 'bath\XFTDUnit.pas' {XFTDForm},
  XFZDUnit in 'bath\XFZDUnit.pas' {XFZDForm},
  YDEditUnit in 'bath\YDEditUnit.pas' {YDEditForm},
  YDKDUnit in 'bath\YDKDUnit.pas' {YDKDForm},
  YJSelectUnit in 'bath\YJSelectUnit.pas' {YJSelectForm},
  YLGLUnit in 'bath\YLGLUnit.pas' {YLGLForm},
  SetServerUnit in 'bath\SetServerUnit.pas' {SetServerForm};

{$R *.res}

begin
  Application.Initialize;
  Application.CreateForm(TLoginForm, LoginForm);
  Application.CreateForm(TMainForm, MainForm);
  Application.Run;
end.