roompriceunit.dfm

来自「很好地delphi书籍源码」· DFM 代码 · 共 838 行 · 第 1/3 页

    end
    object ConEdit: TEdit
      Left = 78
      Top = 180
      Width = 181
      Height = 21
      TabOrder = 8
      Text = '   '
    end
  end
  object ModGB: TGroupBox
    Left = 314
    Top = 80
    Width = 271
    Height = 267
    Caption = #20462#25913#20449#24687
    Color = clSkyBlue
    DragKind = dkDock
    DragMode = dmAutomatic
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = #23435#20307
    Font.Style = []
    ParentColor = False
    ParentFont = False
    TabOrder = 3
    Visible = False
    object Label7: TLabel
      Left = 16
      Top = 28
      Width = 52
      Height = 13
      Caption = #25151#38388#21495#30721
    end
    object Label8: TLabel
      Left = 16
      Top = 54
      Width = 52
      Height = 13
      Caption = #24202#20301#21495#30721
    end
    object Label9: TLabel
      Left = 16
      Top = 80
      Width = 52
      Height = 13
      Caption = #25151#38388#31867#21035
    end
    object Label10: TLabel
      Left = 16
      Top = 106
      Width = 52
      Height = 13
      Caption = #24202#20301#20215#26684
    end
    object Label11: TLabel
      Left = 16
      Top = 132
      Width = 52
      Height = 13
      Caption = #25151#38388#29366#24577
    end
    object Label12: TLabel
      Left = 16
      Top = 156
      Width = 52
      Height = 13
      Caption = #24202#20301#29366#24577
    end
    object Label14: TLabel
      Left = 16
      Top = 182
      Width = 52
      Height = 13
      Caption = #25151#38388#26465#20214
    end
    object ModRoom: TEdit
      Left = 72
      Top = 24
      Width = 111
      Height = 21
      TabOrder = 0
    end
    object ModBed: TEdit
      Left = 72
      Top = 50
      Width = 111
      Height = 21
      TabOrder = 1
    end
    object ModKind: TComboBox
      Left = 72
      Top = 76
      Width = 111
      Height = 21
      Style = csDropDownList
      ItemHeight = 13
      ItemIndex = 0
      TabOrder = 2
      Text = #26222#36890#19977#20154#38388
      OnChange = ModKindChange
      OnClick = ModKindChange
      Items.Strings = (
        #26222#36890#19977#20154#38388
        #26631#20934#38388
        #35946#21326#21452#20154#38388
        #24635#32479#22871#38388)
    end
    object ModOkButton: TButton
      Left = 62
      Top = 220
      Width = 61
      Height = 23
      Caption = #30830#23450
      TabOrder = 3
      OnClick = ModOkButtonClick
    end
    object ModCancelButton: TButton
      Left = 140
      Top = 220
      Width = 61
      Height = 23
      Caption = #21462#28040
      TabOrder = 4
      OnClick = ModCancelButtonClick
    end
    object ModRoomState: TComboBox
      Left = 72
      Top = 128
      Width = 111
      Height = 21
      Style = csDropDownList
      ItemHeight = 13
      TabOrder = 5
      Items.Strings = (
        #31354#38386
        #39044#23450
        #20837#20303
        #20303#28385
        #33039#25151)
    end
    object ModBedState: TComboBox
      Left = 72
      Top = 154
      Width = 111
      Height = 21
      Style = csDropDownList
      ItemHeight = 13
      ItemIndex = 0
      TabOrder = 6
      Text = #31354#38386
      Items.Strings = (
        #31354#38386
        #20837#20303)
    end
    object ModPrice: TSpinEdit
      Left = 72
      Top = 102
      Width = 111
      Height = 22
      MaxValue = 2000
      MinValue = 5
      TabOrder = 7
      Value = 50
    end
    object Condition: TEdit
      Left = 72
      Top = 180
      Width = 187
      Height = 21
      TabOrder = 8
    end
  end
  object Panel1: TPanel
    Left = 608
    Top = 45
    Width = 104
    Height = 348
    Align = alRight
    Color = 15707702
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
    TabOrder = 4
    object Label15: TLabel
      Left = 8
      Top = 84
      Width = 72
      Height = 12
      Caption = #26681#25454#25151#38388#31867#21035
    end
    object Label16: TLabel
      Left = 16
      Top = 16
      Width = 42
      Height = 21
      Caption = #26597#35810
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -21
      Font.Name = #21326#25991#26032#39759
      Font.Style = [fsItalic]
      ParentFont = False
    end
    object Label17: TLabel
      Left = 8
      Top = 136
      Width = 72
      Height = 12
      Caption = #26681#25454#20351#29992#29366#24577
    end
    object NameCB: TComboBox
      Left = 8
      Top = 100
      Width = 91
      Height = 20
      ItemHeight = 12
      TabOrder = 0
      OnChange = NameCBChange
      Items.Strings = (
        ''
        #36213#38065#23385#26446
        #21608#21556#37073#29579
        #20911#38472#35832#21355
        #33931#27784#38889#26472
        #26417#31206#23588#35768'  '
        #20309#21525#26045#24352
        #23380#26361#20005#21326'  '
        #37329#39759#38518#23004
        #25114#35874#37049#21947'  '
        #26575#27700#31398#31456
        #20113#33487#28504#33883'  '
        #22874#33539#24429#37070
        #40065#38886#26124#39532'  '
        #33495#20964#33457#26041
        #20446#20219#34945#26611'  '
        #37190#40077#21490#21776
        #36153#24265#23697#34203'  '
        #38647#36154#20522#27748)
    end
    object StateCB: TComboBox
      Left = 8
      Top = 150
      Width = 89
      Height = 20
      Style = csDropDownList
      ItemHeight = 12
      TabOrder = 1
      OnChange = StateCBChange
      Items.Strings = (
        #25152#26377
        #31354#38386
        #20303#28385
        #20837#20303
        #32500#20462)
    end
  end
  object SBar: TStatusBar
    Left = 0
    Top = 393
    Width = 712
    Height = 28
    Panels = <>
    SimplePanel = True
  end
  object ImageList1: TImageList
    Left = 624
    Top = 10
    Bitmap = {
      494C01010D000E00040010001000FFFFFFFFFF10FFFFFFFFFFFFFFFF424D3600
      0000000000003600000028000000400000004000000001001000000000000020
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000