unit9.dfm

一个用DELPHI编的酒店管理系统。 其中数据库：SQL Server2000, 只需恢复 My database文件夹中 My database_Data.MDF和 My database_Log.

object Form9: TForm9
  Left = 206
  Top = 134
  Width = 644
  Height = 631
  Caption = #20379#24212#21830#20449#24687#26597#35810
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -16
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  PixelsPerInch = 96
  TextHeight = 20
  object GroupBox1: TGroupBox
    Left = 16
    Top = 16
    Width = 601
    Height = 121
    Caption = #22635#20889#20851#38190#23383#26597#35810
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 0
    object Label1: TLabel
      Left = 16
      Top = 40
      Width = 89
      Height = 16
      AutoSize = False
      Caption = #20379#24212#21830#32534#21495#65306
    end
    object Label2: TLabel
      Left = 200
      Top = 40
      Width = 89
      Height = 16
      AutoSize = False
      Caption = #20379#24212#21830#21517#31216#65306
    end
    object Label5: TLabel
      Left = 416
      Top = 40
      Width = 81
      Height = 16
      AutoSize = False
      Caption = #20449#35465#31561#32423#65306
    end
    object Edit1: TEdit
      Left = 104
      Top = 32
      Width = 81
      Height = 24
      AutoSize = False
      TabOrder = 0
      Text = 'Edit1'
    end
    object Edit2: TEdit
      Left = 296
      Top = 32
      Width = 105
      Height = 24
      AutoSize = False
      MaxLength = 8
      TabOrder = 1
      Text = 'Edit2'
    end
    object ComboBox4: TComboBox
      Left = 496
      Top = 32
      Width = 81
      Height = 24
      ItemHeight = 16
      MaxLength = 4
      TabOrder = 2
      Text = 'ComboBox4'
      Items.Strings = (
        ''
        'A'
        'B'
        'C'
        #40657#21517#21333)
    end
  end
  object DBGrid1: TDBGrid
    Left = 16
    Top = 152
    Width = 601
    Height = 369
    TabOrder = 1
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -16
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
  end
  object GroupBox2: TGroupBox
    Left = 24
    Top = 80
    Width = 201
    Height = 41
    Caption = #25490#24207#26041#27861
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 2
    object RadioButton1: TRadioButton
      Left = 32
      Top = 16
      Width = 65
      Height = 17
      Caption = #21319#24207
      TabOrder = 0
    end
    object RadioButton2: TRadioButton
      Left = 112
      Top = 16
      Width = 49
      Height = 17
      Caption = #38477#24207
      TabOrder = 1
    end
  end
  object GroupBox3: TGroupBox
    Left = 264
    Top = 80
    Width = 329
    Height = 41
    Caption = #25490#24207#20869#23481
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 3
    object RadioButton3: TRadioButton
      Left = 48
      Top = 16
      Width = 49
      Height = 17
      Caption = #32534#21495
      TabOrder = 0
    end
    object RadioButton4: TRadioButton
      Left = 144
      Top = 16
      Width = 57
      Height = 17
      Caption = #22995#21517
      TabOrder = 1
    end
    object RadioButton5: TRadioButton
      Left = 232
      Top = 16
      Width = 57
      Height = 17
      Caption = #31561#32423
      TabOrder = 2
    end
  end
  object GroupBox6: TGroupBox
    Left = 16
    Top = 528
    Width = 233
    Height = 57
    Caption = #35760#24405#27983#35272#25353#38062
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 4
    object DBNavigator1: TDBNavigator
      Left = 8
      Top = 24
      Width = 216
      Height = 25
      VisibleButtons = [nbFirst, nbPrior, nbNext, nbLast]
      TabOrder = 0
    end
  end
  object GroupBox7: TGroupBox
    Left = 264
    Top = 528
    Width = 353
    Height = 57
    Caption = #21629#20196#25353#38062
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 5
    object select: TButton
      Left = 8
      Top = 24
      Width = 65
      Height = 25
      Caption = #26597#35810
      TabOrder = 0
    end
    object modify: TButton
      Left = 96
      Top = 24
      Width = 65
      Height = 25
      Caption = #20462#25913
      TabOrder = 1
    end
    object delete: TButton
      Left = 184
      Top = 24
      Width = 65
      Height = 25
      Caption = #21024#38500
      TabOrder = 2
    end
    object refresh: TButton
      Left = 272
      Top = 24
      Width = 65
      Height = 25
      Caption = #28165#23631
      TabOrder = 3
    end
  end
end