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

📄 dmunit.~dfm

📁 管理系统.rar - RAR 压缩文件, 解包大小为 107,263,136 字节
💻 ~DFM
📖 第 1 页 / 共 5 页
字号:
object DM: TDM
  OldCreateOrder = False
  OnCreate = DataModuleCreate
  Left = 203
  Top = 168
  Height = 402
  Width = 510
  object conn: TADOConnection
    ConnectionString = 
      'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=data\HY.mdb;Persist' +
      ' Security Info=False'
    LoginPrompt = False
    Mode = cmShareDenyNone
    Provider = 'Microsoft.Jet.OLEDB.4.0'
    Left = 16
    Top = 16
  end
  object company: TADOQuery
    Connection = conn
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select * from '#20844#21496#21517#31216)
    Left = 16
    Top = 64
    object companyDSDesigner: TAutoIncField
      FieldName = #32534#21495
      ReadOnly = True
    end
    object companyDSDesigner2: TWideStringField
      FieldName = #21517#31216
      Size = 50
    end
    object companyDSDesigner1: TWideStringField
      FieldName = #21517#31216'1'
      Size = 14
    end
    object companyDSDesigner3: TWideStringField
      FieldName = #21035#21517
      Size = 14
    end
    object companyDSDesigner4: TWideStringField
      FieldName = #30005#35805
      Size = 254
    end
    object companyDSDesigner5: TWideStringField
      FieldName = #20256#30495
    end
    object companyDSDesigner6: TWideStringField
      FieldName = #22320#22336
      Size = 254
    end
    object companyLogo: TWideStringField
      FieldName = 'Logo'
      Size = 100
    end
  end
  object dscompany: TDataSource
    DataSet = company
    OnDataChange = dscompanyDataChange
    Left = 72
    Top = 64
  end
  object User: TADOQuery
    Connection = conn
    Parameters = <>
    SQL.Strings = (
      'select * from '#29992#25143#26435#38480)
    Left = 16
    Top = 112
    object UserDSDesigner: TAutoIncField
      FieldName = #29992#25143#32534#21495
      ReadOnly = True
    end
    object UserDSDesigner2: TWideStringField
      FieldName = #29992#25143#21517#31216
      Size = 8
    end
    object UserDSDesigner3: TWideStringField
      FieldName = #37096#38376
      Size = 15
    end
    object UserDSDesigner4: TWideStringField
      FieldName = #23494#30721
      Size = 15
    end
    object UserZY110: TBooleanField
      FieldName = 'ZY110'
    end
    object UserZY120: TBooleanField
      FieldName = 'ZY120'
    end
    object UserZY130: TBooleanField
      FieldName = 'ZY130'
    end
    object UserZY210: TBooleanField
      FieldName = 'ZY210'
    end
    object UserZY220: TBooleanField
      FieldName = 'ZY220'
    end
    object UserZY310: TBooleanField
      FieldName = 'ZY310'
    end
    object UserCX110: TBooleanField
      FieldName = 'CX110'
    end
    object UserCX120: TBooleanField
      FieldName = 'CX120'
    end
    object UserCX210: TBooleanField
      FieldName = 'CX210'
    end
    object UserCX220: TBooleanField
      FieldName = 'CX220'
    end
    object UserCX310: TBooleanField
      FieldName = 'CX310'
    end
    object UserCX320: TBooleanField
      FieldName = 'CX320'
    end
    object UserJS110: TBooleanField
      FieldName = 'JS110'
    end
    object UserJS210: TBooleanField
      FieldName = 'JS210'
    end
    object UserJS220: TBooleanField
      FieldName = 'JS220'
    end
    object UserJS230: TBooleanField
      FieldName = 'JS230'
    end
    object UserJS240: TBooleanField
      FieldName = 'JS240'
    end
    object UserJS310: TBooleanField
      FieldName = 'JS310'
    end
    object UserJS320: TBooleanField
      FieldName = 'JS320'
    end
    object UserJS410: TBooleanField
      FieldName = 'JS410'
    end
    object UserJS420: TBooleanField
      FieldName = 'JS420'
    end
    object UserJS510: TBooleanField
      FieldName = 'JS510'
    end
    object UserWH110: TBooleanField
      FieldName = 'WH110'
    end
    object UserWH120: TBooleanField
      FieldName = 'WH120'
    end
    object UserWH210: TBooleanField
      FieldName = 'WH210'
    end
    object UserWH310: TBooleanField
      FieldName = 'WH310'
    end
    object UserWH320: TBooleanField
      FieldName = 'WH320'
    end
    object UserWH330: TBooleanField
      FieldName = 'WH330'
    end
    object UserWH340: TBooleanField
      FieldName = 'WH340'
    end
    object UserWH350: TBooleanField
      FieldName = 'WH350'
    end
    object UserWH360: TBooleanField
      FieldName = 'WH360'
    end
    object UserWH410: TBooleanField
      FieldName = 'WH410'
    end
    object UserWH420: TBooleanField
      FieldName = 'WH420'
    end
    object UserFW110: TBooleanField
      FieldName = 'FW110'
    end
    object UserFW120: TBooleanField
      FieldName = 'FW120'
    end
    object UserFW210: TBooleanField
      FieldName = 'FW210'
    end
    object UserFW220: TBooleanField
      FieldName = 'FW220'
    end
    object UserHelp110: TBooleanField
      FieldName = 'Help110'
    end
    object UserDSDesigner5: TWideStringField
      FieldName = #21019#24314#26085#26399
      Size = 50
    end
    object UserDSDesigner6: TWideStringField
      FieldName = #21019#24314#26102#38388
      Size = 8
    end
  end
  object dsUser: TDataSource
    DataSet = User
    Left = 72
    Top = 112
  end
  object UserLogin: TADOQuery
    Connection = conn
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select * from '#29992#25143#30331#38470)
    Left = 16
    Top = 160
    object UserLoginDSDesigner: TAutoIncField
      FieldName = #29992#25143#32534#21495
      ReadOnly = True
    end
    object UserLoginDSDesigner2: TWideStringField
      FieldName = #29992#25143#21517#31216
      Size = 12
    end
    object UserLoginDSDesigner3: TWideStringField
      FieldName = #30331#38470#26085#26399
      Size = 50
    end
    object UserLoginDSDesigner4: TWideStringField
      FieldName = #30331#38470#26102#38388
      Size = 8
    end
    object UserLoginDSDesigner5: TWideStringField
      FieldName = #36864#20986#26085#26399
      Size = 50
    end
    object UserLoginDSDesigner6: TWideStringField
      FieldName = #36864#20986#26102#38388
      Size = 8
    end
  end
  object dsUserLogin: TDataSource
    DataSet = UserLogin
    Left = 72
    Top = 160
  end
  object WLType: TADOTable
    Connection = conn
    TableName = #29289#27969#26041#24335
    Left = 16
    Top = 216
    object WLTypeDSDesigner: TAutoIncField
      FieldName = #32534#21495
      ReadOnly = True
    end
    object WLTypeDSDesigner2: TWideStringField
      FieldName = #21517#31216
      Size = 14
    end
    object WLTypeDSDesigner3: TDateTimeField
      FieldName = #26085#26399
    end
    object WLTypeDSDesigner4: TWideStringField
      FieldName = #25805#20316#20154
      Size = 10
    end
  end
  object dsWLType: TDataSource
    DataSet = WLType
    Left = 80
    Top = 216
  end
  object WTDW: TADOTable
    Connection = conn
    CursorType = ctStatic
    TableName = #22996#25176#21333#20301
    Left = 16
    Top = 264
    object WTDWDSDesigner: TAutoIncField
      FieldName = #32534#21495
      ReadOnly = True
    end
    object WTDWDSDesigner2: TWideStringField
      FieldName = #21333#20301#31616#31216
      Size = 14
    end
    object WTDWDSDesigner3: TWideStringField
      FieldName = #21333#20301#20840#31216
      Size = 50
    end
    object WTDWDSDesigner4: TWideStringField
      FieldName = #30005#35805
      Size = 50
    end
    object WTDWDSDesigner5: TWideStringField
      FieldName = #32852#31995#20154
      Size = 50
    end
    object WTDWDSDesigner6: TWideStringField
      FieldName = #32852#31995#22320#22336
      Size = 50
    end
    object WTDWDSDesigner7: TDateTimeField
      FieldName = #21019#24314#26085#26399
    end
    object WTDWDSDesigner8: TWideStringField
      FieldName = #25805#20316#21592
      Size = 10
    end
  end
  object dsWTDW: TDataSource
    DataSet = WTDW
    Left = 80
    Top = 264
  end
  object JYDW: TADOTable
    Connection = conn
    CursorType = ctStatic
    TableName = #32463#33829#21333#20301
    Left = 16
    Top = 312
    object JYDWDSDesigner: TAutoIncField
      FieldName = #32534#21495
      ReadOnly = True
    end
    object JYDWDSDesigner2: TWideStringField
      FieldName = #21517#31216
      Size = 14
    end
    object JYDWDSDesigner3: TDateTimeField
      FieldName = #21019#24314#26085#26399
    end
    object JYDWDSDesigner4: TWideStringField
      FieldName = #25805#20316#20154
      Size = 10
    end
  end
  object dsJYDW: TDataSource
    DataSet = JYDW
    Left = 80
    Top = 312
  end
  object DGMC: TADOTable
    Connection = conn
    CursorType = ctStatic
    TableName = #21040#28207#21517#31216
    Left = 136
    object DGMCDSDesigner: TAutoIncField
      FieldName = #32534#21495
      ReadOnly = True
    end
    object DGMCDSDesigner2: TWideStringField
      FieldName = #21517#31216
      Size = 14
    end
    object DGMCDSDesigner3: TDateTimeField
      FieldName = #21019#24314#26085#26399
    end
    object DGMCDSDesigner4: TWideStringField
      FieldName = #25805#20316#20154
      Size = 10
    end
  end
  object dsDGMC: TDataSource
    DataSet = DGMC
    Left = 184
  end
  object CKMC: TADOTable
    Connection = conn
    CursorType = ctStatic
    TableName = #20179#24211#21517#31216
    Left = 136
    Top = 48
    object CKMCDSDesigner: TAutoIncField
      FieldName = #32534#21495
      ReadOnly = True
    end
    object CKMCDSDesigner2: TWideStringField
      FieldName = #21517#31216
    end
    object CKMCDSDesigner3: TDateTimeField
      FieldName = #21019#24314#26085#26399
    end
    object CKMCDSDesigner4: TWideStringField
      FieldName = #25805#20316#20154
      Size = 10
    end
  end
  object dsCKMC: TDataSource
    DataSet = CKMC
    Left = 184
    Top = 48
  end
  object CLZL: TADOQuery
    Connection = conn
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select * from '#36710#36742#36164#26009)
    Left = 136
    Top = 104
    object CLZLDSDesigner: TAutoIncField
      FieldName = #24207#21495
      ReadOnly = True
    end
    object CLZLDSDesigner2: TWideStringField
      FieldName = #22995#21517
      Size = 14
    end
    object CLZLDSDesigner3: TWideStringField
      FieldName = #36710#29260#21495#30721
    end
    object CLZLDSDesigner4: TWideStringField
      FieldName = #30005#35805#21495#30721
      Size = 30
    end
    object CLZLDSDesigner5: TWideStringField
      FieldName = #25163#26426#21495#30721
      Size = 25
    end
    object CLZLDSDesigner6: TWideStringField
      FieldName = #32852#31995#22320#22336
      Size = 50
    end
    object CLZLDSDesigner7: TWideStringField
      FieldName = #37038#25919#32534#30721
      Size = 6
    end
    object CLZLDSDesigner8: TWideStringField
      FieldName = #36523#20221#35777#21495#30721
      Size = 18
    end
    object CLZLDSDesigner9: TWideStringField
      FieldName = #24037#20316#21333#20301
      Size = 26
    end
    object CLZLDSDesigner10: TWideStringField
      FieldName = #25152#23646#36710#38431
    end
  end
  object CDMC: TADOTable
    Connection = conn
    CursorType = ctStatic
    TableName = #36710#38431#21517#31216
    Left = 136
    Top = 160
    object CDMCDSDesigner: TAutoIncField
      FieldName = #32534#21495
      ReadOnly = True
    end
    object CDMCDSDesigner2: TWideStringField
      FieldName = #21517#31216
    end
  end
  object dsCDMC: TDataSource
    DataSet = CDMC
    Left = 184
    Top = 160
  end
  object QryTemp: TADODataSet
    Connection = conn
    Parameters = <>
    Left = 232
    Top = 96
  end
  object KHZL: TADOQuery
    Connection = conn
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select * from '#23458#25143#26126#32454#36164#26009)
    Left = 136
    Top = 216
    object KHZLDSDesigner: TAutoIncField
      FieldName = #32534#21495
      ReadOnly = True
    end
    object KHZLDSDesigner2: TWideStringField

⌨️ 快捷键说明

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