dinneruser.~dfm

完成酒店管理系统

object DinnerUserFrm: TDinnerUserFrm
  Left = 73
  Top = 72
  Width = 668
  Height = 506
  Caption = #29992#25143#20449#24687#31649#29702
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  PixelsPerInch = 96
  TextHeight = 13
  object GroupBox1: TGroupBox
    Left = 16
    Top = 8
    Width = 593
    Height = 209
    Caption = #29992#25143#20449#24687
    TabOrder = 0
    object Label1: TLabel
      Left = 16
      Top = 24
      Width = 36
      Height = 13
      Caption = #32534#21495':   '
    end
    object Label2: TLabel
      Left = 176
      Top = 24
      Width = 39
      Height = 13
      Caption = #22995#21517':    '
    end
    object Label3: TLabel
      Left = 344
      Top = 24
      Width = 36
      Height = 13
      Caption = #24615#21035':   '
    end
    object Label4: TLabel
      Left = 16
      Top = 64
      Width = 60
      Height = 13
      Caption = #35777#20214#21495#30721':   '
    end
    object Label5: TLabel
      Left = 16
      Top = 96
      Width = 57
      Height = 13
      Caption = #20837#20250#26102#38388':  '
    end
    object Label6: TLabel
      Left = 216
      Top = 96
      Width = 36
      Height = 13
      Caption = #32423#21035':   '
    end
    object Label7: TLabel
      Left = 352
      Top = 96
      Width = 39
      Height = 13
      Caption = #27424#27454':    '
    end
    object Label8: TLabel
      Left = 16
      Top = 136
      Width = 33
      Height = 13
      Caption = #30005#35805':  '
    end
    object Label9: TLabel
      Left = 216
      Top = 136
      Width = 36
      Height = 13
      Caption = #22320#22336':   '
    end
    object Label10: TLabel
      Left = 16
      Top = 176
      Width = 39
      Height = 13
      Caption = #22791#27880':    '
    end
    object Edit1: TEdit
      Left = 48
      Top = 24
      Width = 121
      Height = 21
      TabOrder = 0
    end
    object Edit2: TEdit
      Left = 216
      Top = 24
      Width = 121
      Height = 21
      TabOrder = 1
    end
    object ComboBox1: TComboBox
      Left = 384
      Top = 24
      Width = 113
      Height = 21
      ItemHeight = 13
      TabOrder = 2
      Items.Strings = (
        #30007
        #22899)
    end
    object Edit3: TEdit
      Left = 80
      Top = 56
      Width = 417
      Height = 21
      TabOrder = 3
    end
    object Edit4: TEdit
      Left = 384
      Top = 96
      Width = 113
      Height = 21
      TabOrder = 4
    end
    object ComboBox2: TComboBox
      Left = 248
      Top = 96
      Width = 97
      Height = 21
      ItemHeight = 13
      TabOrder = 5
      Items.Strings = (
        #26222#36890#29992#25143
        #20250#21592)
    end
    object Edit5: TEdit
      Left = 80
      Top = 136
      Width = 121
      Height = 21
      TabOrder = 6
    end
    object Edit6: TEdit
      Left = 256
      Top = 136
      Width = 241
      Height = 21
      TabOrder = 7
    end
    object Edit7: TEdit
      Left = 80
      Top = 176
      Width = 417
      Height = 21
      TabOrder = 8
    end
    object Button1: TButton
      Left = 512
      Top = 16
      Width = 75
      Height = 25
      Caption = #28155#21152
      TabOrder = 9
      OnClick = Button1Click
    end
    object Button2: TButton
      Left = 512
      Top = 64
      Width = 75
      Height = 25
      Caption = #20462#25913
      TabOrder = 10
      OnClick = Button2Click
    end
    object Button3: TButton
      Left = 512
      Top = 112
      Width = 75
      Height = 25
      Caption = #21024#38500
      TabOrder = 11
      OnClick = Button3Click
    end
    object Button4: TButton
      Left = 512
      Top = 160
      Width = 75
      Height = 25
      Caption = #28165#31354
      TabOrder = 12
      OnClick = Button4Click
    end
  end
  object DBGrid1: TDBGrid
    Left = 16
    Top = 224
    Width = 585
    Height = 161
    DataSource = DataSource1
    TabOrder = 1
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
  end
  object GroupBox2: TGroupBox
    Left = 24
    Top = 400
    Width = 241
    Height = 57
    Caption = #25490#24207#26041#24335
    TabOrder = 2
    object RadioButton1: TRadioButton
      Left = 24
      Top = 24
      Width = 73
      Height = 17
      Caption = #21319#24207
      Checked = True
      TabOrder = 0
      TabStop = True
      OnClick = RadioButton1Click
    end
    object RadioButton2: TRadioButton
      Left = 112
      Top = 24
      Width = 89
      Height = 17
      Caption = #38477#24207
      TabOrder = 1
      OnClick = RadioButton2Click
    end
  end
  object GroupBox3: TGroupBox
    Left = 272
    Top = 400
    Width = 337
    Height = 57
    Caption = #25490#24207#20869#23481
    TabOrder = 3
    object RadioButton3: TRadioButton
      Left = 16
      Top = 24
      Width = 73
      Height = 17
      Caption = #29992#25143#32534#21495'  '
      Checked = True
      TabOrder = 0
      TabStop = True
      OnClick = RadioButton3Click
    end
    object RadioButton4: TRadioButton
      Left = 96
      Top = 24
      Width = 73
      Height = 17
      Caption = #29992#25143#22995#21517
      TabOrder = 1
      OnClick = RadioButton4Click
    end
    object RadioButton5: TRadioButton
      Left = 176
      Top = 24
      Width = 49
      Height = 17
      Caption = #32423#21035
      TabOrder = 2
      OnClick = RadioButton5Click
    end
    object RadioButton6: TRadioButton
      Left = 240
      Top = 24
      Width = 73
      Height = 17
      Caption = #27880#20876#26102#38388
      TabOrder = 3
      OnClick = RadioButton6Click
    end
  end
  object DateTimePicker1: TDateTimePicker
    Left = 96
    Top = 104
    Width = 121
    Height = 21
    Date = 38489.801220381950000000
    Time = 38489.801220381950000000
    TabOrder = 4
  end
  object DataSource1: TDataSource
    DataSet = ADOQuery1
    Left = 616
    Top = 288
  end
  object ADOQuery1: TADOQuery
    Active = True
    ConnectionString = 
      'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=Manage.mdb;Persist ' +
      'Security Info=False'
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'Select * From DinnerUser')
    Left = 616
    Top = 248
  end
end