u_data.dfm

这是一个简单的学生管理系统

object DataM: TDataM
  OldCreateOrder = False
  Left = 301
  Top = 161
  Height = 436
  Width = 604
  object Conn: TADOConnection
    Connected = True
    ConnectionString = 
      'Provider=OraOLEDB.Oracle.1;Password=123456;Persist Security Info' +
      '=True;User ID=jenny;Data Source=stud'
    KeepConnection = False
    LoginPrompt = False
    Mode = cmReadWrite
    Provider = 'OraOLEDB.Oracle.1'
    Left = 16
    Top = 8
  end
  object studentDS: TDataSource
    DataSet = student
    Left = 104
    Top = 8
  end
  object student: TADOTable
    Connection = Conn
    CursorType = ctStatic
    TableName = 'STUDENT'
    Left = 72
    Top = 8
    object studentID: TWideStringField
      FieldName = 'ID'
      FixedChar = True
      Size = 6
    end
    object studentNAME: TWideStringField
      FieldName = 'NAME'
    end
    object studentSEX: TWideStringField
      FieldName = 'SEX'
      FixedChar = True
      Size = 1
    end
    object studentCLASS: TWideStringField
      FieldName = 'CLASS'
      FixedChar = True
      Size = 4
    end
    object studentDEPARTMENT: TBCDField
      FieldName = 'DEPARTMENT'
      Precision = 32
      Size = 0
    end
    object studentBIRTHDAY: TDateTimeField
      FieldName = 'BIRTHDAY'
    end
    object studentNATIVE_PLACE: TWideStringField
      FieldName = 'NATIVE_PLACE'
      Size = 50
    end
  end
  object COUNTER_C: TADOTable
    Connection = Conn
    TableName = 'COUNTER'
    Left = 240
    Top = 224
  end
  object CHANGE: TADOTable
    Connection = Conn
    TableName = 'CHANGE'
    Left = 40
    Top = 224
  end
  object student_id1: TADOTable
    Connection = Conn
    TableName = 'STUDENT'
    Left = 40
    Top = 112
  end
  object student_id1ds: TDataSource
    DataSet = student_id1
    Left = 64
    Top = 112
  end
  object student_id3: TADOTable
    Connection = Conn
    TableName = 'STUDENT'
    Left = 208
    Top = 112
  end
  object student_id3ds: TDataSource
    DataSet = student_id3
    Left = 232
    Top = 112
  end
  object class4: TADOTable
    Connection = Conn
    CursorType = ctStatic
    IndexFieldNames = 'DEPARTMENT'
    MasterFields = 'DEPARTMENT'
    MasterSource = student_id4ds
    TableName = 'CLASS'
    Left = 280
    Top = 56
  end
  object class4ds: TDataSource
    DataSet = class4
    Left = 304
    Top = 56
  end
  object department4: TADOTable
    Connection = Conn
    IndexFieldNames = 'ID'
    MasterFields = 'DEPARTMENT'
    MasterSource = student_id4ds
    TableName = 'DEPARTMENT'
    Left = 280
    Top = 168
  end
  object department4ds: TDataSource
    DataSet = department4
    Left = 304
    Top = 168
  end
  object change4: TADOTable
    Connection = Conn
    IndexFieldNames = 'STUDENT'
    MasterFields = 'ID'
    MasterSource = student_id3ds
    TableName = 'CHANGE'
    Left = 80
    Top = 224
  end
  object CHANGE_CODE4: TADOTable
    Connection = Conn
    TableName = 'CHANGE_CODE'
    Left = 152
    Top = 224
  end
  object CHANGE_CODE4ds: TDataSource
    DataSet = CHANGE_CODE4
    Left = 176
    Top = 224
  end
  object change4ds: TDataSource
    DataSet = change4
    Left = 104
    Top = 224
  end
  object usert: TADOTable
    Connection = Conn
    CursorType = ctStatic
    TableName = 'usert'
    Left = 176
    Top = 8
  end
  object REWARD4: TADOTable
    Connection = Conn
    TableName = 'REWARD'
    Left = 80
    Top = 272
  end
  object REWARD4DS: TDataSource
    DataSet = REWARD4
    Left = 104
    Top = 272
  end
  object punish: TADOTable
    Connection = Conn
    TableName = 'PUNISHMENT'
    Left = 40
    Top = 328
  end
  object class2: TADOTable
    Connection = Conn
    CursorType = ctStatic
    IndexFieldNames = 'DEPARTMENT'
    MasterFields = 'DEPARTMENT'
    MasterSource = student_id2ds
    TableName = 'CLASS'
    Left = 128
    Top = 56
  end
  object class3: TADOTable
    Connection = Conn
    CursorType = ctStatic
    IndexFieldNames = 'DEPARTMENT'
    MasterFields = 'DEPARTMENT'
    MasterSource = student_id3ds
    TableName = 'CLASS'
    Left = 208
    Top = 56
  end
  object student_id4: TADOTable
    Connection = Conn
    TableName = 'STUDENT'
    Left = 280
    Top = 112
  end
  object department1: TADOTable
    Connection = Conn
    CursorType = ctStatic
    IndexFieldNames = 'ID'
    MasterFields = 'DEPARTMENT'
    MasterSource = student_id1ds
    TableName = 'DEPARTMENT'
    Left = 40
    Top = 168
  end
  object department2: TADOTable
    Connection = Conn
    CursorType = ctStatic
    IndexFieldNames = 'ID'
    MasterFields = 'DEPARTMENT'
    MasterSource = student_id2ds
    TableName = 'DEPARTMENT'
    Left = 128
    Top = 168
  end
  object department3: TADOTable
    Connection = Conn
    IndexFieldNames = 'ID'
    MasterFields = 'DEPARTMENT'
    MasterSource = student_id3ds
    TableName = 'DEPARTMENT'
    Left = 208
    Top = 168
  end
  object student_id2: TADOTable
    Connection = Conn
    TableName = 'STUDENT'
    Left = 128
    Top = 112
  end
  object class2ds: TDataSource
    DataSet = class2
    Left = 152
    Top = 56
  end
  object class3ds: TDataSource
    DataSet = class3
    Left = 232
    Top = 56
  end
  object student_id2ds: TDataSource
    DataSet = student_id2
    Left = 152
    Top = 112
  end
  object student_id4ds: TDataSource
    DataSet = student_id4
    Left = 304
    Top = 112
  end
  object department1ds: TDataSource
    DataSet = department1
    Left = 64
    Top = 168
  end
  object department2ds: TDataSource
    DataSet = department2
    Left = 152
    Top = 168
  end
  object department3ds: TDataSource
    DataSet = department3
    Left = 232
    Top = 168
  end
  object class1: TADOTable
    Connection = Conn
    CursorType = ctStatic
    IndexFieldNames = 'ID'
    MasterFields = 'CLASS'
    MasterSource = student_id1ds
    TableName = 'CLASS'
    Left = 40
    Top = 56
  end
  object class1ds: TDataSource
    DataSet = class1
    Left = 64
    Top = 56
  end
  object REWARD: TADOTable
    Connection = Conn
    TableName = 'REWARD'
    Left = 40
    Top = 272
  end
  object REWARD_LEVELS4: TADOTable
    Connection = Conn
    TableName = 'REWARD_LEVELS'
    Left = 152
    Top = 272
  end
  object REWARD_LEVELS4ds: TDataSource
    DataSet = REWARD_LEVELS4
    Left = 176
    Top = 272
  end
  object punish4ds: TDataSource
    DataSet = punish4
    Left = 104
    Top = 328
  end
  object punish4: TADOTable
    Connection = Conn
    TableName = 'PUNISHMENT'
    Left = 80
    Top = 328
  end
  object PUNISH_LEVELS4: TADOTable
    Connection = Conn
    TableName = 'PUNISH_LEVELS'
    Left = 152
    Top = 328
  end
  object PUNISH_LEVELS4ds: TDataSource
    DataSet = PUNISH_LEVELS4
    Left = 176
    Top = 328
  end
  object COUNTER_R: TADOTable
    Connection = Conn
    TableName = 'COUNTER'
    Left = 240
    Top = 272
  end
  object counter_p: TADOTable
    Connection = Conn
    TableName = 'COUNTER'
    Left = 248
    Top = 328
  end
end