unit6.dfm

学生管理系统(delphi7.0+sql2000) 对学生基本信息,学生成绩,课程进行插,删,改功能

object Form6: TForm6
  Left = 251
  Top = 107
  Width = 650
  Height = 518
  Caption = #25104#32489#26597#35810
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnActivate = FormActivate
  PixelsPerInch = 96
  TextHeight = 13
  object GroupBox1: TGroupBox
    Left = 0
    Top = 0
    Width = 642
    Height = 483
    Align = alClient
    TabOrder = 0
    object DBGrid1: TDBGrid
      Left = 2
      Top = 116
      Width = 638
      Height = 365
      Align = alBottom
      DataSource = DataSource1
      ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
      Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
      TabOrder = 0
      TitleFont.Charset = DEFAULT_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -11
      TitleFont.Name = 'MS Sans Serif'
      TitleFont.Style = []
    end
    object GroupBox2: TGroupBox
      Left = -1
      Top = 8
      Width = 729
      Height = 97
      Caption = #31934#30830#26597#35810
      TabOrder = 1
      object Label1: TLabel
        Left = 8
        Top = 16
        Width = 36
        Height = 13
        Caption = #23398#21495#65306
      end
      object SpeedButton1: TSpeedButton
        Left = 64
        Top = 56
        Width = 65
        Height = 22
        Caption = #26597#35810
        Glyph.Data = {
          8A010000424D8A010000000000008A0000002800000010000000100000000100
          08000000000000010000120B0000120B0000150000001500000000000000FFFF
          FF00D7410000DC500000E57D4000854C0000A96F1000A16E2000A5690000A469
          0000BB7D0000FBF7EF00BB7E0000BA7D0000D4950000D3940000D3950000F8B7
          0000EAA90000E9A90000FFFFFF00010101010101010307010101010101010101
          01010101030801070101010101010101010101030C0801010701010101010101
          0101030F0C0801010107010101010101010313100A0801010101070101010101
          0211130F0D0901010101010501010101021113100C0901010101010501010101
          0211120F0C011101010101050101010102111201010111131001010501010101
          02110101010111130F0C01050101010102010101010111130E0A080501010101
          02010101010111130F0A0805010101010201010101040613100A080501010101
          0201010404010106060C08050101010102040401010101010B06060501010101
          0201010101010101010101050101}
        OnClick = SpeedButton1Click
      end
      object Edit1: TEdit
        Left = 48
        Top = 16
        Width = 121
        Height = 21
        ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
        MaxLength = 10
        TabOrder = 0
        OnKeyPress = Edit1KeyPress
      end
      object GroupBox3: TGroupBox
        Left = 192
        Top = 8
        Width = 417
        Height = 89
        Caption = #27169#31946#26597#35810
        TabOrder = 1
        object SpeedButton2: TSpeedButton
          Left = 344
          Top = 59
          Width = 65
          Height = 22
          Caption = #36820#22238
          Glyph.Data = {
            52020000424D5202000000000000FE0000002800000013000000110000000100
            08000000000054010000120B0000120B0000320000003200000000000000FFFF
            FF00FF00FF00F5F7F700ACB8BB00ABB7BA00C8D0D2008F9DA1008E9CA000BAC4
            C70029373C002A383D0044545A00506066005363690056666C0055656B006474
            7A006F7F85006D7D830073838900728288007A898E007D8C91007C8B90008594
            99008A999E00A1ADB100A7B3B700BCC5C800C2CBCE00D8DEE000D4DADC00D3D9
            DB00EEF1F200E9ECED003140460035444A0036454B003E4D530076858B00B4BE
            C200B3BDC100CBD2D500CED5D800202C3200E3E7E900FBFBFB00B2B2B200FFFF
            FF0002020202020202020202020202020202020202000202022424240A272727
            27272727272702020200020210011D0D0E18162815121316160F0A0202000202
            10011D0D0E292A04051C161B0116010A0200020210011D0D0E212C2B06161B01
            160F01010200020210011D272D07081A161B011617170E010200020210011D27
            270B0B0B1501160E0E0E0E0E0200020210011D27111F22010B04300202020202
            0200020210011D0B2023010101140802020202020200020210011D0C2E2F0101
            01140802020202020200020210011D0B03010101011408020202020202000202
            102C2C2711010101140F02020202020202000202102C0119150C25250F020202
            020202020200020202102E011E0F260202020202020202020200020202021001
            011A26020202020202020202020002020202020D092B1A020202020202020202
            02000202020202020202020202020202020202020200}
          OnClick = SpeedButton2Click
        end
        object Label2: TLabel
          Left = 8
          Top = 16
          Width = 60
          Height = 13
          Caption = #25480#35838#25945#24072#65306
        end
        object Label3: TLabel
          Left = 168
          Top = 16
          Width = 60
          Height = 13
          Caption = #35838#31243#21517#31216#65306
        end
        object Label4: TLabel
          Left = 176
          Top = 64
          Width = 36
          Height = 13
          Caption = #25104#32489#65306
        end
        object Label5: TLabel
          Left = 8
          Top = 56
          Width = 36
          Height = 13
          Caption = #23398#26399#65306
        end
        object SpeedButton3: TSpeedButton
          Left = 344
          Top = 16
          Width = 65
          Height = 25
          Caption = #26597#35810
          Glyph.Data = {
            8A010000424D8A010000000000008A0000002800000010000000100000000100
            08000000000000010000120B0000120B0000150000001500000000000000FFFF
            FF00D7410000DC500000E57D4000854C0000A96F1000A16E2000A5690000A469
            0000BB7D0000FBF7EF00BB7E0000BA7D0000D4950000D3940000D3950000F8B7
            0000EAA90000E9A90000FFFFFF00010101010101010307010101010101010101
            01010101030801070101010101010101010101030C0801010701010101010101
            0101030F0C0801010107010101010101010313100A0801010101070101010101
            0211130F0D0901010101010501010101021113100C0901010101010501010101
            0211120F0C011101010101050101010102111201010111131001010501010101
            02110101010111130F0C01050101010102010101010111130E0A080501010101
            02010101010111130F0A0805010101010201010101040613100A080501010101
            0201010404010106060C08050101010102040401010101010B06060501010101
            0201010101010101010101050101}
          OnClick = SpeedButton3Click
        end
        object Edit2: TEdit
          Left = 72
          Top = 12
          Width = 97
          Height = 21
          ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
          MaxLength = 20
          TabOrder = 0
        end
        object Edit3: TEdit
          Left = 240
          Top = 8
          Width = 97
          Height = 21
          ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
          MaxLength = 20
          TabOrder = 1
        end
        object Edit4: TEdit
          Left = 72
          Top = 56
          Width = 97
          Height = 21
          ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
          MaxLength = 20
          TabOrder = 2
        end
        object Edit5: TEdit
          Left = 240
          Top = 56
          Width = 97
          Height = 21
          ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
          MaxLength = 20
          TabOrder = 3
        end
      end
    end
  end
  object DataSource1: TDataSource
    DataSet = ADOQuery1
    Left = 416
    Top = 176
  end
  object ADOQuery1: TADOQuery
    Connection = ADOConnection1
    Parameters = <>
    Left = 536
    Top = 176
  end
  object ADOConnection1: TADOConnection
    ConnectionString = 
      'Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security In' +
      'fo=False;Initial Catalog=xueshengguanli'
    LoginPrompt = False
    Provider = 'SQLOLEDB.1'
    Left = 488
    Top = 112
  end
end