unit2.~dfm

VB编写的考试系统和论文

object Form2: TForm2
  Left = 176
  Top = 7
  Align = alClient
  AutoScroll = False
  AutoSize = True
  BorderIcons = [biSystemMenu, biMinimize]
  Caption = #23616#22495#32593#32771#35797#31995#32479#65288#23458#25143#31471#65289
  ClientHeight = 538
  ClientWidth = 790
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnClose = FormClose
  OnCloseQuery = FormCloseQuery
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object StatusBar1: TStatusBar
    Left = 0
    Top = 519
    Width = 790
    Height = 19
    Panels = <
      item
        Width = 200
      end
      item
        Width = 50
      end>
    SimplePanel = False
  end
  object ToolBar1: TToolBar
    Left = 0
    Top = 0
    Width = 790
    Height = 57
    ButtonHeight = 55
    ButtonWidth = 81
    Caption = 'ToolBar1'
    TabOrder = 1
    object SpeedButton1: TSpeedButton
      Left = 0
      Top = 2
      Width = 81
      Height = 55
      Cursor = crHandPoint
      Hint = #24320#22987#32771#35797
      Caption = #24320#22987#32771#35797
      Flat = True
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000130B0000130B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        3333333FFF33F333FF3F330E0330FFFCCFCC33777FF7F3377F7730EEE030FFFC
        CFCC377777F7F33773770EEE0000FFFFFCCF777777773F33377FEEE0BFBF0FFF
        FCCF7777333373F337730E0BFBFBF0FFCCFF77733333373F77F330BFBFBFBF0F
        CCFF37F333333F7F773330FBFBFB0B0FFFFF37F3F33F737FFFFF30B0BF0FB000
        000037F73F73F777777730FB0BF0FB0FFFFF373F73F73F7F333F330030BF0F0F
        FF993F77373F737F3377CC33330BF00FFF9977FFF373F77F3F77CC993330009F
        99FF7777F337777F77F333993330F99F99FF3F77FF37F773773F993CC330FFF9
        9F9977F77F37F3377F77993CC330FFF99F997737733733377377}
      NumGlyphs = 2
      ParentShowHint = False
      ShowHint = True
      OnClick = SpeedButton1Click
    end
    object SpeedButton2: TSpeedButton
      Left = 81
      Top = 2
      Width = 80
      Height = 55
      Cursor = crHandPoint
      Hint = #25104#32489#26597#35810
      Caption = #25552#20132#35797#21367
      Flat = True
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000130B0000130B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300000000000
        003337777777777777F330FFFFFFFFFFF03337F333FFFFF337F330FFF70007FF
        F03337F33777773F37F330FF08FFF80FF03337F373333373F7F330F78FFFFF87
        F03337F7F3333337F7F330F0FFFFFFF0F03337F7F333FFF7F7F330F0FFF900F0
        F03337F7F3377737F7F330F0FFF0FFF0F03337F7F337F337F7F330F78FF0FF87
        F03337F73F37F33737F330FF08F0F80FF03337F373F7FF7337F330FFF70007FF
        F03337F33777773FF7F330FFFFFFFF00003337F33333337777F330FFFFFFFF0F
        F03337FFFFFFFF7F373330999999990F033337777777777F733330FFFFFFFF00
        333337FFFFFFFF77333330000000000333333777777777733333}
      NumGlyphs = 2
      ParentShowHint = False
      ShowHint = True
      OnClick = SpeedButton2Click
    end
    object SpeedButton3: TSpeedButton
      Left = 161
      Top = 2
      Width = 88
      Height = 55
      Cursor = crHandPoint
      Hint = #25552#20132#35797#21367
      Caption = #25104#32489#26597#35810
      Flat = True
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000120B0000120B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        333333333333333333333333333333333333333FFFFFFFFFFF33330000000000
        03333377777777777F33333003333330033333377FF333377F33333300333333
        0333333377FF33337F3333333003333303333333377FF3337333333333003333
        333333333377FF3333333333333003333333333333377FF33333333333330033
        3333333333337733333333333330033333333333333773333333333333003333
        33333333337733333F3333333003333303333333377333337F33333300333333
        03333333773333337F33333003333330033333377FFFFFF77F33330000000000
        0333337777777777733333333333333333333333333333333333}
      NumGlyphs = 2
      ParentShowHint = False
      ShowHint = True
    end
    object SpeedButton4: TSpeedButton
      Left = 249
      Top = 2
      Width = 80
      Height = 55
      Cursor = crHandPoint
      Hint = #36864#20986#31995#32479
      Caption = #36864#20986#31995#32479
      Flat = True
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000130B0000130B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        3333333333FFFFF3333333333999993333333333F77777FFF333333999999999
        3333333777333777FF33339993707399933333773337F3777FF3399933000339
        9933377333777F3377F3399333707333993337733337333337FF993333333333
        399377F33333F333377F993333303333399377F33337FF333373993333707333
        333377F333777F333333993333101333333377F333777F3FFFFF993333000399
        999377FF33777F77777F3993330003399993373FF3777F37777F399933000333
        99933773FF777F3F777F339993707399999333773F373F77777F333999999999
        3393333777333777337333333999993333333333377777333333}
      NumGlyphs = 2
      ParentShowHint = False
      ShowHint = True
      OnClick = SpeedButton4Click
    end
  end
  object GroupBox1: TGroupBox
    Left = 8
    Top = 64
    Width = 881
    Height = 569
    Caption = #35797#39064#26639
    TabOrder = 2
    object tihao: TLabel
      Left = 144
      Top = 104
      Width = 7
      Height = 24
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clRed
      Font.Height = -19
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object timu: TLabel
      Left = 240
      Top = 104
      Width = 7
      Height = 24
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlue
      Font.Height = -19
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object a: TLabel
      Left = 198
      Top = 176
      Width = 126
      Height = 13
      Caption = '                                          '
    end
    object b: TLabel
      Left = 656
      Top = 176
      Width = 123
      Height = 13
      Caption = '                                         '
    end
    object c: TLabel
      Left = 198
      Top = 304
      Width = 144
      Height = 13
      Caption = '                                                '
    end
    object d: TLabel
      Left = 656
      Top = 304
      Width = 252
      Height = 13
      Caption = 
        '                                                                ' +
        '                    '
    end
    object e: TLabel
      Left = 198
      Top = 432
      Width = 165
      Height = 13
      Caption = '                                                       '
    end
    object f: TLabel
      Left = 659
      Top = 432
      Width = 294
      Height = 13
      Caption = 
        '                                                                ' +
        '                                  '
    end
    object Label9: TLabel
      Left = 632
      Top = 104
      Width = 7
      Height = 24
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Height = -19
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object shichuo: TLabel
      Left = 328
      Top = 360
      Width = 37
      Height = 13
      Caption = 'shichuo'
      Visible = False
    end
    object tixing: TLabel
      Left = 688
      Top = 64
      Width = 24
      Height = 13
      Caption = 'tixing'
      Visible = False
    end
    object Label13: TLabel
      Left = 480
      Top = 360
      Width = 38
      Height = 13
      Caption = 'Label13'
      Visible = False
    end
    object Label1: TLabel
      Left = 155
      Top = 48
      Width = 8