教育系统应用

开发平台：
Delphi

Unit9.dfm：源码内容
							object readproform: Treadproform
  Left = 21
  Top = 66
  Width = 785
  Height = 492
  BorderIcons = [biMinimize, biMaximize]
  Caption = #31243#24207#38405#35835#39064
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poMainFormCenter
  OnActivate = FormActivate
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 777
    Height = 458
    Align = alClient
    TabOrder = 1
    object DBNavigator1: TDBNavigator
      Left = 232
      Top = 424
      Width = 112
      Height = 25
      DataSource = DataModule4.DataSource_readpro
      VisibleButtons = [nbFirst, nbPrior, nbNext, nbLast]
      TabOrder = 0
      OnClick = DBNavigator1Click
    end
    object BitBtn1: TBitBtn
      Left = 664
      Top = 424
      Width = 75
      Height = 25
      Caption = #36820#22238
      TabOrder = 1
      Kind = bkClose
    end
    object DBNavigator2: TDBNavigator
      Left = 344
      Top = 424
      Width = 56
      Height = 25
      DataSource = DataModule4.DataSource_readpro
      VisibleButtons = [nbInsert, nbDelete]
      TabOrder = 2
      OnClick = DBNavigator2Click
    end
    object TreeView1: TTreeView
      Left = 0
      Top = 0
      Width = 185
      Height = 457
      Indent = 19
      ParentShowHint = False
      ReadOnly = True
      ShowHint = True
      TabOrder = 3
      OnClick = TreeView1Click
      OnMouseDown = TreeView1MouseDown
      Items.Data = {
        010000001E0000000000000000000000FFFFFFFFFFFFFFFF0000000009000000
        0543D3EFD1D42D0000000000000000000000FFFFFFFFFFFFFFFF000000000400
        000014B5DAD2BBD5C22043D3EFD1D4BBF9B4A1D6AACAB61F0000000000000000
        000000FFFFFFFFFFFFFFFF000000000100000006B5DAD2BBBDDA2F0000000000
        000000000000FFFFFFFFFFFFFFFF000000000000000016B5DAD2BBD6AACAB6B5
        E32043D3EFD1D4B5C4CCD8B5E31F0000000000000000000000FFFFFFFFFFFFFF
        FF000000000100000006B5DAB6FEBDDA390000000000000000000000FFFFFFFF
        FFFFFFFF000000000000000020B5DAD2BBD6AACAB6B5E32043D3EFD1D4B5C4B1
        EACAB6B7FBBACDB1A3C1F4D7D61F0000000000000000000000FFFFFFFFFFFFFF
        FF000000000100000006B5DAC8FDBDDA2F0000000000000000000000FFFFFFFF
        FFFFFFFF000000000000000016B5DAD2BBD6AACAB6B5E32043B3CCD0F2B5C4BD
        E1B9B91F0000000000000000000000FFFFFFFFFFFFFFFF000000000100000006
        B5DACBC4BDDA330000000000000000000000FFFFFFFFFFFFFFFF000000000000
        00001AB5DAD2BBD6AACAB6B5E32043B3CCD0F2B5C4BFAAB7A2B9FDB3CC380000
        000000000000000000FFFFFFFFFFFFFFFF00000000030000001FB5DAB6FED5C2
        20CAFDBEDDC0E0D0CDA1A2D4CBCBE3B7FBD3EBB1EDB4EFCABD1F000000000000
        0000000000FFFFFFFFFFFFFFFF000000000400000006B5DAD2BBBDDA31000000
        0000000000000000FFFFFFFFFFFFFFFF000000000000000018B5DAD2BBD6AACA
        B6B5E32043D3EFD1D4CAFDBEDDC0E0D0CD2C0000000000000000000000FFFFFF
        FFFFFFFFFF000000000000000013B5DAB6FED6AACAB6B5E320D5FBD0CDCAFDBE
        DD2C0000000000000000000000FFFFFFFFFFFFFFFF000000000000000013B5DA
        C8FDD6AACAB6B5E320CAB5D0CDCAFDBEDD2E0000000000000000000000FFFFFF
        FFFFFFFFFF000000000000000015B5DACBC4D6AACAB6B5E320D7D6B7FBD0CDCA
        FDBEDD1F0000000000000000000000FFFFFFFFFFFFFFFF000000000200000006
        B5DAB6FEBDDA2A0000000000000000000000FFFFFFFFFFFFFFFF000000000000
        000011B5DAD2BBD6AACAB6B5E320D4CBCBE3B7FB2A0000000000000000000000
        FFFFFFFFFFFFFFFF000000000000000011B5DAB6FED6AACAB6B5E320CEBBD4CB
        CBE31F0000000000000000000000FFFFFFFFFFFFFFFF000000000200000006B5
        DAC8FDBDDA2A0000000000000000000000FFFFFFFFFFFFFFFF00000000000000
        0011B5DAD2BBD6AACAB6B5E320B1EDB4EFCABD2C0000000000000000000000FF
        FFFFFFFFFFFFFF000000000000000013B5DAB6FED6AACAB6B5E320C0E0D0CDD7
        AABBBB280000000000000000000000FFFFFFFFFFFFFFFF00000000020000000F
        B5DAC8FDD5C220CBB3D0F2BDE1B9B91F0000000000000000000000FFFFFFFFFF
        FFFFFF000000000100000006B5DAD2BBBDDA360000000000000000000000FFFF
        FFFFFFFFFFFF00000000000000001DB5DAD2BBD6AACAB6B5E320D7D6B7FBCAFD
        BEDDB5C4CAE4C8EBCAE4B3F61F0000000000000000000000FFFFFFFFFFFFFFFF
        000000000100000006B5DAB6FEBDDA320000000000000000000000FFFFFFFFFF
        FFFFFF000000000000000019B5DAD2BBD6AACAB6B5E320B8F1CABDCAE4C8EBD3
        EBCAE4B3F6290000000000000000000000FFFFFFFFFFFFFFFF00000000030000
        0010B5DACBC4D5C220D1A1D4F1BDE1B9B9201F0000000000000000000000FFFF
        FFFFFFFFFFFF000000000100000006B5DAD2BBBDDA2A00000000000000000000
        00FFFFFFFFFFFFFFFF000000000000000011B5DAD2BBD6AACAB6B5E3206966D3
        EFBEE41F0000000000000000000000FFFFFFFFFFFFFFFF000000000100000006
        B5DAB6FEBDDA2E0000000000000000000000FFFFFFFFFFFFFFFF000000000000
        000015B5DAD2BBD6AACAB6B5E320CCF5BCFEB1EDB4EFCABD1F00000000000000
        00000000FFFFFFFFFFFFFFFF000000000100000006B5DAC8FDBDDA3400000000
        00000000000000FFFFFFFFFFFFFFFF00000000000000001BB5DAD2BBD6AACAB6
        B5E32073776974636828BFAAB9D829D3EFBEE4290000000000000000000000FF
        FFFFFFFFFFFFFF000000000400000010B5DACEE5D5C220D1ADBBB7BFD8D6C620
        1F0000000000000000000000FFFFFFFFFFFFFFFF000000000200000006B5DAD2
        BBBDDA310000000000000000000000FFFFFFFFFFFFFFFF000000000000000018
        B5DAD2BBD6AACAB6B5E3207768696C65D1ADBBB7D3EFBEE43400000000000000
        00000000FFFFFFFFFFFFFFFF00000000000000001BB5DAB6FED6AACAB6B5E320
        646F2D7768696C65D1ADBBB7D3EFBEE41F0000000000000000000000FFFFFFFF
        FFFFFFFF000000000100000006B5DAB6FEBDDA2F0000000000000000000000FF
        FFFFFFFFFFFFFF000000000000000016B5DAD2BBD6AACAB6B5E320666F72D1AD
        BBB7D3EFBEE41F0000000000000000000000FFFFFFFFFFFFFFFF000000000200
        000006B5DAC8FDBDDA2D0000000000000000000000FFFFFFFFFFFFFFFF000000
        000000000014B5DAD2BBD6AACAB6B5E320627265616BD3EFBEE4300000000000
        000000000000FFFFFFFFFFFFFFFF000000000000000017B5DAB6FED6AACAB6B5
        E320636F6E74696E7565D3EFBEE41F0000000000000000000000FFFFFFFFFFFF
        FFFF000000000100000006B5DACBC4BDDA2C0000000000000000000000FFFFFF
        FFFFFFFFFF000000000000000013B5DAD2BBD6AACAB6B5E320676F746FD3EFBE
        E4280000000000000000000000FFFFFFFFFFFFFFFF00000000020000000FB5DA
        C1F9D5C220CAFDD7E9D6B8D5EB1F0000000000000000000000FFFFFFFFFFFFFF
        FF000000000300000006B5DAD2BBBDDA2C0000000000000000000000FFFFFFFF
        FFFFFFFF000000000000000013B5DAD2BBD6AACAB6B5E320D2BBCEACCAFDD7E9
        2C0000000000000000000000FFFFFFFFFFFFFFFF000000000000000013B5DAB6
        FED6AACAB6B5E320B6FECEACCAFDD7E92C0000000000000000000000FFFFFFFF
        FFFFFFFF000000000000000013B5DAC8FDD6AACAB6B5E320D7D6B7FBCAFDD7E9
        1F0000000000000000000000FFFFFFFFFFFFFFFF000000000800000006B5DAB6
        FEBDDA360000000000000000000000FFFFFFFFFFFFFFFF00000000000000001D
        B5DAD2BBD6AACAB6B5E320D6B8D5EBB5C4CBB5C3F7BACDB3F5CABCBBAF2C0000
        000000000000000000FFFFFFFFFFFFFFFF000000000000000013B5DAB6FED6AA
        CAB6B5E320D6B8D5EBD4CBCBE3320000000000000000000000FFFFFFFFFFFFFF
        FF000000000000000019B5DAC8FDD6AACAB6B5E320D2BBCEACCAFDD7E9BACDD4
        CBCBE3320000000000000000000000FFFFFFFFFFFFFFFF000000000000000019
        B5DACBC4D6AACAB6B5E320B6FECEACCAFDD7E9BACDD4CBCBE334000000000000
        0000000000FFFFFFFFFFFFFFFF00000000000000001BB5DACEE5D6AACAB6B5E3
        20D7D6B7FBD6B8D5EBBACDD7D6B7FBB4AE2C0000000000000000000000FFFFFF
        FFFFFFFFFF000000000000000013B5DAC1F9D6AACAB6B5E320B6E0BCB6D6B8D5
        EB2E0000000000000000000000FFFFFFFFFFFFFFFF000000000000000015B5DA
        C6DFD6AACAB6B5E320D6B8D5EBD0CDBAAFCAFD320000000000000000000000FF
        FFFFFFFFFFFFFF000000000000000019B5DAB0CBD6AACAB6B5E320D6B8CFF2BA
        AFCAFDB5C4D6B8D5EB340000000000000000000000FFFFFFFFFFFFFFFF000000
        00020000001BB5DAC6DFD5C220BAAFCAFD2020BDE1B9B9CCE5D3EBB9B2D3C3CC
        E5200000000000000000000000FFFFFFFFFFFFFFFF000000000700000007B5DA
        D2BBBDDA202C0000000000000000000000FFFFFFFFFFFFFFFF00000000000000
        0013B5DAD2BBD6AACAB6B5E320BAAFCAFDC9E8BCC63200000000000000000000
        00FFFFFFFFFFFFFFFF000000000000000019B5DAB6FED6AACAB6B5E320BAAFCA
        FDB5C4B4E6B4A2C0E0D0CD3A0000000000000000000000FFFFFFFFFFFFFFFF00
        0000000000000021B5DAC8FDD6AACAB6B5E320B1E4C1BFB5C4D7F7D3C3D3F2BA
        CDB4E6B4A2C0E0D0CD320000000000000000000000FFFFFFFFFFFFFFFF000000
        000000000019B5DACBC4D6AACAB6B5E320BAAFCAFDB5C4CAFDBEDDB4ABB5DD36
        0000000000000000000000FFFFFFFFFFFFFFFF00000000000000001DB5DACEE5
        D6AACAB6B5E320CAFDD7E9D4DABAAFCAFDBCE4B5C4B4ABB5DD2C000000000000
        0000000000FFFFFFFFFFFFFFFF000000000000000013B5DAC1F9D6AACAB6B5E3
        20B5DDB9E9BAAFCAFD380000000000000000000000FFFFFFFFFFFFFFFF000000
        00000000001FB5DAC6DFD6AACAB6B5E320B4ABB5DD6D61696E2829BAAFCAFDB5
        C4B2CECAFD1F0000000000000000000000FFFFFFFFFFFFFFFF00000000090000
        0006B5DAB6FEBDDA380000000000000000000000FFFFFFFFFFFFFFFF00000000
        000000001FB5DAD2BBD6AACAB6B5E320BDE1B9B9CCE5B6A8D2E5BACDB1E4C1BF
        CBB5C3F73C0000000000000000000000FFFFFFFFFFFFFFFF0000000000000000
        23B5DAB6FED6AACAB6B5E320BDE1B9B9CCE5B1E4C1BFB5C4D2FDD3C3BACDB3F5
        CABCBBAF2E0000000000000000000000FFFFFFFFFFFFFFFF0000000000000000
        15B5DAC8FDD6AACAB6B5E320BDE1B9B9CCE5CAFDD7E92E000000000000000000
        0000FFFFFFFFFFFFFFFF000000000000000015B5DACBC4D6AACAB6B5E320BDE1
        B9B9CCE5D6B8D5EB400000000000000000000000FFFFFFFFFFFFFFFF00000000
        0000000027B5DACEE5D6AACAB6B5E320BAAFCAFDD6AEBCE4BDE1B9B9CCE5B1E4
        C1BFB5C4CAFDBEDDB4ABB5DD2E0000000000000000000000FFFFFFFFFFFFFFFF
        000000000000000015B5DAC1F9D6AACAB6B5E320BDE1B9B9CCE5C7B6CCD72800
        00000000000000000000FFFFFFFFFFFFFFFF00000000000000000FB5DAC6DFD6
        AACAB6B5E320C1B4B1ED2A0000000000000000000000FFFFFFFFFFFFFFFF0000
        00000000000011B5DAB0CBD6AACAB6B5E320B9B2D3C3CCE52C00000000000000
        00000000FFFFFFFFFFFFFFFF000000000000000013B5DABEC5D6AACAB6B5E320
        C3B6BED9C0E0D0CD2A0000000000000000000000FFFFFFFFFFFFFFFF00000000
        0200000011B5DAB0CBD5C220D4A4B4A6C0EDC3FCC1EE1F000000000000000000
        0000FFFFFFFFFFFFFFFF000000000300000006B5DAD2BBBDDA26000000000000
        0000000000FFFFFFFFFFFFFFFF00000000000000000DB5DAD2BBD6AACAB6B5E3
        20BAEA2C0000000000000000000000FFFFFFFFFFFFFFFF000000000000000013
        B5DAB6FED6AACAB6B5E320CCF5BCFEB1E0D2EB2C0000000000000000000000FF
        FFFFFFFFFFFFFF000000000000000013B5DAC8FDD6AACAB6B5E320CEC4BCFEB0
        FCBAAC1F0000000000000000000000FFFFFFFFFFFFFFFF000000000400000006
        B5DAB6FEBDDA2C0000000000000000000000FFFFFFFFFFFFFFFF000000000000
        000013B5DAD2BBD6AACAB6B5E320CEC4BCFEB8C5CAF632000000000000000000
        0000FFFFFFFFFFFFFFFF000000000000000019B5DAB6FED6AACAB6B5E320CEC4
        BCFEB5C4CAE4C8EBCAE4B3F6320000000000000000000000FFFFFFFFFFFFFFFF
        000000000000000019B5DAC8FDD6AACAB6B5E320CEC4BCFEB5C4B6A8CEBBB2D9
        D7F72E0000000000000000000000FFFFFFFFFFFFFFFF000000000000000015B5
        DACBC4D6AACAB6B5E320CEC4BCFEB5C4BCECB2E22C0000000000000000000000
        FFFFFFFFFFFFFFFF000000000400000013B5DABEC5D5C220B3A3D3C3CBE3B7A8
        C9E8BCC61F0000000000000000000000FFFFFFFFFFFFFFFF0000000001000000
        06B5DAD2BBBDDA280000000000000000000000FFFFFFFFFFFFFFFF0000000000
        0000000FB5DAD2BBD6AACAB6B5E320C5C5D0F21F0000000000000000000000FF
        FFFFFFFFFFFFFF000000000100000006B5DAB6FEBDDA28000000000000000000
        0000FFFFFFFFFFFFFFFF00000000000000000FB5DAD2BBD6AACAB6B5E320B2E9
        D5D21F0000000000000000000000FFFFFFFFFFFFFFFF000000000100000006B5
        DAC8FDBDDA2A0000000000000000000000FFFFFFFFFFFFFFFF00000000000000
        0011B5DAD2BBD6AACAB6B5E320C3B6BED9B7A81F0000000000000000000000FF
        FFFFFFFFFFFFFF000000000100000006B5DACBC4BDDA2A000000000000000000
        0000FFFFFFFFFFFFFFFF000000000000000011B5DAD2BBD6AACAB6B5E320B5DD
        B9E9B7A8}
    end
    object BitBtn2: TBitBtn
      Left = 480
      Top = 424
      Width = 75
      Height = 25
      Caption = #30830#23450
      TabOrder = 4
      OnClick = BitBtn2Click
      Kind = bkOK
    end
    object BitBtn3: TBitBtn
      Left = 576
      Top = 424
      Width = 75
      Height = 25
      Caption = #21462#28040
      TabOrder = 5
      OnClick = BitBtn3Click
      Kind = bkCancel
    end
  end
  object PageControl2: TPageControl
    Left = 184
    Top = 0
    Width = 593
    Height = 417
    ActivePage = TabSheet4
    TabOrder = 0
    object TabSheet4: TTabSheet
      Caption = '  '#31243#24207#38405#35835#39064#25805#20316'  '
      OnShow = TabSheet4Show
      object Label1: TLabel
        Left = 16
        Top = 16
        Width = 63
        Height = 13
        Caption = #31243#24207#20195#30721'     '
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clRed
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
      end
      object Label2: TLabel
        Left = 440
        Top = 16
        Width = 39
        Height = 13
        Caption = #32534#21495'     '
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clRed
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
      end
      object Label8: TLabel
        Left = 296
        Top = 355
        Width = 66
        Height = 13
        Caption = #21442#32771#20998#25968'      '
      end
      object Label9: TLabel
        Left = 456
        Top = 355
        Width = 36
        Height = 13
        Caption = #38590#24230'    '
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clRed
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
      end
      object DBMemo1: TDBMemo
        Left = 16
        Top = 32
        Width = 265
        Height = 329
        DataField = 'tigan'
        DataSource = DataModule4.DataSource_readpro
        ScrollBars = ssBoth
        TabOrder = 0
      end
      object DBEdit1: TDBEdit
        Left = 488
        Top = 8
        Width = 89
        Height = 21
        DataField = 'tno'
        DataSource = DataModule4.DataSource_readpro
        Enabled = False
        TabOrder = 1
        OnChange = DBEdit1Change
      end
      object PageControl1: TPageControl
        Left = 288
        Top = 32
        Width = 289
        Height = 313
        ActivePage = TabSheet1
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        MultiLine = True
        ParentFont = False
        TabOrder = 2
        object TabSheet1: TTabSheet
          Caption = ' '#20998#39064#24178'1 '
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
          object Label3: TLabel
            Left = 8
            Top = 0
            Width = 63
            Height = 13
            Caption = #39064#24178#20869#23481'     '
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clRed
            Font.Height = -11
            Font.Name = 'MS Sans Serif'
            Font.Style = []
            ParentFont = False
          end
          object Label4: TLabel
            Left = 16
            Top = 156
            Width = 43
            Height = 13
            Caption = #36873#39033'A    '
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clRed
            Font.Height = -11
            Font.Name = 'MS Sans Serif'
            Font.Style = []
            ParentFont = False
          end
          object Label5: TLabel
            Left = 16
            Top = 180
            Width = 43
            Height = 13
            Caption = #36873#39033'B    '
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clRed
            Font.Height = -11
            Font.Name = 'MS Sans Serif'
            Font.Style = []
            ParentFont = False
          end
          object Label6: TLabel
            Left = 16
            Top = 204
            Width = 43
            Height = 13
            Caption = #36873#39033'C    '
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clRed
            Font.Height = -11
            Font.Name = 'MS Sans Serif'
            Font.Style = []
            ParentFont = False
          end
          object Label7: TLabel
            Left = 16
            Top = 228
            Width = 44
            Height = 13
            Caption = #36873#39033'D    '
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clRed
            Font.Height = -11
            Font.Name = 'MS Sans Serif'
            Font.Style = []
            ParentFont = False
          end
          object DBMemo2: TDBMemo
            Left = 8
            Top = 16
            Width = 265
            Height = 129
            DataField = 'ctigan1'
            DataSource = DataModule4.DataSource_readpro
            ScrollBars = ssBoth
            TabOrder = 0
          end
          object DBEdit2: TDBEdit
            Left = 64
            Top = 152
            Width = 209
            Height = 21
            DataField = 'x1a'
            DataSource = DataModule4.DataSource_readpro
            TabOrder = 1
          end
          object DBEdit3: TDBEdit
            Left = 64
            Top = 176
            Width = 209
            Height = 21
            DataField = 'x1b'
            DataSource = DataModule4.DataSource_readpro
            TabOrder = 2
          end
          object DBEdit4: TDBEdit
            Left = 64
            Top = 200
            Width = 209
            Height = 21
            DataField = 'x1c'
            DataSource = DataModule4.DataSource_readpro
            TabOrder = 3
          end
          object DBEdit5: TDBEdit
            Left = 64
            Top = 224
            Width = 209
            Height = 21
            DataField = 'x1d'
            DataSource = DataModule4.DataSource_readpro
            TabOrder = 4
          end
          object DBRadioGroup1: TDBRadioGroup
            Left = 13
            Top = 248
            Width = 260
            Height = 33
            Caption = #21442#32771#31572#26696
            Columns = 4
            DataField = 'answer1'
            DataSource = DataModule4.DataSource_readpro
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clRed
            Font.Height = -11
            Font.Name = 'MS Sans Serif'
            Font.Style = []
            Items.Strings = (
              'A'
              'B'
              'C'
              'D')
            ParentFont = False
            TabOrder = 5
          end
        end
        object TabSheet2: TTabSheet
          Caption = ' '#20998#39064#24178'2 '
          ImageIndex = 1
          object Label10: TLabel
            Left = 8
            Top = 0
            Width = 63
            Height = 13
            Caption = #39064#24178#20869#23481'     '
          end
          object Label11: TLabel
            Left = 16
            Top = 228
            Width = 44
            Height = 13
            Caption = #36873#39033'D    '
          end
          object Label12: TLabel
            Left = 16
            Top = 204
            Width = 43
            Height = 13
            Caption = #36873#39033'C    '
          end
          object Label13: TLabel
            Left = 16
            Top = 180
            Width = 43
            Height = 13
            Caption = #36873#39033'B    '
          end
          object Label14: TLabel
            Left = 16
            Top = 156
            Width = 43
            Height = 13
            Caption = #36873#39033'A    '
          end
          object DBMemo3: TDBMemo
            Left = 8
            Top = 16
            Width = 321
            Height = 129
            DataField = 'ctigan2'
            DataSource = DataModule4.DataSource_readpro
            ScrollBars = ssBoth
            TabOrder = 0
          end
          object DBEdit8: TDBEdit
            Left = 64
            Top = 152
            Width = 265
            Height = 21
            DataField = 'x2a'
            DataSource = DataModule4.DataSource_readpro
            TabOrder = 1
          end
          object DBEdit9: TDBEdit
            Left = 64
            Top = 176
            Width = 265
            Height = 21
            DataField = 'x2b'
            DataSource = DataModule4.DataSource_readpro
            TabOrder = 2
          end
          object DBEdit10: TDBEdit
            Left = 64
            Top = 200
            Width = 265
            Height = 21
            DataField = 'x2c'
            DataSource = DataModule4.DataSource_readpro
            TabOrder = 3
          end
          object DBEdit11: TDBEdit
            Left = 64
            Top = 224
            Width = 265
            Height = 21
            DataField = 'x2d'
            DataSource = DataModule4.DataSource_readpro
            TabOrder = 4
          end
          object DBRadioGroup2: TDBRadioGroup
            Left = 13
            Top = 248
            Width = 316
            Height = 33
            Caption = #21442#32771#31572#26696
            Columns = 4
            DataField = 'answer2'
            DataSource = DataModule4.DataSource_readpro
            Items.Strings = (
              'A'
              'B'
              'C'
              'D')
            TabOrder = 5
          end
        end
        object TabSheet3: TTabSheet
          Caption = ' '#20998#39064#24178'3 '
          ImageIndex = 2
          object Label15: TLabel
            Left = 8
            Top = 0
            Width = 63
            Height = 13
            Caption = #39064#24178#20869#23481'     '
          end
          object Label16: TLabel
            Left = 16
            Top = 228
            Width = 44
            Height = 13
            Caption = #36873#39033'D    '
          end
          object Label17: TLabel
            Left = 16
            Top = 204
            Width = 43
            Height = 13
            Caption = #36873#39033'C    '
          end
          object Label18: TLabel
            Left = 16
            Top = 180
            Width = 43
            Height = 13
            Caption = #36873#39033'B    '
          end
          object Label19: TLabel
            Left = 16
            Top = 156
            Width = 43
            Height = 13
            Caption = #36873#39033'A    '
          end
          object DBMemo4: TDBMemo
            Left = 8
            Top = 16
            Width = 321
            Height = 129
            DataField = 'ctigan3'
            DataSource = DataModule4.DataSource_readpro
            ScrollBars = ssBoth
            TabOrder = 0
          end
          object DBEdit12: TDBEdit
            Left = 64
            Top = 152
            Width = 265
            Height = 21
            DataField = 'x3a'
            DataSource = DataModule4.DataSource_readpro
            TabOrder = 1
          end
          object DBEdit13: TDBEdit
            Left = 64
            Top = 176
            Width = 265
            Height = 21
            DataField = 'x3b'
            DataSource = DataModule4.DataSource_readpro
            TabOrder = 2
          end
          object DBEdit14: TDBEdit
            Left = 64
            Top = 200
            Width = 265
            Height = 21
            DataField = 'x3c'
            DataSource = DataModule4.DataSource_readpro
            TabOrder = 3
          end
          object DBEdit15: TDBEdit
            Left = 64
            Top = 224
            Width = 265
            Height = 21
            DataField = 'x3d'
            DataSource = DataModule4.DataSource_readpro
            TabOrder = 4
          end
          object DBRadioGroup3: TDBRadioGroup
            Left = 13
            Top = 248
            Width = 316
            Height = 33
            Caption = #21442#32771#31572#26696
            Columns = 4
            DataField = 'answer3'
            DataSource = DataModule4.DataSource_readpro
            Items.Strings = (
              'A'
              'B'
              'C'
              'D')
            TabOrder = 5
          end
        end
      end
      object DBEdit6: TDBEdit
        Left = 360
        Top = 352
        Width = 65
        Height = 21
        DataField = 'score'
        DataSource = DataModule4.DataSource_readpro
        TabOrder = 3
      end
      object DBComboBox1: TDBComboBox
        Left = 488
        Top = 352
        Width = 65
        Height = 21
        DataField = 'difficulty'
        DataSource = DataModule4.DataSource_readpro
        ItemHeight = 13
        Items.Strings = (
          '1'
          '2'
          '3'
          '4'
          '5')
        TabOrder = 4
      end
    end
    object TabSheet5: TTabSheet
      Caption = '  '#31243#24207#38405#35835#39064#24635#35272'  '
      ImageIndex = 1
      OnShow = TabSheet5Show
      object Label20: TLabel
        Left = 176
        Top = 8
        Width = 275
        Height = 24
        Caption = #31243'  '#24207'  '#38405'  '#35835'  '#39064'  '#24635'  '#35272'  '#34920'         '
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -20
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        Transparent = True
      end
      object Label21: TLabel
        Left = 24
        Top = 40
        Width = 48
        Height = 13
        Caption = #39064'    '#30446':   '
        Transparent = True
      end
      object Label22: TLabel
        Left = 208
        Top = 40
        Width = 42
        Height = 13
        Caption = #20998#39064#24178'1'
        Transparent = True
      end
      object Label23: TLabel
        Left = 328
        Top = 40
        Width = 42
        Height = 13
        Caption = #20998#39064#24178'2'
        Transparent = True
      end
      object Label24: TLabel
        Left = 448
        Top = 40
        Width = 42
        Height = 13
        Caption = #20998#39064#24178'3'
        Transparent = True
      end
      object DBGrid1: TDBGrid
        Left = 24
        Top = 208
        Width = 537
        Height = 169
        DataSource = DataModule4.DataSource_readpro
        TabOrder = 0
        TitleFont.Charset = DEFAULT_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -11
        TitleFont.Name = 'MS Sans Serif'
        TitleFont.Style = []
        Columns = <
          item
            Expanded = False
            FieldName = 'tno'
            Title.Caption = '  '#39064#21495
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'x1a'
            Title.Caption = '  '#39064#24178'1'#36873#39033'A'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'x1b'
            Title.Caption = '  '#39064#24178'1'#36873#39033'B'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'x1c'
            Title.Caption = '  '#39064#24178'1'#36873#39033'C'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'x1d'
            Title.Caption = '  '#39064#24178'1'#36873#39033'D'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'answer1'
            Title.Caption = '  '#39064#24178'1'#31572#26696
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'x2a'
            Title.Caption = '  '#39064#24178'2'#36873#39033'A'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'x2b'
            Title.Caption = '  '#39064#24178'2'#36873#39033'B'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'x2c'
            Title.Caption = '  '#39064#24178'2'#36873#39033'C'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'x2d'
            Title.Caption = '  '#39064#24178'2'#36873#39033'D'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'answer2'
            Title.Caption = '  '#39064#24178'2'#31572#26696
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'x3a'
            Title.Caption = '  '#39064#24178'3'#36873#39033'A'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'x3b'
            Title.Caption = '  '#39064#24178'3'#36873#39033'B'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'x3c'
            Title.Caption = '  '#39064#24178'3'#36873#39033'C'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'x3d'
            Title.Caption = '  '#39064#24178'3'#36873#39033'D'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'answer3'
            Title.Caption = '  '#39064#24178'3'#31572#26696
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'score'
            Title.Caption = '  '#21442#32771#20998#25968
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'difficulty'
            Title.Caption = '  '#38590#26131#24230
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'note'
            Title.Caption = '  '#22791#27880
            Visible = True
          end>
      end
      object DBMemo5: TDBMemo
        Left = 24
        Top = 56
        Width = 169
        Height = 145
        DataField = 'tigan'
        DataSource = DataModule4.DataSource_readpro
        ScrollBars = ssBoth
        TabOrder = 1
      end
      object DBMemo6: TDBMemo
        Left = 208
        Top = 56
        Width = 105
        Height = 145
        DataField = 'ctigan1'
        DataSource = DataModule4.DataSource_readpro
        ScrollBars = ssBoth
        TabOrder = 2
      end
      object DBMemo7: TDBMemo
        Left = 328
        Top = 56
        Width = 105
        Height = 145
        DataField = 'ctigan2'
        DataSource = DataModule4.DataSource_readpro
        ScrollBars = ssBoth
        TabOrder = 3
      end
      object DBMemo8: TDBMemo
        Left = 448
        Top = 56
        Width = 105
        Height = 145
        DataField = 'ctigan3'
        DataSource = DataModule4.DataSource_readpro
        ScrollBars = ssBoth
        TabOrder = 4
      end
    end
  end
  object Query1: TQuery
    Active = True
    DatabaseName = 'abao'
    SQL.Strings = (
      'select * from ti_readpro where tno=0000')
    Left = 284
    Top = 8
  end
  object DataSource1: TDataSource
    DataSet = Query1
    Left = 196
    Top = 16
  end
  object Query2: TQuery
    Active = True
    DatabaseName = 'abao'
    SQL.Strings = (
      'select * from ti_readpro')
    Left = 332
    Top = 8
  end
end

						