checkout.~dfm

全面剖析酒店管理的内容

inherited fmCheckOut: TfmCheckOut
  Left = 218
  Top = 147
  Caption = #25910#38134#36864#25151
  OldCreateOrder = True
  PixelsPerInch = 96
  TextHeight = 13
  inherited ToolBar1: TToolBar
    inherited btNew: TToolButton
      Enabled = False
      Visible = False
    end
    inherited btEdit: TToolButton
      Enabled = False
      Visible = False
    end
    inherited btDelete: TToolButton
      Enabled = False
      Visible = False
    end
    inherited btSave: TToolButton
      Enabled = False
      Visible = False
    end
    inherited btCancel: TToolButton
      Enabled = False
      Visible = False
    end
  end
  inherited DBGrid1: TDBGrid
    Height = 126
    Columns = <
      item
        Expanded = False
        FieldName = #20837#20303#21333#21495
        Width = 72
        Visible = True
      end
      item
        Expanded = False
        FieldName = #23458#25151#31867#22411
        Width = 56
        Visible = True
      end
      item
        Expanded = False
        FieldName = #23458#25151#32534#21495
        Width = 55
        Visible = True
      end
      item
        Expanded = False
        FieldName = #25269#24215#26102#38388
        Width = 65
        Visible = True
      end
      item
        Expanded = False
        FieldName = #31163#24215#26102#38388
        Width = 63
        Visible = True
      end
      item
        Expanded = False
        FieldName = #20837#20303#20215#26684
        Width = 54
        Visible = True
      end
      item
        Expanded = False
        FieldName = #21152#24202#20215#26684
        Width = 55
        Visible = True
      end
      item
        Expanded = False
        FieldName = #39044#25910#27454
        Width = 56
        Visible = True
      end
      item
        Expanded = False
        FieldName = #24212#25910#24080#27454
        Width = 56
        Visible = True
      end
      item
        Expanded = False
        FieldName = #32467#24080#37329#39069
        Visible = True
      end
      item
        Expanded = False
        FieldName = #26159#21542#32467#24080
        Visible = True
      end
      item
        Expanded = False
        FieldName = #32467#24080#26085#26399
        Visible = True
      end
      item
        Expanded = False
        FieldName = #20184#27454#26041#24335
        Visible = True
      end>
  end
  inherited Panel2: TPanel
    Top = 201
    Height = 183
    object DBGrid2: TDBGrid
      Left = 1
      Top = 1
      Width = 681
      Height = 181
      Align = alClient
      DataSource = DataSource2
      ReadOnly = True
      TabOrder = 0
      TitleFont.Charset = ANSI_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -13
      TitleFont.Name = #26032#23435#20307
      TitleFont.Style = []
      Columns = <
        item
          Expanded = False
          FieldName = #24080#21333#32534#21495
          Width = 58
          Visible = True
        end
        item
          Expanded = False
          FieldName = #20837#20303#21333#21495
          Width = 91
          Visible = True
        end
        item
          Expanded = False
          FieldName = #28040#36153#20869#23481
          Width = 89
          Visible = True
        end
        item
          Expanded = False
          FieldName = #28040#36153#37329#39069
          Visible = True
        end
        item
          Expanded = False
          FieldName = #28040#36153#26102#38388
          Width = 110
          Visible = True
        end
        item
          Expanded = False
          FieldName = #22791#27880
          Width = 174
          Visible = True
        end>
    end
  end
  object Panel3: TPanel [4]
    Left = 0
    Top = 384
    Width = 683
    Height = 120
    Align = alBottom
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = #26032#23435#20307
    Font.Style = []
    ParentFont = False
    TabOrder = 4
    object Label4: TLabel
      Left = 198
      Top = 62
      Width = 56
      Height = 13
      Caption = #32467#24080#37329#39069
      FocusControl = EditDBEdit
    end
    object Label5: TLabel
      Left = 285
      Top = 62
      Width = 56
      Height = 13
      Caption = #20184#27454#26041#24335
    end
    object Label6: TLabel
      Left = 16
      Top = 8
      Width = 581
      Height = 13
      Caption = #24212#25910#24080#27454'=('#20837#20303#20215#26684'+'#21152#24202#20215#26684')'#215#20303#24215#22825#25968'+'#24080#21333#26126#32454#28040#36153#37329#39069#65307#20303#24215#22825#25968'='#24403#21069#26085#26399'-'#25269#24215#26085#26399
    end
    object Label7: TLabel
      Left = 16
      Top = 32
      Width = 196
      Height = 13
      Caption = #32467#24080#37329#39069' = '#24212#25910#36134#27454' - '#39044#25910#27454
    end
    object EditDBEdit: TDBEdit
      Left = 198
      Top = 77
      Width = 65
      Height = 21
      DataField = #32467#24080#37329#39069
      DataSource = DataSource1
      Enabled = False
      TabOrder = 0
    end
    object btCalBill: TBitBtn
      Left = 40
      Top = 72
      Width = 129
      Height = 25
      Caption = #35745#31639#24212#25910#24080#27454
      TabOrder = 1
      OnClick = btCalBillClick
      Glyph.Data = {
        DE010000424DDE01000000000000760000002800000024000000120000000100
        0400000000006801000000000000000000001000000000000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333444444
        33333333333F8888883F33330000324334222222443333388F3833333388F333
        000032244222222222433338F8833FFFFF338F3300003222222AAAAA22243338
        F333F88888F338F30000322222A33333A2224338F33F8333338F338F00003222
        223333333A224338F33833333338F38F00003222222333333A444338FFFF8F33
        3338888300003AAAAAAA33333333333888888833333333330000333333333333
        333333333333333333FFFFFF000033333333333344444433FFFF333333888888
        00003A444333333A22222438888F333338F3333800003A2243333333A2222438
        F38F333333833338000033A224333334422224338338FFFFF8833338000033A2
        22444442222224338F3388888333FF380000333A2222222222AA243338FF3333
        33FF88F800003333AA222222AA33A3333388FFFFFF8833830000333333AAAAAA
        3333333333338888883333330000333333333333333333333333333333333333
        0000}
      NumGlyphs = 2
    end
    object BitBtn2: TBitBtn
      Left = 440
      Top = 72
      Width = 129
      Height = 25
      Caption = #25910#38134#32467#24080#36864#25151
      Default = True
      TabOrder = 2
      OnClick = BitBtn2Click
      Glyph.Data = {
        DE010000424DDE01000000000000760000002800000024000000120000000100
        0400000000006801000000000000000000001000000000000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        3333333333333333333333330000333333333333333333333333F33333333333
        00003333344333333333333333388F3333333333000033334224333333333333
        338338F3333333330000333422224333333333333833338F3333333300003342
        222224333333333383333338F3333333000034222A22224333333338F338F333
        8F33333300003222A3A2224333333338F3838F338F33333300003A2A333A2224
        33333338F83338F338F33333000033A33333A222433333338333338F338F3333
        0000333333333A222433333333333338F338F33300003333333333A222433333
        333333338F338F33000033333333333A222433333333333338F338F300003333
        33333333A222433333333333338F338F00003333333333333A22433333333333
        3338F38F000033333333333333A223333333333333338F830000333333333333
        333A333333333333333338330000333333333333333333333333333333333333
        0000}
      NumGlyphs = 2
    end
    object ComboBox1: TComboBox
      Left = 288
      Top = 77
      Width = 97
      Height = 21
      ItemHeight = 13
      TabOrder = 3
      Items.Strings = (
        #29616#37329
        #25903#31080
        #20449#29992#21345
        #20195#37329#21048
        #20854#20182)
    end
  end
  inherited Table1: TTable
    Active = True
    TableName = 'dbo.'#20837#20303#21333
  end
  object DataSource2: TDataSource
    AutoEdit = False
    DataSet = Table2
    Left = 616
    Top = 304
  end
  object Table2: TTable
    Active = True
    DatabaseName = 'db'
    IndexFieldNames = #20837#20303#21333#21495
    MasterFields = #20837#20303#21333#21495
    MasterSource = DataSource1
    TableName = 'dbo.'#24080#21333#26126#32454
    Left = 576
    Top = 304
  end
end