dinnerorder.dfm

完成酒店管理系统

object DinnerOrderFrm: TDinnerOrderFrm
  Left = 115
  Top = 106
  Width = 667
  Height = 487
  Caption = #35746#21333#31649#29702#20449#24687
  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 = 625
    Height = 153
    Caption = #35746#21333#20449#24687
    TabOrder = 0
    object Label1: TLabel
      Left = 8
      Top = 16
      Width = 72
      Height = 13
      Caption = #35746#21333#32534#21495#65306#12288
    end
    object Label2: TLabel
      Left = 184
      Top = 16
      Width = 54
      Height = 13
      Caption = #39038#23458#22995#21517': '
    end
    object Label3: TLabel
      Left = 352
      Top = 16
      Width = 51
      Height = 13
      Caption = #39044#35745#37329#39069':'
    end
    object Label4: TLabel
      Left = 8
      Top = 48
      Width = 54
      Height = 13
      Caption = #35746#39184#26102#38388': '
    end
    object Label5: TLabel
      Left = 184
      Top = 48
      Width = 57
      Height = 13
      Caption = #39044#23450#26102#38388':  '
    end
    object Label6: TLabel
      Left = 352
      Top = 48
      Width = 54
      Height = 13
      Caption = #39184#26700#32534#21495': '
    end
    object Label7: TLabel
      Left = 8
      Top = 88
      Width = 60
      Height = 13
      Caption = #32852#31995#30005#35805':   '
    end
    object Label8: TLabel
      Left = 184
      Top = 88
      Width = 54
      Height = 13
      Caption = #29992#39184#20154#25968': '
    end
    object Label9: TLabel
      Left = 352
      Top = 88
      Width = 54
      Height = 13
      Caption = #20184#27454#26041#24335': '
    end
    object Label10: TLabel
      Left = 16
      Top = 120
      Width = 36
      Height = 13
      Caption = #22791#27880':   '
    end
    object Edit1: TEdit
      Left = 64
      Top = 16
      Width = 100
      Height = 21
      TabOrder = 0
    end
    object Edit2: TEdit
      Left = 240
      Top = 16
      Width = 100
      Height = 21
      TabOrder = 1
    end
    object Edit3: TEdit
      Left = 416
      Top = 16
      Width = 100
      Height = 21
      TabOrder = 2
    end
    object Edit4: TEdit
      Left = 416
      Top = 48
      Width = 100
      Height = 21
      TabOrder = 3
    end
    object Edit5: TEdit
      Left = 64
      Top = 88
      Width = 100
      Height = 21
      TabOrder = 4
    end
    object Edit6: TEdit
      Left = 240
      Top = 88
      Width = 100
      Height = 21
      TabOrder = 5
    end
    object Edit7: TEdit
      Left = 64
      Top = 120
      Width = 457
      Height = 21
      TabOrder = 6
    end
    object ComboBox1: TComboBox
      Left = 424
      Top = 88
      Width = 100
      Height = 21
      ItemHeight = 13
      TabOrder = 7
      Items.Strings = (
        #20449#29992#21345
        #32593#19978
        #29616#37329)
    end
    object DateTimePicker1: TDateTimePicker
      Left = 64
      Top = 48
      Width = 100
      Height = 25
      Date = 38490.513732615740000000
      Time = 38490.513732615740000000
      TabOrder = 8
    end
    object DateTimePicker2: TDateTimePicker
      Left = 248
      Top = 48
      Width = 100
      Height = 25
      Date = 38490.513811319450000000
      Time = 38490.513811319450000000
      TabOrder = 9
    end
    object Button1: TButton
      Left = 544
      Top = 16
      Width = 75
      Height = 25
      Caption = #28155#21152
      TabOrder = 10
      OnClick = Button1Click
    end
    object Button2: TButton
      Left = 544
      Top = 48
      Width = 75
      Height = 25
      Caption = #21024#38500
      TabOrder = 11
      OnClick = Button2Click
    end
    object Button3: TButton
      Left = 544
      Top = 80
      Width = 75
      Height = 25
      Caption = #20462#25913
      TabOrder = 12
      OnClick = Button3Click
    end
    object Button4: TButton
      Left = 544
      Top = 112
      Width = 75
      Height = 25
      Caption = #28165#31354
      TabOrder = 13
      OnClick = Button4Click
    end
  end
  object DBGrid1: TDBGrid
    Left = 16
    Top = 168
    Width = 617
    Height = 193
    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 = 32
    Top = 384
    Width = 201
    Height = 41
    Caption = #25490#24207#26041#27861
    TabOrder = 2
    object RadioButton1: TRadioButton
      Left = 24
      Top = 16
      Width = 65
      Height = 17
      Caption = #21319#24207
      Checked = True
      TabOrder = 0
      TabStop = True
      OnClick = RadioButton1Click
    end
    object RadioButton2: TRadioButton
      Left = 112
      Top = 16
      Width = 73
      Height = 17
      Caption = #38477#24207
      TabOrder = 1
      OnClick = RadioButton2Click
    end
  end
  object GroupBox3: TGroupBox
    Left = 288
    Top = 384
    Width = 345
    Height = 41
    Caption = #25490#24207#20869#23481
    TabOrder = 3
    object RadioButton3: TRadioButton
      Left = 8
      Top = 16
      Width = 57
      Height = 17
      Caption = #32534#21495
      Checked = True
      TabOrder = 0
      TabStop = True
      OnClick = RadioButton3Click
    end
    object RadioButton4: TRadioButton
      Left = 80
      Top = 16
      Width = 57
      Height = 17
      Caption = #22995#21517
      TabOrder = 1
      OnClick = RadioButton4Click
    end
    object RadioButton5: TRadioButton
      Left = 152
      Top = 16
      Width = 57
      Height = 17
      Caption = #37329#39069
      TabOrder = 2
      OnClick = RadioButton5Click
    end
    object RadioButton6: TRadioButton
      Left = 224
      Top = 16
      Width = 73
      Height = 17
      Caption = #39044#23450#26102#38388
      TabOrder = 3
      OnClick = RadioButton6Click
    end
  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 DinnerOrder')
    Left = 616
    Top = 352
  end
  object DataSource1: TDataSource
    DataSet = ADOQuery1
    Left = 632
    Top = 184
  end
end