bjst_p.dfm

考试系统,是一个简单的但是很经典的

object f_bjst: Tf_bjst
  Left = -2
  Top = 108
  BorderStyle = bsSingle
  Caption = #32534#36753#35797#39064
  ClientHeight = 579
  ClientWidth = 1021
  Color = clBtnFace
  Font.Charset = ANSI_CHARSET
  Font.Color = clWindowText
  Font.Height = -14
  Font.Name = #23435#20307
  Font.Style = []
  OldCreateOrder = False
  Position = poMainFormCenter
  OnDestroy = FormDestroy
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 14
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 1021
    Height = 36
    Align = alTop
    BevelInner = bvRaised
    BevelOuter = bvLowered
    TabOrder = 0
    object bt1: TSpeedButton
      Left = 4
      Top = 4
      Width = 69
      Height = 28
      Caption = #28155' '#21152
      Flat = True
      OnClick = bt1Click
    end
    object bt2: TSpeedButton
      Left = 75
      Top = 4
      Width = 69
      Height = 28
      Caption = #20462' '#25913
      Flat = True
      OnClick = bt2Click
    end
    object bt4: TSpeedButton
      Left = 217
      Top = 4
      Width = 69
      Height = 28
      Caption = #23384' '#30424
      Flat = True
      OnClick = bt4Click
    end
    object bt3: TSpeedButton
      Left = 146
      Top = 4
      Width = 69
      Height = 28
      Caption = #21024' '#38500
      Flat = True
      OnClick = bt3Click
    end
    object bt6: TSpeedButton
      Left = 359
      Top = 4
      Width = 69
      Height = 28
      Caption = #36864' '#20986
      Flat = True
      OnClick = bt6Click
    end
    object bt5: TSpeedButton
      Left = 288
      Top = 4
      Width = 69
      Height = 28
      Caption = #21462' '#28040
      Flat = True
      OnClick = bt5Click
    end
    object Label7: TLabel
      Left = 712
      Top = 11
      Width = 7
      Height = 14
    end
    object dbng: TDBNavigator
      Left = 444
      Top = 5
      Width = 224
      Height = 25
      DataSource = DataSource1
      VisibleButtons = [nbFirst, nbPrior, nbNext, nbLast]
      Flat = True
      Ctl3D = True
      ParentCtl3D = False
      TabOrder = 0
    end
  end
  object Panel2: TPanel
    Left = 0
    Top = 36
    Width = 1021
    Height = 237
    Align = alTop
    BevelInner = bvRaised
    BevelOuter = bvLowered
    TabOrder = 1
    object Label1: TLabel
      Left = 496
      Top = 104
      Width = 77
      Height = 14
      Caption = #31572#26696'A'#24471#20998#65306
    end
    object Label2: TLabel
      Left = 496
      Top = 136
      Width = 77
      Height = 14
      Caption = #31572#26696'B'#24471#20998#65306
    end
    object Label3: TLabel
      Left = 496
      Top = 168
      Width = 77
      Height = 14
      Caption = #31572#26696'C'#24471#20998#65306
    end
    object Label4: TLabel
      Left = 496
      Top = 200
      Width = 77
      Height = 14
      Caption = #31572#26696'D'#24471#20998#65306
    end
    object Label5: TLabel
      Left = 456
      Top = 16
      Width = 70
      Height = 14
      Caption = #35797#39064#38590#24230#65306
    end
    object Label6: TLabel
      Left = 456
      Top = 72
      Width = 70
      Height = 14
      Caption = #20998#20540#35774#32622#65306
    end
    object df1: TSpinEdit
      Left = 584
      Top = 100
      Width = 73
      Height = 23
      Ctl3D = False
      MaxValue = 0
      MinValue = 0
      ParentCtl3D = False
      TabOrder = 0
      Value = 0
    end
    object df2: TSpinEdit
      Left = 584
      Top = 132
      Width = 73
      Height = 23
      Ctl3D = False
      MaxValue = 0
      MinValue = 0
      ParentCtl3D = False
      TabOrder = 1
      Value = 0
    end
    object df3: TSpinEdit
      Left = 584
      Top = 164
      Width = 73
      Height = 23
      Ctl3D = False
      MaxValue = 0
      MinValue = 0
      ParentCtl3D = False
      TabOrder = 2
      Value = 0
    end
    object df4: TSpinEdit
      Left = 584
      Top = 196
      Width = 73
      Height = 23
      Ctl3D = False
      MaxValue = 0
      MinValue = 0
      ParentCtl3D = False
      TabOrder = 3
      Value = 0
    end
    object chk1: TRadioButton
      Left = 528
      Top = 40
      Width = 33
      Height = 17
      Caption = #38590
      TabOrder = 4
    end
    object chk2: TRadioButton
      Left = 576
      Top = 40
      Width = 33
      Height = 17
      Caption = #20013
      Checked = True
      TabOrder = 5
      TabStop = True
    end
    object chk3: TRadioButton
      Left = 624
      Top = 40
      Width = 33
      Height = 17
      Caption = #26131
      TabOrder = 6
    end
    object tv: Thwkdbtree
      Left = 2
      Top = 2
      Width = 431
      Height = 233
      Align = alLeft
      BorderStyle = bsNone
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      Indent = 19
      TabOrder = 7
      OnClick = tvClick
      Active = False
      AutoClear = False
      KeyNum = 2
      DataSet = cds
    end
  end
  object rve: TRichViewEdit
    Left = 0
    Top = 273
    Width = 1021
    Height = 306
    ReadOnly = False
    Align = alClient
    TabOrder = 2
    DoInPaletteMode = rvpaCreateCopiesEx
    Options = [rvoAllowSelection, rvoScrollToEnd, rvoShowPageBreaks, rvoAutoCopyText, rvoAutoCopyUnicodeText, rvoAutoCopyRVF, rvoAutoCopyImage, rvoAutoCopyRTF, rvoFormatInvalidate, rvoDblClickSelectsWord, rvoRClickDeselects]
    RTFReadProperties.UnicodeMode = rvruOnlyUnicode
    RTFReadProperties.TextStyleMode = rvrsAddIfNeeded
    RTFReadProperties.ParaStyleMode = rvrsAddIfNeeded
    RVFOptions = [rvfoSavePicturesBody, rvfoSaveControlsBody, rvfoSaveBinary, rvfoSaveBack, rvfoLoadBack, rvfoSaveTextStyles, rvfoSaveParaStyles, rvfoSaveLayout, rvfoLoadLayout, rvfoSaveDocProperties, rvfoLoadDocProperties]
    Style = f_main.RVStyle1
  end
  object cds: TClientDataSet
    Aggregates = <>
    Params = <>
    AfterOpen = cdsAfterOpen
    AfterScroll = cdsAfterScroll
    Left = 280
    Top = 296
  end
  object DataSource1: TDataSource
    DataSet = cds
    Left = 328
    Top = 296
  end
  object cds1: TClientDataSet
    Aggregates = <>
    Params = <>
    Left = 280
    Top = 344
  end
end