querydatamoduleunit.dfm

来自「学生信息管理系统是使用DELPHI集成环境编写的一款软件」· DFM 代码 · 共 60 行

object QueryDataModule: TQueryDataModule
  OldCreateOrder = False
  Left = 204
  Top = 189
  Height = 317
  Width = 297
  object StudentsQuery: TQuery
    DatabaseName = 'TSS'
    SQL.Strings = (
      'SELECT SNo, Name, Sex, Age, Entrance'
      'FROM "Student.db" Student')
    Left = 56
    Top = 40
  end
  object TeachersQuery: TQuery
    DatabaseName = 'TSS'
    SQL.Strings = (
      'SELECT TNo, Nane, Sex, Age, Address'
      'FROM "Teacher.db" Teacher')
    Left = 56
    Top = 96
  end
  object CourseQuery: TQuery
    DatabaseName = 'TSS'
    SQL.Strings = (
      'SELECT CNo, CName, TCTime'
      'FROM "Course.db" Course')
    Left = 64
    Top = 160
  end
  object SpecialQuery: TQuery
    DatabaseName = 'TSS'
    SQL.Strings = (
      'SELECT '
      'FROM "Teaching.db" Teaching')
    Left = 64
    Top = 208
  end
  object DataSourceStudent: TDataSource
    DataSet = StudentsQuery
    Left = 200
    Top = 40
  end
  object DataSourceTeacher: TDataSource
    DataSet = TeachersQuery
    Left = 200
    Top = 96
  end
  object DataSourceCourse: TDataSource
    DataSet = CourseQuery
    Left = 200
    Top = 160
  end
  object DataSourceSpecial: TDataSource
    DataSet = SpecialQuery
    Left = 208
    Top = 216
  end
end