unit1.dfm

毕业论文

object Form1: TForm1
  Left = 180
  Top = -13
  Width = 605
  Height = 456
  Caption = 'Form1'
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clNavy
  Font.Height = -32
  Font.Name = #26999#20307'_GB2312'
  Font.Style = [fsBold]
  OldCreateOrder = False
  PixelsPerInch = 96
  TextHeight = 32
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 593
    Height = 41
    Caption = 'C'#35821#35328#32771#35797#27169#25311#32451#20064#31995#32479
    Font.Charset = GB2312_CHARSET
    Font.Color = clNavy
    Font.Height = -32
    Font.Name = #26999#20307'_GB2312'
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 0
  end
  object PageControl1: TPageControl
    Left = 0
    Top = 41
    Width = 593
    Height = 384
    ActivePage = C_TabSheet
    Font.Charset = GB2312_CHARSET
    Font.Color = clNavy
    Font.Height = -13
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
    TabHeight = 33
    TabOrder = 1
    TabPosition = tpBottom
    TabWidth = 115
    object Login_Exit: TTabSheet
      Caption = #30331#24405'/'#36864#20986
      OnShow = Login_ExitShow
      object Label1: TLabel
        Left = 48
        Top = 8
        Width = 68
        Height = 16
        Caption = #32771#29983#39035#30693
        Font.Charset = GB2312_CHARSET
        Font.Color = clRed
        Font.Height = -16
        Font.Name = #23435#20307
        Font.Style = [fsBold]
        ParentFont = False
      end
      object Label2: TLabel
        Left = 320
        Top = 8
        Width = 153
        Height = 16
        Caption = #35797#39064#23436#25104#24773#20917#19968#35272#34920
        Font.Charset = GB2312_CHARSET
        Font.Color = clMaroon
        Font.Height = -16
        Font.Name = #23435#20307
        Font.Style = [fsBold]
        ParentFont = False
      end
      object TLabel
        Left = 248
        Top = 184
        Width = 51
        Height = 16
        Caption = #20934#32771#35777
        Font.Charset = GB2312_CHARSET
        Font.Color = clNavy
        Font.Height = -16
        Font.Name = #23435#20307
        Font.Style = [fsBold]
        ParentFont = False
      end
      object Label3: TLabel
        Left = 248
        Top = 224
        Width = 61
        Height = 16
        Caption = #22995'  '#21517' '
        Font.Charset = GB2312_CHARSET
        Font.Color = clNavy
        Font.Height = -16
        Font.Name = #23435#20307
        Font.Style = [fsBold]
        ParentFont = False
      end
      object Memo1: TMemo
        Left = 0
        Top = 32
        Width = 217
        Height = 273
        Color = clBackground
        Font.Charset = GB2312_CHARSET
        Font.Color = clWhite
        Font.Height = -16
        Font.Name = #23435#20307
        Font.Style = []
        Lines.Strings = (
          #32771#29983#39035#30693#20869#23481
          '1. '#36755#20837'"'#20934#32771#35777#21495'"'#21518#65292#31995#32479#20250#25552
          #31034#23545#24212#30340'"'#32771#29983#22995#21517'"'#65292#32463#30830#35748#65292
          #23601#21487#36827#20837#32771#35797#12290#22914#26524'"'#32771#29983#22995#21517'"'
          #19981#23545#65292
          #35831#20180#32454#26816#26597'"'#20934#32771#35777#21495'"'#36755#20837#26159#21542
          #27491#30830#12290
          ''
          '2.'#26412#32771#21367#30001#36873#25321#39064#12289#21028#26029#39064#12289#22635#31354#39064#12289#32534
          #31243#39064'4'#37096#20998#32452#25104#12290
          ''
          '')
        ParentFont = False
        ScrollBars = ssBoth
        TabOrder = 0
      end
      object StringGrid: TStringGrid
        Left = 264
        Top = 32
        Width = 265
        Height = 129
        Color = clGradientInactiveCaption
        ColCount = 4
        ScrollBars = ssNone
        TabOrder = 1
        RowHeights = (
          24
          24
          24
          24
          24)
      end
      object zkz: TEdit
        Left = 336
        Top = 184
        Width = 169
        Height = 21
        TabOrder = 2
        Text = '3301010001'
      end
      object ksNameEdit: TEdit
        Left = 336
        Top = 224
        Width = 169
        Height = 21
        ReadOnly = True
        TabOrder = 3
      end
      object denglu: TButton
        Left = 232
        Top = 272
        Width = 97
        Height = 41
        Caption = #30331'   '#24405
        Font.Charset = GB2312_CHARSET
        Font.Color = clNavy
        Font.Height = -16
        Font.Name = #23435#20307
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 4
        OnClick = dengluClick
      end
      object jiaojuan: TButton
        Left = 356
        Top = 272
        Width = 97
        Height = 41
        Caption = #20132'  '#21367
        Font.Charset = GB2312_CHARSET
        Font.Color = clNavy
        Font.Height = -16
        Font.Name = #23435#20307
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 5
        OnClick = jiaojuanClick
      end
      object Exit: TButton
        Left = 480
        Top = 272
        Width = 97
        Height = 41
        Caption = #36864'  '#20986
        Font.Charset = GB2312_CHARSET
        Font.Color = clNavy
        Font.Height = -16
        Font.Name = #23435#20307
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 6
        OnClick = ExitClick
      end
    end
    object C_TabSheet: TTabSheet
      Caption = #36873#25321#39064
      Font.Charset = GB2312_CHARSET
      Font.Color = clBlack
      Font.Height = -16
      Font.Name = #23435#20307
      Font.Style = []
      ImageIndex = 1
      ParentFont = False
      TabVisible = False
      OnExit = C_TabsheetExit
      object DBMemo1: TDBMemo
        Left = 0
        Top = 0
        Width = 585
        Height = 249
        DataField = #39064#30446
        DataSource = C_DataSource
        TabOrder = 0
      end
      object DBRadioGroup1: TDBRadioGroup
        Left = 8
        Top = 264
        Width = 297
        Height = 57
        Caption = #35831#36873#25321
        Columns = 4
        DataField = #31572#26696
        DataSource = C_Answer_DataSource
        Font.Charset = GB2312_CHARSET
        Font.Color = clNavy
        Font.Height = -19
        Font.Name = #23435#20307
        Font.Style = [fsBold]
        Items.Strings = (
          'A'
          'B'
          'C'
          'D')
        ParentFont = False
        TabOrder = 1
      end
      object C_DBNavigator: TDBNavigator
        Left = 320
        Top = 272
        Width = 256
        Height = 49
        DataSource = C_Answer_DataSource
        VisibleButtons = [nbFirst, nbPrior, nbNext, nbLast]
        TabOrder = 2
        OnClick = C_DBNavigatorClick
      end
    end
    object J_TabSheet: TTabSheet
      Caption = #21028#26029#39064
      ImageIndex = 2
      TabVisible = False
      OnExit = J_TabsheetExit
      object DBMemo2: TDBMemo
        Left = 0
        Top = 0
        Width = 585
        Height = 257
        DataField = #39064#30446
        DataSource = J_DataSource
        TabOrder = 0
      end
      object DBRadioGroup2: TDBRadioGroup
        Left = 8
        Top = 272
        Width = 241
        Height = 57
        Caption = #35831#21028#26029
        Columns = 2
        DataField = #31572#26696
        DataSource = J_Answer_DataSource
        Font.Charset = GB2312_CHARSET
        Font.Color = clNavy
        Font.Height = -16
        Font.Name = #23435#20307
        Font.Style = [fsBold]
        Items.Strings = (
          #23545
          #38169)
        ParentFont = False
        TabOrder = 1
      end
      object DBNavigator1: TDBNavigator
        Left = 296
        Top = 280
        Width = 280
        Height = 41
        DataSource = J_Answer_DataSource
        VisibleButtons = [nbFirst, nbPrior, nbNext, nbLast]
        TabOrder = 2
        OnClick = DBNavigator1Click
      end
    end
    object F_TabSheet: TTabSheet
      Caption = #31243#24207#38405#35835#22635#31354#39064
      ImageIndex = 3
      TabVisible = False
      OnExit = F_TabsheetExit
      object Label4: TLabel
        Left = 288