datamodal.~dfm

教务管理子系统的基本功能实现

object DataModule1: TDataModule1
  OldCreateOrder = False
  Left = 326
  Top = 168
  Height = 399
  Width = 505
  object xsxxTable: TTable
    Active = True
    DatabaseName = 'keshe'
    TableName = 'xsxx.DB'
    Left = 32
    Top = 16
  end
  object jsxxTable: TTable
    Active = True
    DatabaseName = 'keshe'
    TableName = 'jsxx.DB'
    Left = 104
    Top = 16
  end
  object gzryxxTable: TTable
    Active = True
    DatabaseName = 'keshe'
    TableName = 'gzryxx.db'
    Left = 104
    Top = 72
  end
  object xsxxDataSource: TDataSource
    DataSet = xsxxTable
    Left = 312
    Top = 24
  end
  object jsxxDataSource: TDataSource
    DataSet = jsxxTable
    Left = 408
    Top = 24
  end
  object kechDataSource: TDataSource
    DataSet = kechenTable
    Left = 408
    Top = 88
  end
  object kechenTable: TTable
    Active = True
    DatabaseName = 'keshe'
    TableName = 'kc.DB'
    Left = 40
    Top = 80
  end
  object zyjhTable: TTable
    DatabaseName = 'keshe'
    TableName = 'zyjh.DB'
    Left = 40
    Top = 136
  end
  object zyjhDataSource: TDataSource
    DataSet = zyjhTable
    Left = 408
    Top = 152
  end
  object cjlrQuery: TQuery
    Active = True
    DatabaseName = 'keshe'
    SQL.Strings = (
      'select studentno, studentname'
      'from xsxx,cjlr'
      'where xsxx.studentno=cjlr.studentno ')
    Left = 112
    Top = 184
  end
  object cjlrDataSource: TDataSource
    DataSet = cjlrQuery
    Left = 416
    Top = 200
  end
  object xszhmmTable: TTable
    Active = True
    DatabaseName = 'keshe'
    TableName = 'xszhmm.DB'
    Left = 40
    Top = 192
  end
  object jszhmm: TTable
    Active = True
    DatabaseName = 'keshe'
    TableName = 'jszhmm.DB'
    Left = 112
    Top = 240
  end
  object xibieglSource: TDataSource
    DataSet = xibieTable
    Left = 312
    Top = 200
  end
  object xibieTable: TTable
    Active = True
    DatabaseName = 'keshe'
    TableName = 'xb.db'
    Left = 40
    Top = 240
  end
  object gzryzhmmTable: TTable
    Active = True
    DatabaseName = 'keshe'
    TableName = 'gzryzhmm.DB'
    Left = 112
    Top = 128
  end
  object gzryzhmmDataSource: TDataSource
    DataSet = gzryzhmmTable
    Left = 312
    Top = 80
  end
  object gzryxxDataSource: TDataSource
    DataSet = gzryxxTable
    Left = 312
    Top = 144
  end
  object skQuery: TQuery
    DatabaseName = 'keshe'
    SQL.Strings = (
      'select * from sk')
    Left = 32
    Top = 288
  end
  object jskebiaoQuery: TQuery
    DatabaseName = 'keshe'
    SQL.Strings = (
      'select * from  kc')
    Left = 112
    Top = 288
  end
  object skDataSource: TDataSource
    DataSet = skQuery
    Left = 312
    Top = 272
  end
  object jskebiaoDataSource: TDataSource
    DataSet = jskebiaoQuery
    Left = 416
    Top = 272
  end
end