⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 c_ydhc.dfm

📁 经典的酒店管理系统
💻 DFM
📖 第 1 页 / 共 2 页
字号:
      DataSource = dsYdhc
      TabOrder = 5
    end
    object DBEdit5: TDBEdit
      Left = 176
      Top = 72
      Width = 80
      Height = 24
      DataField = 'D_HCRS1'
      DataSource = dsYdhc
      TabOrder = 6
    end
    object DBEdit6: TDBEdit
      Left = 16
      Top = 112
      Width = 80
      Height = 24
      DataField = 'D_HFSL'
      DataSource = dsYdhc
      TabOrder = 7
    end
    object DBEdit7: TDBEdit
      Left = 96
      Top = 112
      Width = 80
      Height = 24
      DataField = 'D_HFJE'
      DataSource = dsYdhc
      TabOrder = 8
    end
    object DBEdit8: TDBEdit
      Left = 176
      Top = 112
      Width = 281
      Height = 24
      DataField = 'D_HFBZ'
      DataSource = dsYdhc
      TabOrder = 9
    end
    object DBEdit9: TDBEdit
      Left = 16
      Top = 152
      Width = 80
      Height = 24
      DataField = 'D_XHSL'
      DataSource = dsYdhc
      TabOrder = 10
    end
    object DBEdit10: TDBEdit
      Left = 96
      Top = 152
      Width = 80
      Height = 24
      DataField = 'D_XHJE'
      DataSource = dsYdhc
      TabOrder = 11
    end
    object DBEdit11: TDBEdit
      Left = 176
      Top = 152
      Width = 281
      Height = 24
      DataField = 'D_XHBZ'
      DataSource = dsYdhc
      TabOrder = 12
    end
    object DBEdit12: TDBEdit
      Left = 16
      Top = 192
      Width = 80
      Height = 24
      DataField = 'D_SGSL'
      DataSource = dsYdhc
      TabOrder = 13
    end
    object DBEdit13: TDBEdit
      Left = 96
      Top = 192
      Width = 80
      Height = 24
      DataField = 'D_SGJE'
      DataSource = dsYdhc
      TabOrder = 14
    end
    object DBEdit14: TDBEdit
      Left = 176
      Top = 192
      Width = 281
      Height = 24
      DataField = 'D_SGBZ'
      DataSource = dsYdhc
      TabOrder = 15
    end
    object DBEdit15: TDBEdit
      Left = 16
      Top = 232
      Width = 80
      Height = 24
      DataField = 'D_QTJE'
      DataSource = dsYdhc
      TabOrder = 16
    end
    object DBEdit16: TDBEdit
      Left = 96
      Top = 232
      Width = 364
      Height = 24
      DataField = 'D_QTBZ'
      DataSource = dsYdhc
      TabOrder = 17
    end
    object DBEdit17: TDBEdit
      Left = 16
      Top = 272
      Width = 80
      Height = 24
      DataField = 'D_HTSL'
      DataSource = dsYdhc
      TabOrder = 18
    end
    object DBEdit18: TDBEdit
      Left = 96
      Top = 272
      Width = 364
      Height = 24
      DataField = 'D_HTBZ'
      DataSource = dsYdhc
      TabOrder = 19
    end
    object DBMemo1: TDBMemo
      Left = 16
      Top = 312
      Width = 444
      Height = 73
      DataField = 'D_BZ'
      DataSource = dsYdhc
      TabOrder = 20
    end
  end
  inherited Panel3: TPanel
    Top = 472
    inherited btnOK: TBitBtn
      OnClick = btnOKClick
    end
    inherited btnCanc: TBitBtn
      OnClick = btnCancClick
    end
    object btnYdqr: TBitBtn
      Left = 8
      Top = 5
      Width = 100
      Height = 25
      Caption = #39044#23450#30830#35748'(&Q)'
      TabOrder = 2
      OnClick = btnYdqrClick
      Glyph.Data = {
        F6000000424DF600000000000000760000002800000010000000100000000100
        0400000000008000000000000000000000001000000000000000000000000000
        8000008000000080800080000000800080008080000080808000C0C0C0000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
        888800000000000088880FFFFFFFFFF088880F00F00000F088880FFFFFFFFFF0
        88880F00F00000F088880FFFFFFFFFF088880FFFFFFF0FF088880F00FFF080F0
        88880F080F08080008440FF08080808880440000080808888844888880808888
        8844888888088888804488888880000008448888888888888888}
    end
    object btnYdqx: TBitBtn
      Left = 120
      Top = 5
      Width = 100
      Height = 25
      Caption = #21462#28040#30830#35748'(&X)'
      TabOrder = 3
      OnClick = btnYdqxClick
      Glyph.Data = {
        F6000000424DF600000000000000760000002800000010000000100000000100
        0400000000008000000000000000000000001000000000000000000000000000
        8000008000000080800080000000800080008080000080808000C0C0C0000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
        8888888888888888888888888888888888888888888888888888888888888888
        8888888478888888888888748888844444888848888888444488884888888884
        4488884888888848448888748888448884888887444488888888888888888888
        8888888888888888888888888888888888888888888888888888}
    end
    object btnPrint: TBitBtn
      Left = 297
      Top = 5
      Width = 75
      Height = 25
      Anchors = [akTop, akRight]
      Caption = #25171#21360'(&P)'
      TabOrder = 4
      OnClick = btnPrintClick
      Glyph.Data = {
        F6000000424DF600000000000000760000002800000010000000100000000100
        0400000000008000000000000000000000001000000000000000000000000000
        8000008000000080800080000000800080008080000080808000C0C0C0000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
        888F8800000000000888808888888880808800000000000008080888888BBB88
        0008088888877788080800000000000008800888888888808080800000000008
        0800880FFFFFFFF080808880F00000F000088880FFFFFFFF088888880F00000F
        088888880FFFFFFFF08888888000000000888888888888888888}
    end
  end
  object tblYdhc: TTable
    BeforePost = tblYdhcBeforePost
    OnNewRecord = tblYdhcNewRecord
    DatabaseName = 'LfHotelUser'
    TableName = 'YDHC'
    Left = 368
    Top = 16
    object tblYdhcD_YDBH: TStringField
      FieldName = 'D_YDBH'
      Required = True
      Size = 12
    end
    object tblYdhcD_KRBH: TStringField
      FieldName = 'D_KRBH'
      Size = 12
    end
    object tblYdhcD_KRXM: TStringField
      FieldName = 'D_KRXM'
      Size = 30
    end
    object tblYdhcD_YDRQ: TDateTimeField
      FieldName = 'D_YDRQ'
    end
    object tblYdhcD_SYRQ: TDateTimeField
      FieldName = 'D_SYRQ'
      DisplayFormat = 'yyyy-mm-dd'
      EditMask = '!0000/00/99;1; '
    end
    object tblYdhcD_SYSJ: TDateTimeField
      FieldName = 'D_SYSJ'
      DisplayFormat = 'hh:nn'
      EditMask = '!90:00;1; '
    end
    object tblYdhcD_SJDM: TStringField
      FieldName = 'D_SJDM'
      FixedChar = True
      Size = 4
    end
    object tblYdhcD_HCBH: TStringField
      FieldName = 'D_HCBH'
      Size = 5
    end
    object tblYdhcD_HCMC: TStringField
      FieldName = 'D_HCMC'
      Size = 10
    end
    object tblYdhcD_HCZJ: TFloatField
      FieldName = 'D_HCZJ'
    end
    object tblYdhcD_HCRS: TIntegerField
      FieldName = 'D_HCRS'
    end
    object tblYdhcD_HCRS1: TIntegerField
      FieldName = 'D_HCRS1'
    end
    object tblYdhcD_HFSL: TFloatField
      FieldName = 'D_HFSL'
    end
    object tblYdhcD_HFJE: TFloatField
      FieldName = 'D_HFJE'
    end
    object tblYdhcD_HFBZ: TStringField
      FieldName = 'D_HFBZ'
      Size = 30
    end
    object tblYdhcD_XHSL: TFloatField
      FieldName = 'D_XHSL'
    end
    object tblYdhcD_XHJE: TFloatField
      FieldName = 'D_XHJE'
    end
    object tblYdhcD_XHBZ: TStringField
      FieldName = 'D_XHBZ'
      Size = 30
    end
    object tblYdhcD_SGSL: TFloatField
      FieldName = 'D_SGSL'
    end
    object tblYdhcD_SGJE: TFloatField
      FieldName = 'D_SGJE'
    end
    object tblYdhcD_SGBZ: TStringField
      FieldName = 'D_SGBZ'
      Size = 30
    end
    object tblYdhcD_QTJE: TFloatField
      FieldName = 'D_QTJE'
    end
    object tblYdhcD_QTBZ: TStringField
      FieldName = 'D_QTBZ'
      Size = 30
    end
    object tblYdhcD_HTSL: TFloatField
      FieldName = 'D_HTSL'
    end
    object tblYdhcD_HTBZ: TStringField
      FieldName = 'D_HTBZ'
      Size = 30
    end
    object tblYdhcD_RZBZ: TStringField
      FieldName = 'D_RZBZ'
      FixedChar = True
      Size = 1
    end
    object tblYdhcD_JSBZ: TStringField
      FieldName = 'D_JSBZ'
      FixedChar = True
      Size = 1
    end
    object tblYdhcD_CZYXM: TStringField
      FieldName = 'D_CZYXM'
      Size = 8
    end
    object tblYdhcD_BZ: TBlobField
      FieldName = 'D_BZ'
      Size = 1
    end
  end
  object dsYdhc: TDataSource
    DataSet = tblYdhc
    Left = 400
    Top = 16
  end
end

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -