u_stat.dfm

本系统分为前台和后台两部分：前台用来实现客户预订、入住等操作

object F_stat: TF_stat
  Left = 220
  Top = 191
  BorderStyle = bsSingle
  Caption = #32479#35745#25253#34920
  ClientHeight = 424
  ClientWidth = 585
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  FormStyle = fsMDIChild
  OldCreateOrder = False
  Position = poDefault
  Visible = True
  OnClose = FormClose
  OnCreate = FormCreate
  DesignSize = (
    585
    424)
  PixelsPerInch = 96
  TextHeight = 13
  object GroupBox1: TGroupBox
    Left = 8
    Top = 8
    Width = 569
    Height = 97
    Anchors = [akLeft, akTop, akRight]
    Caption = #32479#35745#26465#20214
    TabOrder = 0
    object Label1: TLabel
      Left = 24
      Top = 24
      Width = 72
      Height = 13
      Caption = #26102#38388#33539#22260#65306#20174
    end
    object Label2: TLabel
      Left = 176
      Top = 24
      Width = 12
      Height = 13
      Caption = #21040
    end
    object i_start_date: TMaskEdit
      Left = 104
      Top = 20
      Width = 65
      Height = 21
      EditMask = '!0000-!90-90;1;_'
      MaxLength = 10
      TabOrder = 0
      Text = '    -  -  '
    end
    object i_end_date: TMaskEdit
      Left = 192
      Top = 20
      Width = 65
      Height = 21
      EditMask = '!0000-!90-90;1;_'
      MaxLength = 10
      TabOrder = 1
      Text = '    -  -  '
    end
    object i_step: TRadioGroup
      Left = 24
      Top = 56
      Width = 89
      Height = 33
      Caption = #26102#38388#21333#20301
      Columns = 2
      ItemIndex = 0
      Items.Strings = (
        #26085
        #26376)
      TabOrder = 2
    end
    object i_type: TRadioGroup
      Left = 280
      Top = 16
      Width = 105
      Height = 73
      Caption = #32479#35745#20869#23481
      ItemIndex = 0
      Items.Strings = (
        #33829#19994#39069
        #23458#25151#20351#29992#29575)
      TabOrder = 3
    end
    object B_stat: TButton
      Left = 120
      Top = 64
      Width = 57
      Height = 25
      Caption = #32479#35745
      TabOrder = 4
      OnClick = B_statClick
    end
    object B_print: TButton
      Left = 184
      Top = 64
      Width = 83
      Height = 25
      Caption = #25171#21360#32479#35745#22270
      TabOrder = 5
      OnClick = B_printClick
    end
    object i_room_level: TListBox
      Left = 400
      Top = 16
      Width = 145
      Height = 73
      Columns = 1
      ItemHeight = 13
      TabOrder = 6
    end
  end
  object Chart1: TChart
    Left = 8
    Top = 112
    Width = 569
    Height = 305
    BackWall.Brush.Color = clWhite
    BackWall.Brush.Style = bsClear
    Title.Text.Strings = (
      'TChart')
    MaxPointsPerPage = 12
    TabOrder = 1
    Anchors = [akLeft, akTop, akRight, akBottom]
    object Series1: TBarSeries
      Marks.ArrowLength = 20
      Marks.Style = smsValue
      Marks.Visible = True
      SeriesColor = clRed
      XValues.DateTime = False
      XValues.Name = 'X'
      XValues.Multiplier = 1
      XValues.Order = loAscending
      YValues.DateTime = False
      YValues.Name = 'Bar'
      YValues.Multiplier = 1
      YValues.Order = loNone
    end
  end
end