unit11.dfm

本系统为学生管理系统,可实现选课和退选

            Left = 8
            Top = 66
            Width = 52
            Height = 13
            Caption = #35838#31243#21517#65306
          end
          object Label16: TLabel
            Left = 8
            Top = 101
            Width = 39
            Height = 13
            Caption = #23398#20998#65306
          end
          object Label17: TLabel
            Left = 8
            Top = 136
            Width = 72
            Height = 13
            Caption = #32771#35797'/'#32771#26597#65306
          end
          object DBEdit10: TDBEdit
            Left = 56
            Top = 26
            Width = 97
            Height = 21
            DataField = 'Cno'
            DataSource = DataSource3
            ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
            TabOrder = 0
          end
          object DBEdit11: TDBEdit
            Left = 56
            Top = 61
            Width = 97
            Height = 21
            DataField = 'Cname'
            DataSource = DataSource3
            ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
            TabOrder = 1
          end
          object DBEdit12: TDBEdit
            Left = 56
            Top = 97
            Width = 97
            Height = 21
            DataField = 'Ccredit'
            DataSource = DataSource3
            ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
            TabOrder = 2
          end
          object DBEdit13: TDBEdit
            Left = 80
            Top = 136
            Width = 81
            Height = 21
            DataField = 'Cexam'
            DataSource = DataSource3
            ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
            TabOrder = 3
          end
        end
      end
      object TabSheet5: TTabSheet
        Caption = #36873#35838#34920#20449#24687
        ImageIndex = 4
        object Label19: TLabel
          Left = 16
          Top = 32
          Width = 26
          Height = 13
          Caption = #23398#21495
        end
        object Label20: TLabel
          Left = 224
          Top = 32
          Width = 39
          Height = 13
          Caption = #35838#31243#21495
        end
        object Label21: TLabel
          Left = 16
          Top = 80
          Width = 26
          Height = 13
          Caption = #25104#32489
        end
        object Label22: TLabel
          Left = 224
          Top = 72
          Width = 26
          Height = 13
          Caption = #23398#26399
        end
        object DBEdit14: TDBEdit
          Left = 88
          Top = 32
          Width = 121
          Height = 21
          DataField = 'Sno'
          DataSource = DataSource4
          ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
          TabOrder = 0
        end
        object DBEdit15: TDBEdit
          Left = 272
          Top = 32
          Width = 129
          Height = 21
          DataField = 'Cno'
          DataSource = DataSource4
          ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
          TabOrder = 1
        end
        object DBEdit16: TDBEdit
          Left = 88
          Top = 72
          Width = 121
          Height = 21
          DataField = 'Grade'
          DataSource = DataSource4
          ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
          TabOrder = 2
        end
        object DBEdit17: TDBEdit
          Left = 272
          Top = 72
          Width = 137
          Height = 21
          DataField = 'Sjxq'
          DataSource = DataSource4
          ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
          TabOrder = 3
        end
        object DBGrid4: TDBGrid
          Left = 88
          Top = 128
          Width = 337
          Height = 105
          DataSource = DataSource4
          ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
          TabOrder = 4
          TitleFont.Charset = GB2312_CHARSET
          TitleFont.Color = clWindowText
          TitleFont.Height = -13
          TitleFont.Name = #23435#20307
          TitleFont.Style = []
        end
      end
    end
    object GroupBox4: TGroupBox
      Left = 528
      Top = 16
      Width = 137
      Height = 281
      Caption = #23398#29983#20449#24687#24773#20917
      DockSite = True
      TabOrder = 1
      object Label9: TLabel
        Left = 16
        Top = 160
        Width = 104
        Height = 13
        Caption = #35831#36873#25321#26597#35810#30340#23383#27573
      end
      object RadioGroup1: TRadioGroup
        Left = 16
        Top = 40
        Width = 97
        Height = 113
        Caption = #23398#29983#24773#20917#20449#24687
        ItemIndex = 0
        Items.Strings = (
          #23398#29983#34920
          #31995#34920
          #35838#31243#34920
          #36873#35838#34920)
        TabOrder = 0
        OnClick = RadioGroup1Click
      end
      object ComboBox1: TComboBox
        Left = 24
        Top = 184
        Width = 89
        Height = 21
        ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
        ItemHeight = 13
        TabOrder = 1
      end
      object Edit1: TEdit
        Left = 32
        Top = 216
        Width = 73
        Height = 21
        ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
        TabOrder = 2
      end
      object BitBtn5: TBitBtn
        Left = 32
        Top = 240
        Width = 75
        Height = 25
        Caption = #30830#23450
        TabOrder = 3
        OnClick = BitBtn5Click
        Kind = bkIgnore
      end
    end
    object GroupBox5: TGroupBox
      Left = 528
      Top = 296
      Width = 137
      Height = 81
      Caption = #35760#24405#20449#24687
      DockSite = True
      TabOrder = 2
      object Label10: TLabel
        Left = 16
        Top = 24
        Width = 65
        Height = 13
        Caption = #24403#21069#35760#24405#21495
      end
      object Label18: TLabel
        Left = 16
        Top = 48
        Width = 78
        Height = 13
        Caption = #20849#26377#20960#26465#35760#24405
      end
    end
    object GroupBox6: TGroupBox
      Left = 0
      Top = 400
      Width = 665
      Height = 81
      Caption = 'GroupBox6'
      DockSite = True
      TabOrder = 3
      object BitBtn6: TBitBtn
        Left = 88
        Top = 24
        Width = 75
        Height = 25
        Hint = 'First'
        Caption = #31532#19968#26465
        TabOrder = 0
      end
      object BitBtn7: TBitBtn
        Left = 488
        Top = 24
        Width = 75
        Height = 25
        Hint = 'Last'
        Caption = #26368#21518#19968#26465
        TabOrder = 1
      end
      object BitBtn8: TBitBtn
        Left = 344
        Top = 24
        Width = 75
        Height = 25
        Hint = 'Next'
        Caption = #19979#19968#26465
        TabOrder = 2
      end
      object BitBtn11: TBitBtn
        Left = 216
        Top = 24
        Width = 75
        Height = 25
        Hint = 'Prior'
        Caption = #19978#19968#26465
        TabOrder = 3
      end
    end
    object DBNavigator1: TDBNavigator
      Left = 72
      Top = 320
      Width = 240
      Height = 25
      TabOrder = 4
    end
    object Button1: TButton
      Left = 376
      Top = 320
      Width = 75
      Height = 25
      Caption = #36864#20986
      TabOrder = 5
      OnClick = Button1Click
    end
  end
  object Table1: TTable
    Active = True
    DatabaseName = 'lqz'
    TableName = 'STUDENT.DB'
    Left = 368
    Top = 272
  end
  object Table2: TTable
    Active = True
    DatabaseName = 'lqz'
    TableName = 'DEPART.DB'
    Left = 448
    Top = 256
  end
  object DataSource1: TDataSource
    DataSet = Table1
    OnDataChange = DataSource1DataChange
    Left = 136
    Top = 192
  end
  object DataSource2: TDataSource
    DataSet = Table2
    OnDataChange = DataSource2DataChange
    Left = 296
    Top = 232
  end
  object DataSource3: TDataSource
    DataSet = Table3
    OnDataChange = DataSource3DataChange
    Left = 472
    Top = 184
  end
  object DataSource4: TDataSource
    DataSet = Table4
    OnDataChange = DataSource4DataChange
    Left = 464
    Top = 216
  end
  object Table3: TTable
    Active = True
    DatabaseName = 'lqz'
    TableName = 'COURSE.DB'
    Left = 336
    Top = 232
  end
  object Table4: TTable
    Active = True
    DatabaseName = 'lqz'
    TableName = 'SC.DB'
    Left = 400
    Top = 248
  end
  object OpenPictureDialog1: TOpenPictureDialog
    Left = 288
    Top = 80
  end
end