datamodule.dfm

本人开发的一个酒店管理小程序

object DataMod: TDataMod
  OldCreateOrder = False
  Left = 490
  Top = 78
  Height = 476
  Width = 445
  object QianXianDataSet: TDataSource
    DataSet = QianXianQuery
    Left = 32
    Top = 16
  end
  object QianXianQuery: TQuery
    Active = True
    DatabaseName = 'HotelDatabase'
    SQL.Strings = (
      'select * from '#26435#38480#20449#24687#34920)
    Left = 32
    Top = 64
  end
  object QianXianTable: TTable
    Active = True
    DatabaseName = 'HotelDatabase'
    TableName = 'dbo.'#26435#38480#20449#24687#34920
    Left = 32
    Top = 128
  end
  object Database1: TDatabase
    AliasName = 'Hotel'
    Connected = True
    DatabaseName = 'HotelDatabase'
    LoginPrompt = False
    SessionName = 'Default'
    Left = 96
    Top = 8
  end
  object CaiYinKongFangDataSet: TDataSource
    DataSet = CaiYinKongFangQuery
    Left = 32
    Top = 200
  end
  object CaiYinKongFangQuery: TQuery
    DatabaseName = 'HotelDatabase'
    RequestLive = True
    SQL.Strings = (
      'select * from '#25151#38388#21488#21495#20449#24687#34920)
    Left = 32
    Top = 248
    object CaiYinKongFangQueryBDEDesigner: TStringField
      FieldName = #29366#24577
      Origin = 'HOTELDATABASE."dbo.'#25151#38388#21488#21495#20449#24687#34920'".'#29366#24577
      FixedChar = True
      Size = 10
    end
    object CaiYinKongFangQueryBDEDesigner2: TIntegerField
      FieldName = #32534#21495
      Origin = 'HOTELDATABASE."dbo.'#25151#38388#21488#21495#20449#24687#34920'".'#32534#21495
    end
    object CaiYinKongFangQueryBDEDesigner3: TStringField
      FieldName = #25151#21488#21517#31216
      Origin = 'HOTELDATABASE."dbo.'#25151#38388#21488#21495#20449#24687#34920'".'#25151#21488#21517#31216
      FixedChar = True
      Size = 10
    end
    object CaiYinKongFangQueryBDEDesigner4: TStringField
      FieldName = #31867#22411#35828#26126
      Origin = 'HOTELDATABASE."dbo.'#25151#38388#21488#21495#20449#24687#34920'".'#31867#22411#35828#26126
      FixedChar = True
      Size = 10
    end
    object CaiYinKongFangQueryBDEDesigner5: TStringField
      FieldName = #39184#39278#37096#38376
      Origin = 'HOTELDATABASE."dbo.'#25151#38388#21488#21495#20449#24687#34920'".'#39184#39278#37096#38376
      FixedChar = True
      Size = 10
    end
    object CaiYinKongFangQueryBDEDesigner6: TFloatField
      FieldName = #26381#21153#36153
      Origin = 'HOTELDATABASE."dbo.'#25151#38388#21488#21495#20449#24687#34920'".'#26381#21153#36153
    end
    object CaiYinKongFangQueryBDEDesigner7: TStringField
      FieldName = #31616#35201#35828#26126
      Origin = 'HOTELDATABASE."dbo.'#25151#38388#21488#21495#20449#24687#34920'".'#31616#35201#35828#26126
      FixedChar = True
    end
  end
  object CanYinTable: TTable
    DatabaseName = 'HotelDatabase'
    TableName = 'dbo.'#39184#39278#37096#38376
    Left = 32
    Top = 304
  end
  object CaiYinDataSet: TDataSource
    DataSet = CanYinTable
    Left = 32
    Top = 352
  end
  object ZhuanTaiKongFangQuery: TQuery
    DatabaseName = 'HotelDatabase'
    RequestLive = True
    SQL.Strings = (
      'select * from '#25151#38388#21488#21495#20449#24687#34920)
    Left = 144
    Top = 64
  end
  object ZhuanTaiKongFangDataSet: TDataSource
    DataSet = ZhuanTaiKongFangQuery
    Left = 144
    Top = 112
  end
  object BianTaiQuery: TQuery
    DatabaseName = 'HotelDatabase'
    RequestLive = True
    Left = 144
    Top = 192
  end
  object DianCaiDataSet: TDataSource
    DataSet = DianCaiQuery
    Left = 152
    Top = 272
  end
  object DianCaiQuery: TQuery
    Active = True
    DatabaseName = 'HotelDatabase'
    SQL.Strings = (
      'select * from '#33756#35889#36153#29992#20449#24687#34920)
    Left = 152
    Top = 320
    object DianCaiQueryBDEDesigner: TStringField
      FieldName = #33756#21517
      Origin = 'HOTELDATABASE."dbo.'#33756#35889#36153#29992#20449#24687#34920'".'#33756#21517
      FixedChar = True
      Size = 50
    end
    object DianCaiQueryBDEDesigner2: TFloatField
      FieldName = #20215#26684
      Origin = 'HOTELDATABASE."dbo.'#33756#35889#36153#29992#20449#24687#34920'".'#20215#26684
    end
    object DianCaiQueryBDEDesigner3: TIntegerField
      FieldName = #32534#21495
      Origin = 'HOTELDATABASE."dbo.'#33756#35889#36153#29992#20449#24687#34920'".'#32534#21495
    end
    object DianCaiQueryBDEDesigner4: TStringField
      FieldName = #21333#20301
      Origin = 'HOTELDATABASE."dbo.'#33756#35889#36153#29992#20449#24687#34920'".'#21333#20301
      FixedChar = True
      Size = 10
    end
    object DianCaiQueryBDEDesigner5: TStringField
      FieldName = #33756#31995#31867#21035
      Origin = 'HOTELDATABASE."dbo.'#33756#35889#36153#29992#20449#24687#34920'".'#33756#31995#31867#21035
      FixedChar = True
    end
    object DianCaiQueryBDEDesigner6: TStringField
      FieldName = #21475#21619#35828#26126
      Origin = 'HOTELDATABASE."dbo.'#33756#35889#36153#29992#20449#24687#34920'".'#21475#21619#35828#26126
      FixedChar = True
      Size = 30
    end
    object DianCaiQuerytatol: TFloatField
      FieldKind = fkCalculated
      FieldName = 'tatol'
      Calculated = True
    end
  end
  object JiuShuiQuery: TQuery
    Active = True
    DatabaseName = 'HotelDatabase'
    SQL.Strings = (
      'select * from '#37202#27700#36153#29992#20449#24687#34920)
    Left = 256
    Top = 16
    object JiuShuiQueryBDEDesigner: TStringField
      FieldName = #37202#27700#21517#31216
      Origin = 'HOTELDATABASE."dbo.'#37202#27700#36153#29992#20449#24687#34920'".'#37202#27700#21517#31216
      FixedChar = True
      Size = 10
    end
    object JiuShuiQueryBDEDesigner2: TFloatField
      FieldName = #20215#26684
      Origin = 'HOTELDATABASE."dbo.'#37202#27700#36153#29992#20449#24687#34920'".'#20215#26684
    end
    object JiuShuiQueryBDEDesigner3: TIntegerField
      FieldName = #32534#21495
      Origin = 'HOTELDATABASE."dbo.'#37202#27700#36153#29992#20449#24687#34920'".'#32534#21495
    end
    object JiuShuiQueryBDEDesigner4: TIntegerField
      FieldName = #36135#23384#32534#21495
      Origin = 'HOTELDATABASE."dbo.'#37202#27700#36153#29992#20449#24687#34920'".'#36135#23384#32534#21495
    end
    object JiuShuiQueryBDEDesigner5: TStringField
      FieldName = #21333#20301
      Origin = 'HOTELDATABASE."dbo.'#37202#27700#36153#29992#20449#24687#34920'".'#21333#20301
      FixedChar = True
      Size = 10
    end
    object JiuShuiQueryBDEDesigner6: TStringField
      FieldName = #37202#27700#31867#21035
      Origin = 'HOTELDATABASE."dbo.'#37202#27700#36153#29992#20449#24687#34920'".'#37202#27700#31867#21035
      FixedChar = True
    end
    object JiuShuiQueryBDEDesigner7: TStringField
      FieldName = #31616#35201#35828#26126
      Origin = 'HOTELDATABASE."dbo.'#37202#27700#36153#29992#20449#24687#34920'".'#31616#35201#35828#26126
      FixedChar = True
    end
  end
  object CanJiQuery: TQuery
    Active = True
    DatabaseName = 'HotelDatabase'
    SQL.Strings = (
      'select * from '#39184#20855#36153#29992#20449#24687#34920)
    Left = 256
    Top = 144
    object CanJiQueryBDEDesigner: TStringField
      FieldName = #39184#20855#21517#31216
      Origin = 'HOTELDATABASE."dbo.'#39184#20855#36153#29992#20449#24687#34920'".'#39184#20855#21517#31216
      FixedChar = True
      Size = 10
    end
    object CanJiQueryBDEDesigner2: TFloatField
      FieldName = #20215#26684
      Origin = 'HOTELDATABASE."dbo.'#39184#20855#36153#29992#20449#24687#34920'".'#20215#26684
    end
  end
  object JiuShuiDataSet: TDataSource
    DataSet = JiuShuiQuery
    Left = 256
    Top = 64
  end
  object CanJiDataSet: TDataSource
    DataSet = CanJiQuery
    Left = 256
    Top = 192
  end
  object JieZhangDataSet: TDataSource
    DataSet = JieZhangTable
    Left = 248
    Top = 264
  end
  object JieZhangTable: TTable
    Active = True
    OnCalcFields = JieZhangTableCalcFields
    DatabaseName = 'HotelDatabase'
    TableName = 'dbo.'#25346#36134#20020#26102#28857#21333#34920
    Left = 248
    Top = 320
    object JieZhangTableid: TIntegerField
      FieldName = 'id'
      Required = True
    end
    object JieZhangTableBDEDesigner: TIntegerField
      FieldName = #25151#38388#21488#21495
    end
    object JieZhangTableBDEDesigner2: TStringField
      FieldName = #31867#21035
      FixedChar = True
      Size = 50
    end
    object JieZhangTableBDEDesigner3: TIntegerField
      FieldName = #32534#21495
    end
    object JieZhangTableBDEDesigner4: TStringField
      FieldName = #21517#31216
      FixedChar = True
      Size = 30
    end
    object JieZhangTableBDEDesigner5: TStringField
      FieldName = #31867#22411
      FixedChar = True
      Size = 10
    end
    object JieZhangTableBDEDesigner6: TStringField
      FieldName = #21333#20301
      FixedChar = True
      Size = 10
    end
    object JieZhangTableBDEDesigner7: TIntegerField
      FieldName = #25968#37327
    end
    object JieZhangTableBDEDesigner8: TFloatField
      FieldName = #20215#26684
    end
    object JieZhangTableBDEDesigner9: TFloatField
      FieldName = #21512#35745
    end
    object JieZhangTableBDEDesigner10: TDateTimeField
      FieldName = #28857#21333#26085#26399
    end
    object JieZhangTableBDEDesigner11: TDateTimeField
      FieldName = #32467#21333#26085#26399
    end
    object JieZhangTableBDEDesigner12: TIntegerField
      FieldName = #26381#21153#21592#32534#21495
    end
    object JieZhangTableBDEDesigner13: TStringField
      FieldName = #26381#21153#21592#22995#21517
      FixedChar = True
      Size = 10
    end
    object JieZhangTableBDEDesigner14: TStringField
      FieldName = #29366#24577
      FixedChar = True
      Size = 10
    end
    object JieZhangTableBDEDesigner15: TIntegerField
      FieldName = #32467#36134#32534#21495
    end
    object JieZhangTableBDEDesigner16: TStringField
      FieldName = #26159#21542#32467#21333
      FixedChar = True
      Size = 10
    end
    object JieZhangTableTotal: TFloatField
      FieldKind = fkCalculated
      FieldName = 'Total'
      Calculated = True
    end
  end
end