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

📄 unit3.dfm

📁 该系统是学生人事管理系统
💻 DFM
字号:
object DataModule3: TDataModule3
  OldCreateOrder = False
  Left = 299
  Top = 172
  Height = 416
  Width = 593
  object ADOConnection1: TADOConnection
    Connected = True
    ConnectionString = 
      'Provider=Microsoft.Jet.OLEDB.4.0;User ID=Admin;Data Source=XSZL.' +
      'mdb;Mode=Share Deny None;Extended Properties="";Persist Security' +
      ' Info=False;Jet OLEDB:System database="";Jet OLEDB:Registry Path' +
      '="";Jet OLEDB:Database Password="";Jet OLEDB:Engine Type=5;Jet O' +
      'LEDB:Database Locking Mode=1;Jet OLEDB:Global Partial Bulk Ops=2' +
      ';Jet OLEDB:Global Bulk Transactions=1;Jet OLEDB:New Database Pas' +
      'sword="";Jet OLEDB:Create System Database=False;Jet OLEDB:Encryp' +
      't Database=False;Jet OLEDB:Don'#39't Copy Locale on Compact=False;Je' +
      't OLEDB:Compact Without Replica Repair=False;Jet OLEDB:SFP=False'
    LoginPrompt = False
    Mode = cmShareDenyNone
    Provider = 'Microsoft.Jet.OLEDB.4.0'
    Left = 32
    Top = 8
  end
  object tablejibenziliao: TADOTable
    Active = True
    Connection = ADOConnection1
    CursorType = ctStatic
    TableName = 'jbzl'
    Left = 32
    Top = 64
  end
  object DataSourcejibenziliao: TDataSource
    DataSet = tablejibenziliao
    Left = 32
    Top = 120
  end
  object Tablejiatingqingkuang: TADOTable
    Active = True
    Connection = ADOConnection1
    CursorType = ctStatic
    IndexFieldNames = 'xuehao'
    MasterFields = 'xuehao'
    MasterSource = DataSourcejibenziliao
    TableName = 'jiatingqingkuang'
    Left = 136
    Top = 64
  end
  object Tablexuejijingli: TADOTable
    Active = True
    Connection = ADOConnection1
    CursorType = ctStatic
    IndexFieldNames = 'xuehao'
    MasterFields = 'xuehao'
    MasterSource = DataSourcejibenziliao
    TableName = 'xuejijingli'
    Left = 248
    Top = 64
  end
  object DataSourcejiatingqingkuang: TDataSource
    DataSet = Tablejiatingqingkuang
    Left = 136
    Top = 120
  end
  object DataSourcexuejijingli: TDataSource
    DataSet = Tablexuejijingli
    Left = 248
    Top = 120
  end
  object DataSource1: TDataSource
    DataSet = ADODataSet1
    Left = 24
    Top = 272
  end
  object ADODataSet1: TADODataSet
    Connection = ADOConnection1
    CursorType = ctStatic
    Filtered = True
    Parameters = <>
    Left = 32
    Top = 208
  end
  object ADOTable1: TADOTable
    Active = True
    Connection = ADOConnection1
    CursorType = ctStatic
    IndexFieldNames = 'xuehao'
    MasterFields = 'xuehao'
    MasterSource = DataSource1
    TableName = 'jiatingqingkuang'
    Left = 120
    Top = 208
  end
  object ADOTable2: TADOTable
    Active = True
    Connection = ADOConnection1
    CursorType = ctStatic
    IndexFieldNames = 'xuehao'
    MasterFields = 'xuehao'
    MasterSource = DataSource1
    TableName = 'xuejijingli'
    Left = 184
    Top = 208
  end
  object DataSource2: TDataSource
    DataSet = ADOTable1
    Left = 120
    Top = 272
  end
  object DataSource3: TDataSource
    DataSet = ADOTable2
    Left = 192
    Top = 272
  end
  object ADOQuery1: TADOQuery
    Connection = ADOConnection1
    Parameters = <>
    Left = 264
    Top = 208
  end
  object DataSource4: TDataSource
    DataSet = ADOQuery1
    Left = 264
    Top = 272
  end
  object ADOTable3: TADOTable
    Active = True
    Connection = ADOConnection1
    CursorType = ctStatic
    TableName = 'yonghu'
    Left = 352
    Top = 48
  end
  object DataSource5: TDataSource
    DataSet = ADOTable4
    Left = 368
    Top = 208
  end
  object ADOTable4: TADOTable
    Active = True
    Connection = ADOConnection1
    CursorType = ctStatic
    IndexFieldNames = 'xuehao'
    MasterFields = 'xuehao'
    MasterSource = DataSource7
    TableName = 'jiatingqingkuang'
    Left = 368
    Top = 152
  end
  object ADOQuery2: TADOQuery
    Connection = ADOConnection1
    Parameters = <>
    SQL.Strings = (
      'select * from jbzl')
    Left = 512
    Top = 152
  end
  object ADOTable5: TADOTable
    Active = True
    Connection = ADOConnection1
    CursorType = ctStatic
    IndexFieldNames = 'xuehao'
    MasterFields = 'xuehao'
    MasterSource = DataSource7
    TableName = 'xuejijingli'
    Left = 440
    Top = 152
  end
  object DataSource6: TDataSource
    DataSet = ADOTable5
    Left = 440
    Top = 208
  end
  object DataSource7: TDataSource
    DataSet = ADOQuery2
    Left = 512
    Top = 208
  end
  object DataSource8: TDataSource
    DataSet = ADOTable3
    Left = 352
    Top = 104
  end
end

⌨️ 快捷键说明

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