c_xxxg.dfm

经典的酒店管理系统

          Left = 325
          Top = 22
          Width = 75
          Height = 24
          Style = csDropDownList
          DataField = 'D_XB'
          DataSource = dsWork
          ItemHeight = 16
          Items.Strings = (
            #30007
            #22899)
          TabOrder = 2
        end
        object DBLookupComboBox1: TDBLookupComboBox
          Left = 400
          Top = 22
          Width = 75
          Height = 24
          DataField = 'D_MZBH'
          DataSource = dsWork
          KeyField = 'D_QZBH'
          ListField = 'D_QZMC'
          ListSource = dsQzdm
          TabOrder = 3
        end
        object DBLookupComboBox2: TDBLookupComboBox
          Left = 13
          Top = 106
          Width = 150
          Height = 24
          DataField = 'D_DQBH'
          DataSource = dsWork
          KeyField = 'D_GBBH'
          ListField = 'D_GBMC'
          ListSource = dsGbdm
          TabOrder = 5
        end
        object DBLookupComboBox3: TDBLookupComboBox
          Left = 168
          Top = 64
          Width = 150
          Height = 24
          DataField = 'D_ZJBH'
          DataSource = dsWork
          KeyField = 'D_ZJBH'
          ListField = 'D_ZJMC'
          ListSource = dsZjdm
          TabOrder = 7
        end
        object dbeYwx: TDBEdit
          Left = 13
          Top = 22
          Width = 150
          Height = 24
          DataField = 'D_YWX'
          DataSource = dsWork
          TabOrder = 0
        end
        object dbeYwm: TDBEdit
          Left = 168
          Top = 22
          Width = 150
          Height = 24
          DataField = 'D_YWM'
          DataSource = dsWork
          TabOrder = 1
        end
        object DBEdit2: TDBEdit
          Left = 13
          Top = 64
          Width = 150
          Height = 24
          DataField = 'D_QZYXQ'
          DataSource = dsWork
          TabOrder = 4
        end
      end
      object TabSheet3: TTabSheet
        Caption = 'TabSheet3'
        ImageIndex = 2
        TabVisible = False
        object Label9: TLabel
          Left = 13
          Top = 6
          Width = 48
          Height = 16
          Caption = #25509#24453#20154
          FocusControl = dbeJdr
        end
        object Label26: TLabel
          Left = 173
          Top = 6
          Width = 64
          Height = 16
          Caption = #25509#24453#21333#20301
          FocusControl = dbeJddw
        end
        object Label27: TLabel
          Left = 13
          Top = 51
          Width = 64
          Height = 16
          Caption = #21333#20301#22320#22336
          FocusControl = dbeDwdz
        end
        object Label28: TLabel
          Left = 333
          Top = 4
          Width = 64
          Height = 16
          Caption = #32852#31995#30005#35805
          FocusControl = dbeLxdh
        end
        object Label29: TLabel
          Left = 173
          Top = 51
          Width = 32
          Height = 16
          Caption = #22791#27880
          FocusControl = DBEdit4
        end
        object Label30: TLabel
          Left = 13
          Top = 98
          Width = 64
          Height = 16
          Caption = #31614#21333#20154#19968
          FocusControl = dbeQdr1
        end
        object Label31: TLabel
          Left = 88
          Top = 98
          Width = 64
          Height = 16
          Caption = #31614#21333#20154#20108
          FocusControl = dbeQdr2
        end
        object Label32: TLabel
          Left = 174
          Top = 98
          Width = 64
          Height = 16
          Caption = #31614#21333#20154#19977
          FocusControl = dbeQdr3
        end
        object Label33: TLabel
          Left = 248
          Top = 98
          Width = 64
          Height = 16
          Caption = #31614#21333#20154#22235
          FocusControl = dbeQdr4
        end
        object dbeJdr: TDBEdit
          Left = 13
          Top = 22
          Width = 150
          Height = 24
          DataField = 'D_JDR'
          DataSource = dsWork
          TabOrder = 0
        end
        object dbeJddw: TDBEdit
          Left = 173
          Top = 22
          Width = 150
          Height = 24
          DataField = 'D_JDDW'
          DataSource = dsWork
          TabOrder = 1
        end
        object dbeDwdz: TDBEdit
          Left = 13
          Top = 68
          Width = 150
          Height = 24
          DataField = 'D_JTDZ'
          DataSource = dsWork
          TabOrder = 3
        end
        object dbeLxdh: TDBEdit
          Left = 333
          Top = 21
          Width = 150
          Height = 24
          DataField = 'D_LXDH'
          DataSource = dsWork
          TabOrder = 2
        end
        object DBEdit4: TDBEdit
          Left = 173
          Top = 68
          Width = 150
          Height = 24
          DataField = 'D_BZ'
          DataSource = dsWork
          TabOrder = 4
        end
        object dbeQdr1: TDBEdit
          Left = 13
          Top = 114
          Width = 75
          Height = 24
          DataField = 'D_QDR1'
          DataSource = dsWork
          TabOrder = 5
        end
        object dbeQdr2: TDBEdit
          Left = 88
          Top = 114
          Width = 75
          Height = 24
          DataField = 'D_QDR2'
          DataSource = dsWork
          TabOrder = 6
        end
        object dbeQdr3: TDBEdit
          Left = 174
          Top = 114
          Width = 75
          Height = 24
          DataField = 'D_QDR3'
          DataSource = dsWork
          TabOrder = 7
        end
        object dbeQdr4: TDBEdit
          Left = 248
          Top = 114
          Width = 75
          Height = 24
          DataField = 'D_QDR4'
          DataSource = dsWork
          TabOrder = 8
        end
      end
      object TabSheet4: TTabSheet
        Caption = 'TabSheet4'
        ImageIndex = 3
        TabVisible = False
        object Label34: TLabel
          Left = 8
          Top = 6
          Width = 48
          Height = 16
          Caption = #21516#24847#20154
          FocusControl = DBEdit9
        end
        object DBEdit9: TDBEdit
          Left = 8
          Top = 22
          Width = 100
          Height = 24
          DataField = 'D_JDR'
          DataSource = dsWork
          TabOrder = 0
        end
      end
    end
  end
  inherited Panel3: TPanel
    Top = 388
    inherited btnHelp: TBitBtn
      Left = 376
    end
    inherited btnClose: TBitBtn
      Left = 454
    end
    inherited btnPrint: TBitBtn
      Left = 298
    end
  end
  inherited qryWork: TQuery
    AfterOpen = qryWorkAfterOpen
    AfterClose = qryWorkAfterClose
    BeforeInsert = qryWorkBeforeInsert
    BeforeEdit = qryWorkBeforeEdit
    AfterPost = qryWorkAfterPost
    DatabaseName = 'LfHotelUser'
    RequestLive = True
    SQL.Strings = (
      'select * from KRXX')
    Left = 64
    object qryWorkD_KRBH: TStringField
      FieldName = 'D_KRBH'
      Origin = 'LFHOTELUSER.KRXX.D_KRBH'
      Size = 12
    end
    object qryWorkD_KRXM: TStringField
      FieldName = 'D_KRXM'
      Origin = 'LFHOTELUSER.KRXX.D_KRXM'
      Size = 30
    end
    object qryWorkD_KRLX: TStringField
      FieldName = 'D_KRLX'
      Origin = 'LFHOTELUSER.KRXX.D_KRLX'
      OnGetText = qryWorkD_KRLXGetText
      FixedChar = True
      Size = 1
    end
    object qryWorkD_DDRQ: TDateTimeField
      FieldName = 'D_DDRQ'
      Origin = 'LFHOTELUSER.KRXX.D_DDRQ'
    end
    object qryWorkD_DDSJ: TDateTimeField
      FieldName = 'D_DDSJ'
      Origin = 'LFHOTELUSER.KRXX.D_DDSJ'
      DisplayFormat = 'hh:nn:ss'
      EditMask = '!90:00;1; '
    end
    object qryWorkD_LDRQ: TDateTimeField
      FieldName = 'D_LDRQ'
      Origin = 'LFHOTELUSER.KRXX.D_LDRQ'
    end
    object qryWorkD_LDSJ: TDateTimeField
      FieldName = 'D_LDSJ'
      Origin = 'LFHOTELUSER.KRXX.D_LDSJ'
    end
    object qryWorkD_YWX: TStringField
      FieldName = 'D_YWX'
      Origin = 'LFHOTELUSER.KRXX.D_YWX'
      Size = 8
    end
    object qryWorkD_YWM: TStringField
      FieldName = 'D_YWM'
      Origin = 'LFHOTELUSER.KRXX.D_YWM'
      Size = 8
    end
    object qryWorkD_XB: TStringField
      FieldName = 'D_XB'
      Origin = 'LFHOTELUSER.KRXX.D_XB'
      Size = 2
    end
    object qryWorkD_MZBH: TStringField
      FieldName = 'D_MZBH'
      Origin = 'LFHOTELUSER.KRXX.D_MZBH'
      Size = 5
    end
    object qryWorkD_DQBH: TStringField
      FieldName = 'D_DQBH'
      Origin = 'LFHOTELUSER.KRXX.D_DQBH'
      Size = 5
    end
    object qryWorkD_GBBH: TStringField
      FieldName = 'D_GBBH'
      Origin = 'LFHOTELUSER.KRXX.D_GBBH'
      Size = 5
    end
    object qryWorkD_NZTS: TIntegerField
      FieldName = 'D_NZTS'
      Origin = 'LFHOTELUSER.KRXX.D_NZTS'
    end
    object qryWorkD_TLSY: TStringField
      FieldName = 'D_TLSY'
      Origin = 'LFHOTELUSER.KRXX.D_TLSY'
      Size = 10
    end
    object qryWorkD_ZJBH: TStringField
      FieldName = 'D_ZJBH'
      Origin = 'LFHOTELUSER.KRXX.D_ZJBH'
      OnChange = qryWorkD_ZJBHChange
      Size = 5
    end
    object qryWorkD_ZJHM: TStringField
      FieldName = 'D_ZJHM'
      Origin = 'LFHOTELUSER.KRXX.D_ZJHM'
      OnValidate = qryWorkD_ZJHMValidate
      Size = 18
    end
    object qryWorkD_CSNY: TDateTimeField
      FieldName = 'D_CSNY'
      Origin = 'LFHOTELUSER.KRXX.D_CSNY'
      DisplayFormat = 'yyyy-mm-dd'
      EditMask = '!0000/99/99;1; '
    end
    object qryWorkD_HCL: TStringField
      FieldName = 'D_HCL'
      Origin = 'LFHOTELUSER.KRXX.D_HCL'
      Size = 10
    end
    object qryWorkD_HCQ: TStringField
      FieldName = 'D_HCQ'
      Origin = 'LFHOTELUSER.KRXX.D_HCQ'
      Size = 10
    end
    object qryWorkD_QZBH: TStringField
      FieldName = 'D_QZBH'
      Origin = 'LFHOTELUSER.KRXX.D_QZBH'
      Size = 5
    end
    object qryWorkD_QZYXQ: TDateTimeField
      FieldName = 'D_QZYXQ'
      Origin = 'LFHOTELUSER.KRXX.D_QZYXQ'
    end
    object qryWorkD_ZY: TStringField
      FieldName = 'D_ZY'
      Origin = 'LFHOTELUSER.KRXX.D_ZY'
      Size = 10
    end
    object qryWorkD_LXDH: TStringField
      FieldName = 'D_LXDH'
      Origin = 'LFHOTELUSER.KRXX.D_LXDH'
      Size = 16
    end
    object qryWorkD_DWMC: TStringField
      FieldName = 'D_DWMC'
      Origin = 'LFHOTELUSER.KRXX.D_DWMC'
      Size = 30
    end
    object qryWorkD_JTDZ: TStringField
      FieldName = 'D_JTDZ'
      Origin = 'LFHOTELUSER.KRXX.D_JTDZ'
      Size = 30
    end
    object qryWorkD_JDR: TStringField
      FieldName = 'D_JDR'
      Origin = 'LFHOTELUSER.KRXX.D_JDR'
      Size = 8
    end
    object qryWorkD_JDDW: TStringField
      FieldName = 'D_JDDW'
      Origin = 'LFHOTELUSER.KRXX.D_JDDW'
      Size = 30
    end
    object qryWorkD_BZ: TStringField
      FieldName = 'D_BZ'
      Origin = 'LFHOTELUSER.KRXX.D_BZ'
      Size = 30
    end
    object qryWorkD_QDR1: TStringField
      FieldName = 'D_QDR1'
      Origin = 'LFHOTELUSER.KRXX.D_QDR1'
      Size = 8
    end
    object qryWorkD_QDR2: TStringField
      FieldName = 'D_QDR2'
      Origin = 'LFHOTELUSER.KRXX.D_QDR2'
      Size = 8
    end
    object qryWorkD_QDR3: TStringField
      FieldName = 'D_QDR3'
      Origin = 'LFHOTELUSER.KRXX.D_QDR3'
      Size = 8
    end
    object qryWorkD_QDR4: TStringField
      FieldName = 'D_QDR4'
      Origin = 'LFHOTELUSER.KRXX.D_QDR4'
      Size = 8
    end
  end
  inherited dsWork: TDataSource
    OnDataChange = dsWorkDataChange
    Left = 16
  end
  inherited DosMove1: TDosMove
    Left = 96
  end
  object tblMzdm: TTable
    DatabaseName = 'LfHotelUser'
    TableName = 'MZDM'
    Left = 424
  end
  object dsMzdm: TDataSource
    DataSet = tblMzdm
    Left = 456
  end
  object tblDqdm: TTable
    DatabaseName = 'LfHotelUser'
    TableName = 'DQDM'
    Left = 424
    Top = 32
  end
  object dsDqdm: TDataSource
    DataSet = tblDqdm
    Left = 456
    Top = 32
  end
  object tblZjdm: TTable
    DatabaseName = 'LfHotelUser'
    TableName = 'ZJDM'
    Left = 360
  end
  object dsZjdm: TDataSource
    DataSet = tblZjdm
    Left = 392
  end
  object tblGbdm: TTable
    DatabaseName = 'LfHotelUser'
    TableName = 'GBDM'
    Left = 360
    Top = 32
  end
  object tblQzdm: TTable
    DatabaseName = 'LfHotelUser'
    TableName = 'QZDM'
    Left = 360
    Top = 64
  end
  object dsGbdm: TDataSource
    DataSet = tblGbdm
    Left = 392
    Top = 32
  end
  object dsQzdm: TDataSource
    DataSet = tblQzdm
    Left = 392
    Top = 64
  end
end