unit11.dfm

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

object Form11: TForm11
  Left = 136
  Top = 162
  Width = 659
  Height = 420
  BorderIcons = [biSystemMenu, biMinimize]
  Caption = #31995#32479#32500#25252
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object BitBtn12: TBitBtn
    Left = 560
    Top = 264
    Width = 75
    Height = 25
    TabOrder = 0
    Kind = bkOK
  end
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 651
    Height = 386
    Align = alClient
    BevelInner = bvLowered
    BorderStyle = bsSingle
    DockSite = True
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
    TabOrder = 1
    object PageControl1: TPageControl
      Left = 9
      Top = 2
      Width = 520
      Height = 295
      ActivePage = TabSheet1
      TabIndex = 0
      TabOrder = 0
      object TabSheet1: TTabSheet
        Caption = #20010#20154#20449#24687
        object Panel2: TPanel
          Left = 8
          Top = 8
          Width = 489
          Height = 222
          BorderStyle = bsSingle
          TabOrder = 0
          object Label1: TLabel
            Left = 24
            Top = 20
            Width = 39
            Height = 13
            Caption = #23398#21495#65306
          end
          object Label2: TLabel
            Left = 24
            Top = 45
            Width = 39
            Height = 13
            Caption = #22995#21517#65306
          end
          object Label3: TLabel
            Left = 24
            Top = 74
            Width = 39
            Height = 13
            Caption = #24615#21035#65306
          end
          object Label4: TLabel
            Left = 24
            Top = 103
            Width = 39
            Height = 13
            Caption = #24180#40836#65306
          end
          object Label5: TLabel
            Left = 176
            Top = 16
            Width = 65
            Height = 13
            Caption = #20837#23398#26085#26399#65306
          end
          object Label6: TLabel
            Left = 176
            Top = 64
            Width = 65
            Height = 13
            Caption = #25152#23646#31995#21035#65306
          end
          object Label7: TLabel
            Left = 24
            Top = 132
            Width = 39
            Height = 13
            Caption = #31616#21382#65306
          end
          object Label8: TLabel
            Left = 272
            Top = 8
            Width = 39
            Height = 13
            Caption = #29031#29255#65306
          end
          object DBEdit1: TDBEdit
            Left = 72
            Top = 16
            Width = 81
            Height = 21
            DataField = 'Sno'
            DataSource = DataSource1
            ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
            TabOrder = 0
          end
          object DBEdit2: TDBEdit
            Left = 72
            Top = 43
            Width = 81
            Height = 21
            DataField = 'Cname'
            DataSource = DataSource1
            ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
            TabOrder = 1
          end
          object DBEdit3: TDBEdit
            Left = 72
            Top = 71
            Width = 81
            Height = 21
            DataField = 'Ssex'
            DataSource = DataSource1
            ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
            TabOrder = 2
          end
          object DBEdit4: TDBEdit
            Left = 72
            Top = 99
            Width = 81
            Height = 21
            DataField = 'Sage'
            DataSource = DataSource1
            ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
            TabOrder = 3
          end
          object DBEdit5: TDBEdit
            Left = 176
            Top = 32
            Width = 97
            Height = 21
            DataField = 'Sdata'
            DataSource = DataSource1
            ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
            TabOrder = 4
          end
          object DBMemo1: TDBMemo
            Left = 24
            Top = 155
            Width = 401
            Height = 57
            DataField = 'Smeno'
            DataSource = DataSource1
            ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
            TabOrder = 5
          end
          object DBEdit6: TDBEdit
            Left = 176
            Top = 88
            Width = 97
            Height = 21
            DataField = 'Sdept'
            DataSource = DataSource1
            ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
            TabOrder = 6
          end
          object Panel3: TPanel
            Left = 376
            Top = 6
            Width = 97
            Height = 145
            BevelInner = bvLowered
            BevelWidth = 4
            BorderStyle = bsSingle
            TabOrder = 7
            object Image1: TImage
              Left = 8
              Top = 8
              Width = 81
              Height = 121
            end
          end
          object BitBtn9: TBitBtn
            Left = 304
            Top = 48
            Width = 57
            Height = 25
            Caption = #21152#20837#29031#29255
            TabOrder = 8
            OnClick = BitBtn9Click
          end
          object BitBtn10: TBitBtn
            Left = 304
            Top = 104
            Width = 57
            Height = 25
            Caption = #21024#38500#29031#29255
            TabOrder = 9
            OnClick = BitBtn10Click
          end
        end
      end
      object TabSheet2: TTabSheet
        Caption = #35760#24405#34920#26684
        ImageIndex = 4
        object DBGrid1: TDBGrid
          Left = 0
          Top = 0
          Width = 512
          Height = 267
          Align = alClient
          DataSource = DataSource1
          ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
          TabOrder = 0
          TitleFont.Charset = GB2312_CHARSET
          TitleFont.Color = clWindowText
          TitleFont.Height = -13
          TitleFont.Name = #23435#20307
          TitleFont.Style = []
        end
      end
      object TabSheet3: TTabSheet
        Caption = #31995#21035#20449#24687
        ImageIndex = 2
        object DBGrid2: TDBGrid
          Left = 0
          Top = 80
          Width = 441
          Height = 131
          DataSource = DataSource2
          ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
          TabOrder = 0
          TitleFont.Charset = GB2312_CHARSET
          TitleFont.Color = clWindowText
          TitleFont.Height = -13
          TitleFont.Name = #23435#20307
          TitleFont.Style = []
        end
        object GroupBox2: TGroupBox
          Left = 0
          Top = 0
          Width = 512
          Height = 73
          Align = alTop
          Caption = #31995#21035#20449#24687
          TabOrder = 1
          object Label11: TLabel
            Left = 16
            Top = 32
            Width = 39
            Height = 13
            Caption = #31995#21495#65306
          end
          object Label12: TLabel
            Left = 136
            Top = 32
            Width = 39
            Height = 13
            Caption = #31995#21517#65306
          end
          object Label13: TLabel
            Left = 280
            Top = 32
            Width = 39
            Height = 13
            Caption = #30005#35805#65306
          end
          object DBEdit7: TDBEdit
            Left = 56
            Top = 28
            Width = 73
            Height = 21
            DataField = 'DeptNo'
            DataSource = DataSource2
            ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
            TabOrder = 0
          end
          object DBEdit8: TDBEdit
            Left = 176
            Top = 28
            Width = 97
            Height = 21
            DataField = 'DeptName'
            DataSource = DataSource2
            ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
            TabOrder = 1
          end
          object DBEdit9: TDBEdit
            Left = 328
            Top = 28
            Width = 105
            Height = 21
            DataField = 'Tel'
            DataSource = DataSource2
            ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
            TabOrder = 2
          end
        end
      end
      object TabSheet4: TTabSheet
        Caption = #35838#31243#34920#20449#24687
        ImageIndex = 3
        object DBGrid3: TDBGrid
          Left = 192
          Top = 0
          Width = 249
          Height = 201
          DataSource = DataSource3
          ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
          TabOrder = 0
          TitleFont.Charset = GB2312_CHARSET
          TitleFont.Color = clWindowText
          TitleFont.Height = -13
          TitleFont.Name = #23435#20307
          TitleFont.Style = []
        end
        object GroupBox3: TGroupBox
          Left = 8
          Top = 8
          Width = 169
          Height = 193
          Caption = #35838#31243#34920
          TabOrder = 1
          object Label14: TLabel
            Left = 8
            Top = 32
            Width = 52
            Height = 13
            Caption = #35838#31243#21495#65306
          end
          object Label15: TLabel