unit13.dfm

毕业设计(带论文)—试卷生成系统,做的不错

object choosepaperform: Tchoosepaperform
  Left = 7
  Top = 110
  BorderIcons = [biMinimize, biMaximize]
  BorderStyle = bsDialog
  Caption = #25163#24037#35797#21367#29983#25104
  ClientHeight = 455
  ClientWidth = 769
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poMainFormCenter
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 769
    Height = 455
    Align = alClient
    TabOrder = 0
    object BitBtn1: TBitBtn
      Left = 12
      Top = 248
      Width = 33
      Height = 25
      TabOrder = 0
      OnClick = BitBtn1Click
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000120B0000120B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333303333
        333333333337F33333333333333033333333333333373F333333333333090333
        33333333337F7F33333333333309033333333333337373F33333333330999033
        3333333337F337F33333333330999033333333333733373F3333333309999903
        333333337F33337F33333333099999033333333373333373F333333099999990
        33333337FFFF3FF7F33333300009000033333337777F77773333333333090333
        33333333337F7F33333333333309033333333333337F7F333333333333090333
        33333333337F7F33333333333309033333333333337F7F333333333333090333
        33333333337F7F33333333333300033333333333337773333333}
      NumGlyphs = 2
    end
    object BitBtn2: TBitBtn
      Left = 50
      Top = 248
      Width = 33
      Height = 25
      TabOrder = 1
      OnClick = BitBtn2Click
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000120B0000120B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333000333
        3333333333777F33333333333309033333333333337F7F333333333333090333
        33333333337F7F33333333333309033333333333337F7F333333333333090333
        33333333337F7F33333333333309033333333333FF7F7FFFF333333000090000
        3333333777737777F333333099999990333333373F3333373333333309999903
        333333337F33337F33333333099999033333333373F333733333333330999033
        3333333337F337F3333333333099903333333333373F37333333333333090333
        33333333337F7F33333333333309033333333333337373333333333333303333
        333333333337F333333333333330333333333333333733333333}
      NumGlyphs = 2
    end
    object PageControl1: TPageControl
      Left = 0
      Top = 0
      Width = 553
      Height = 241
      ActivePage = TabSheet1
      TabOrder = 2
      object TabSheet1: TTabSheet
        Caption = '  '#36873#25321#39064'  '
        OnShow = TabSheet1Show
        object DBNavigator1: TDBNavigator
          Left = 96
          Top = 3
          Width = 224
          Height = 25
          DataSource = DataModule4.DataSource_choose
          VisibleButtons = [nbFirst, nbPrior, nbNext, nbLast]
          TabOrder = 0
          OnClick = DBNavigator1Click
        end
        object Memo1: TMemo
          Left = 16
          Top = 32
          Width = 377
          Height = 161
          TabOrder = 1
        end
        object DBEdit1: TDBEdit
          Left = 16
          Top = 8
          Width = 57
          Height = 21
          DataField = 'tno'
          DataSource = DataModule4.DataSource_choose
          TabOrder = 2
        end
      end
      object TabSheet2: TTabSheet
        Caption = '  '#21028#26029#39064'  '
        ImageIndex = 1
        OnShow = TabSheet2Show
        object Memo2: TMemo
          Left = 16
          Top = 32
          Width = 377
          Height = 161
          ScrollBars = ssBoth
          TabOrder = 0
        end
        object DBNavigator2: TDBNavigator
          Left = 96
          Top = 3
          Width = 224
          Height = 25
          DataSource = DataModule4.DataSource_judge
          VisibleButtons = [nbFirst, nbPrior, nbNext, nbLast]
          TabOrder = 1
          OnClick = DBNavigator2Click
        end
        object DBEdit2: TDBEdit
          Left = 16
          Top = 8
          Width = 57
          Height = 21
          DataField = 'tno'
          DataSource = DataModule4.DataSource_judge
          TabOrder = 2
        end
      end
      object TabSheet3: TTabSheet
        Caption = '  '#22635#31354#39064'  '
        ImageIndex = 2
        OnShow = TabSheet3Show
        object Memo3: TMemo
          Left = 16
          Top = 32
          Width = 377
          Height = 161
          ScrollBars = ssBoth
          TabOrder = 0
        end
        object DBNavigator3: TDBNavigator
          Left = 96
          Top = 3
          Width = 224
          Height = 25
          DataSource = DataModule4.DataSource_filltext
          VisibleButtons = [nbFirst, nbPrior, nbNext, nbLast]
          TabOrder = 1
          OnClick = DBNavigator3Click
        end
        object DBEdit3: TDBEdit
          Left = 16
          Top = 8
          Width = 57
          Height = 21
          DataField = 'tno'
          DataSource = DataModule4.DataSource_filltext
          TabOrder = 2
        end
      end
      object TabSheet4: TTabSheet
        Caption = '  '#31243#24207#38405#35835#39064'  '
        ImageIndex = 3
        OnShow = TabSheet4Show
        object Memo4: TMemo
          Left = 16
          Top = 32
          Width = 377
          Height = 161
          ScrollBars = ssBoth
          TabOrder = 0
        end
        object DBNavigator4: TDBNavigator
          Left = 96
          Top = 3
          Width = 224
          Height = 25
          DataSource = DataModule4.DataSource_readpro
          VisibleButtons = [nbFirst, nbPrior, nbNext, nbLast]
          TabOrder = 1
          OnClick = DBNavigator4Click
        end
        object DBEdit4: TDBEdit
          Left = 16
          Top = 8
          Width = 57
          Height = 21
          DataField = 'tno'
          DataSource = DataModule4.DataSource_readpro
          TabOrder = 2
        end
      end
      object TabSheet5: TTabSheet
        Caption = '  '#32534#31243#39064'  '
        ImageIndex = 4
        OnShow = TabSheet5Show
        object Memo5: TMemo
          Left = 16
          Top = 32
          Width = 377
          Height = 161
          ScrollBars = ssBoth
          TabOrder = 0
        end
        object DBNavigator5: TDBNavigator
          Left = 96
          Top = 3
          Width = 224
          Height = 25
          DataSource = DataModule4.DataSource_procedure
          VisibleButtons = [nbFirst, nbPrior, nbNext, nbLast]
          TabOrder = 1
          OnClick = DBNavigator5Click
        end
        object DBEdit5: TDBEdit
          Left = 16
          Top = 8
          Width = 57
          Height = 21
          DataField = 'tno'
          DataSource = DataModule4.DataSource_procedure
          TabOrder = 2
        end
      end
    end
    object BitBtn3: TBitBtn
      Left = 472
      Top = 392
      Width = 65
      Height = 25
      Caption = #36820#22238
      TabOrder = 3
      Kind = bkClose
    end
    object ListBox1: TListBox
      Left = 8
      Top = 280
      Width = 81
      Height = 169
      ItemHeight = 13
      TabOrder = 4
      OnClick = ListBox1Click
    end
    object ListBox3: TListBox
      Left = 184
      Top = 278
      Width = 81
      Height = 169
      ItemHeight = 13
      TabOrder = 10
      OnClick = ListBox3Click
    end
    object ListBox4: TListBox
      Left = 272
      Top = 278
      Width = 81
      Height = 169
      ItemHeight = 13
      TabOrder = 11
      OnClick = ListBox4Click
    end
    object ListBox5: TListBox
      Left = 360
      Top = 278
      Width = 81
      Height = 169
      ItemHeight = 13
      TabOrder = 12
      OnClick = ListBox5Click
    end
    object BitBtn4: TBitBtn
      Left = 104
      Top = 248
      Width = 33
      Height = 25
      TabOrder = 13
      OnClick = BitBtn4Click
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000120B0000120B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333303333
        333333333337F33333333333333033333333333333373F333333333333090333
        33333333337F7F33333333333309033333333333337373F33333333330999033
        3333333337F337F33333333330999033333333333733373F3333333309999903
        333333337F33337F33333333099999033333333373333373F333333099999990
        33333337FFFF3FF7F33333300009000033333337777F77773333333333090333
        33333333337F7F33333333333309033333333333337F7F333333333333090333
        33333333337F7F33333333333309033333333333337F7F333333333333090333
        33333333337F7F33333333333300033333333333337773333333}
      NumGlyphs = 2
    end
    object BitBtn6: TBitBtn
      Left = 192
      Top = 248
      Width = 33
      Height = 25
      TabOrder = 14
      OnClick = BitBtn6Click
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000120B0000120B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333303333