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

📄 unit11.~dfm

📁 酒店住宿管理系统,有完整的文件和源码, 可以下载使用
💻 ~DFM
📖 第 1 页 / 共 2 页
字号:
        Expanded = False
        FieldName = #23458#20154#21517#31216
        Font.Charset = GB2312_CHARSET
        Font.Color = clBlack
        Font.Height = -16
        Font.Name = #21326#25991#20013#23435
        Font.Style = []
        Title.Font.Charset = GB2312_CHARSET
        Title.Font.Color = clBlue
        Title.Font.Height = -19
        Title.Font.Name = #21326#25991#34892#26999
        Title.Font.Style = []
        Visible = True
      end
      item
        Expanded = False
        FieldName = #35777#20214#32534#21495
        Font.Charset = GB2312_CHARSET
        Font.Color = clBlack
        Font.Height = -16
        Font.Name = #21326#25991#20013#23435
        Font.Style = []
        Title.Font.Charset = GB2312_CHARSET
        Title.Font.Color = clBlue
        Title.Font.Height = -19
        Title.Font.Name = #21326#25991#34892#26999
        Title.Font.Style = []
        Visible = True
      end
      item
        Expanded = False
        FieldName = #23458#25151#32534#21495
        Font.Charset = GB2312_CHARSET
        Font.Color = clBlack
        Font.Height = -16
        Font.Name = #21326#25991#20013#23435
        Font.Style = []
        Title.Font.Charset = GB2312_CHARSET
        Title.Font.Color = clBlue
        Title.Font.Height = -19
        Title.Font.Name = #21326#25991#34892#26999
        Title.Font.Style = []
        Visible = True
      end
      item
        Expanded = False
        FieldName = #35746#25151#26085#26399
        Font.Charset = GB2312_CHARSET
        Font.Color = clBlack
        Font.Height = -16
        Font.Name = #21326#25991#20013#23435
        Font.Style = []
        Title.Font.Charset = GB2312_CHARSET
        Title.Font.Color = clBlue
        Title.Font.Height = -19
        Title.Font.Name = #21326#25991#34892#26999
        Title.Font.Style = []
        Visible = True
      end
      item
        Expanded = False
        FieldName = #32467#36134#26085#26399
        Font.Charset = GB2312_CHARSET
        Font.Color = clBlack
        Font.Height = -16
        Font.Name = #21326#25991#20013#23435
        Font.Style = []
        Title.Font.Charset = GB2312_CHARSET
        Title.Font.Color = clBlue
        Title.Font.Height = -19
        Title.Font.Name = #21326#25991#34892#26999
        Title.Font.Style = []
        Visible = True
      end
      item
        Expanded = False
        FieldName = #39044#35745#22825#25968
        Font.Charset = GB2312_CHARSET
        Font.Color = clBlack
        Font.Height = -16
        Font.Name = #21326#25991#20013#23435
        Font.Style = []
        Title.Font.Charset = GB2312_CHARSET
        Title.Font.Color = clBlue
        Title.Font.Height = -19
        Title.Font.Name = #21326#25991#34892#26999
        Title.Font.Style = []
        Visible = True
      end
      item
        Expanded = False
        FieldName = #39044#35745#27599#22825#36153#29992
        Font.Charset = GB2312_CHARSET
        Font.Color = clBlack
        Font.Height = -16
        Font.Name = #21326#25991#20013#23435
        Font.Style = []
        Title.Font.Charset = GB2312_CHARSET
        Title.Font.Color = clBlue
        Title.Font.Height = -19
        Title.Font.Name = #21326#25991#34892#26999
        Title.Font.Style = []
        Visible = True
      end
      item
        Expanded = False
        FieldName = #25276#37329
        Font.Charset = GB2312_CHARSET
        Font.Color = clBlack
        Font.Height = -16
        Font.Name = #21326#25991#20013#23435
        Font.Style = []
        Title.Font.Charset = GB2312_CHARSET
        Title.Font.Color = clBlue
        Title.Font.Height = -19
        Title.Font.Name = #21326#25991#34892#26999
        Title.Font.Style = []
        Visible = True
      end
      item
        Expanded = False
        FieldName = #24212#25910#37329#39069
        Font.Charset = GB2312_CHARSET
        Font.Color = clBlack
        Font.Height = -16
        Font.Name = #21326#25991#20013#23435
        Font.Style = []
        Title.Font.Charset = GB2312_CHARSET
        Title.Font.Color = clBlue
        Title.Font.Height = -19
        Title.Font.Name = #21326#25991#34892#26999
        Title.Font.Style = []
        Visible = True
      end
      item
        Expanded = False
        FieldName = #23454#25910#37329#39069
        Font.Charset = GB2312_CHARSET
        Font.Color = clBlack
        Font.Height = -16
        Font.Name = #21326#25991#20013#23435
        Font.Style = []
        Title.Font.Charset = GB2312_CHARSET
        Title.Font.Color = clBlue
        Title.Font.Height = -19
        Title.Font.Name = #21326#25991#34892#26999
        Title.Font.Style = []
        Visible = True
      end
      item
        Expanded = False
        FieldName = #20107#30001
        Font.Charset = GB2312_CHARSET
        Font.Color = clBlack
        Font.Height = -16
        Font.Name = #21326#25991#20013#23435
        Font.Style = []
        Title.Font.Charset = GB2312_CHARSET
        Title.Font.Color = clBlue
        Title.Font.Height = -19
        Title.Font.Name = #21326#25991#34892#26999
        Title.Font.Style = []
        Visible = True
      end
      item
        Expanded = False
        FieldName = #25805#20316#20154
        Font.Charset = GB2312_CHARSET
        Font.Color = clBlack
        Font.Height = -16
        Font.Name = #21326#25991#20013#23435
        Font.Style = []
        Title.Font.Charset = GB2312_CHARSET
        Title.Font.Color = clBlue
        Title.Font.Height = -19
        Title.Font.Name = #21326#25991#34892#26999
        Title.Font.Style = []
        Visible = True
      end>
  end
  object BitBtn2: TBitBtn
    Left = 157
    Top = 384
    Width = 87
    Height = 27
    Caption = #25171#21360
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlue
    Font.Height = -24
    Font.Name = #21326#25991#34892#26999
    Font.Style = []
    ParentFont = False
    TabOrder = 4
    OnClick = BitBtn2Click
    Glyph.Data = {
      76010000424D7601000000000000760000002800000020000000100000000100
      04000000000000010000130B0000130B00001000000000000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300000000000
      00033FFFFFFFFFFFFFFF0888888888888880777777777777777F088888888888
      8880777777777777777F0000000000000000FFFFFFFFFFFFFFFF0F8F8F8F8F8F
      8F80777777777777777F08F8F8F8F8F8F9F0777777777777777F0F8F8F8F8F8F
      8F807777777777777F7F0000000000000000777777777777777F3330FFFFFFFF
      03333337F3FFFF3F7F333330F0000F0F03333337F77773737F333330FFFFFFFF
      03333337F3FF3FFF7F333330F00F000003333337F773777773333330FFFF0FF0
      33333337F3FF7F3733333330F08F0F0333333337F7737F7333333330FFFF0033
      33333337FFFF7733333333300000033333333337777773333333}
    NumGlyphs = 2
  end
  object BitBtn3: TBitBtn
    Left = 389
    Top = 384
    Width = 87
    Height = 27
    Caption = #36864#20986
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlue
    Font.Height = -24
    Font.Name = #21326#25991#34892#26999
    Font.Style = []
    ParentFont = False
    TabOrder = 5
    OnClick = BitBtn3Click
    Glyph.Data = {
      76010000424D7601000000000000760000002800000020000000100000000100
      04000000000000010000120B0000120B00001000000000000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00330000000000
      03333377777777777F333301111111110333337F333333337F33330111111111
      0333337F333333337F333301111111110333337F333333337F33330111111111
      0333337F333333337F333301111111110333337F333333337F33330111111111
      0333337F3333333F7F333301111111B10333337F333333737F33330111111111
      0333337F333333337F333301111111110333337F33FFFFF37F3333011EEEEE11
      0333337F377777F37F3333011EEEEE110333337F37FFF7F37F3333011EEEEE11
      0333337F377777337F333301111111110333337F333333337F33330111111111
      0333337FFFFFFFFF7F3333000000000003333377777777777333}
    NumGlyphs = 2
  end
  object ADOConnection1: TADOConnection
    Connected = True
    ConnectionString = 
      'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\mindy paradise\p' +
      'roject\mindyparadisehotel.mdb;Persist Security Info=False'
    LoginPrompt = False
    Mode = cmShareDenyNone
    Provider = 'Microsoft.Jet.OLEDB.4.0'
    Top = 240
  end
  object ADODataSet1: TADODataSet
    Connection = ADOConnection1
    CursorType = ctStatic
    CommandText = 'select * from '#36164#37329#28165#31639#34920
    Parameters = <>
    Top = 264
  end
  object ADODataSet2: TADODataSet
    Active = True
    Connection = ADOConnection1
    CursorType = ctStatic
    CommandText = 'select * from '#36164#37329#28165#31639#34920
    Parameters = <>
    Top = 216
  end
  object DataSource1: TDataSource
    DataSet = ADODataSet1
    Top = 48
  end
end

⌨️ 快捷键说明

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