u_data.dfm

delphi编的排课管理系统

object DataModule1: TDataModule1
  OldCreateOrder = False
  Left = 411
  Top = 326
  Height = 356
  Width = 370
  object tb_class: TTable
    DatabaseName = 'paikedata'
    FieldDefs = <
      item
        Name = 'Name'
        DataType = ftString
        Size = 8
      end
      item
        Name = 'Id'
        DataType = ftSmallint
      end
      item
        Name = 'Code'
        DataType = ftSmallint
      end
      item
        Name = 'Room'
        DataType = ftString
        Size = 6
      end>
    IndexDefs = <
      item
        Name = 'tb_classIndex1'
        Fields = 'Name'
        Options = [ixPrimary, ixUnique]
      end>
    StoreDefs = True
    TableName = 'class_base.db'
    Left = 8
    Top = 8
  end
  object tb_room: TTable
    DatabaseName = 'paikedata'
    TableName = 'room_base.db'
    Left = 128
    Top = 8
  end
  object tb_kc: TTable
    DatabaseName = 'paikedata'
    TableName = 'kc_base.db'
    Left = 8
    Top = 64
  end
  object tb_tec: TTable
    DatabaseName = 'paikedata'
    TableName = 'tech_base.db'
    Left = 128
    Top = 64
  end
  object ds_tb_class: TDataSource
    DataSet = tb_class
    Left = 64
    Top = 8
  end
  object ds_tb_kc: TDataSource
    DataSet = tb_kc
    Left = 64
    Top = 64
  end
  object ds_tb_room: TDataSource
    DataSet = tb_room
    Left = 184
    Top = 8
  end
  object ds_tb_tec: TDataSource
    DataSet = tb_tec
    Left = 184
    Top = 64
  end
  object query1: TQuery
    DatabaseName = 'paikedata'
    Left = 264
    Top = 8
  end
  object tb_apply: TTable
    DatabaseName = 'paikedata'
    IndexName = 'byClass'
    MasterFields = 'Name'
    MasterSource = ds_tb_class
    TableName = 'apply.db'
    Left = 8
    Top = 120
  end
  object ds_apply: TDataSource
    DataSet = tb_apply
    Left = 64
    Top = 120
  end
  object set_week: TTable
    DatabaseName = 'paikedata'
    TableName = 'set_week.db'
    Left = 264
    Top = 64
  end
  object tb_tech_gc: TTable
    DatabaseName = 'paikedata'
    TableName = 'tech_gc.db'
    Left = 128
    Top = 128
  end
  object ds_tech_gc: TDataSource
    DataSet = tb_tech_gc
    Left = 192
    Top = 128
  end
  object tb_fj: TTable
    DatabaseName = 'paikedata'
    TableName = 'fj.db'
    Left = 8
    Top = 192
  end
  object ds_fj: TDataSource
    DataSet = tb_fj
    Left = 64
    Top = 192
  end
  object temp: TTable
    DatabaseName = 'paikedata'
    TableName = 'kc31.db'
    Left = 128
    Top = 192
  end
  object pk_sign: TTable
    DatabaseName = 'paikedata'
    TableName = 'pk_sign.db'
    Left = 264
    Top = 120
  end
  object q_edit: TQuery
    DatabaseName = 'paikedata'
    Left = 312
    Top = 8
  end
  object t_edit: TTable
    DatabaseName = 'paikedata'
    TableName = 'apply.DB'
    Left = 320
    Top = 56
  end
  object frReport1: TfrReport
    InitialZoom = pzDefault
    PreviewButtons = [pbZoom, pbLoad, pbSave, pbPrint, pbFind, pbHelp, pbExit]
    Left = 264
    Top = 184
    ReportForm = {18000000}
  end
  object ds_temp2: TDataSource
    DataSet = temp2
    Left = 64
    Top = 264
  end
  object t_date: TTable
    DatabaseName = 'paikedata'
    TableName = 'date.db'
    Left = 320
    Top = 128
  end
  object have_pk: TTable
    DatabaseName = 'paikedata'
    TableName = 'already_class.db'
    Left = 320
    Top = 184
  end
  object t_scan: TTable
    DatabaseName = 'paikedata'
    Left = 320
    Top = 248
  end
  object temp2: TTable
    DatabaseName = 'paikedata'
    TableName = 'temp2.DB'
    Left = 8
    Top = 264
  end
end