tiku.dfm.bak

一个比较好的网上考试系统

object Form7: TForm7
  Left = 210
  Top = 123
  Width = 772
  Height = 595
  Caption = #39064#24211#31649#29702
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object Label4: TLabel
    Left = 8
    Top = 88
    Width = 60
    Height = 13
    Caption = #35797#39064#20869#23481#65306
  end
  object SpeedButton1: TSpeedButton
    Left = 56
    Top = 488
    Width = 65
    Height = 22
    Caption = #22686#21152#35797#39064
  end
  object Panel1: TPanel
    Left = 8
    Top = 8
    Width = 681
    Height = 73
    BorderStyle = bsSingle
    TabOrder = 0
    object Label1: TLabel
      Left = 16
      Top = 16
      Width = 48
      Height = 13
      Caption = #31185#30446#21517#65306
    end
    object Label2: TLabel
      Left = 232
      Top = 24
      Width = 39
      Height = 13
      Caption = #20998' '#20540#65306
    end
    object Label3: TLabel
      Left = 432
      Top = 32
      Width = 39
      Height = 13
      Caption = #39064' '#22411#65306
    end
    object cb1: TComboBox
      Left = 64
      Top = 16
      Width = 145
      Height = 21
      ItemHeight = 13
      TabOrder = 0
    end
    object ComboBox2: TComboBox
      Left = 272
      Top = 24
      Width = 145
      Height = 21
      ItemHeight = 13
      ItemIndex = 0
      TabOrder = 1
      Text = '1'
      Items.Strings = (
        '1'
        '2'
        '3'
        '4'
        '5')
    end
    object Cb3: TComboBox
      Left = 480
      Top = 24
      Width = 145
      Height = 21
      ItemHeight = 13
      ItemIndex = 0
      TabOrder = 2
      Text = #21333#36873#39064
      OnClick = Cb3Click
      Items.Strings = (
        #21333#36873#39064
        #22810#36873#39064)
    end
  end
  object Panel2: TPanel
    Left = 48
    Top = 368
    Width = 641
    Height = 145
    BorderStyle = bsSingle
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 1
    object c1: TDBCheckBox
      Left = 8
      Top = 8
      Width = 49
      Height = 25
      Caption = 'A'
      DataField = 'right_a'
      DataSource = DataSource1
      TabOrder = 0
      ValueChecked = 'True'
      ValueUnchecked = 'False'
    end
    object c2: TDBCheckBox
      Left = 288
      Top = 16
      Width = 41
      Height = 17
      Caption = 'B'
      DataField = 'right_b'
      DataSource = DataSource1
      TabOrder = 1
      ValueChecked = 'True'
      ValueUnchecked = 'False'
    end
    object c3: TDBCheckBox
      Left = 8
      Top = 40
      Width = 41
      Height = 17
      Caption = 'C'
      DataField = 'right_c'
      DataSource = DataSource1
      TabOrder = 2
      ValueChecked = 'True'
      ValueUnchecked = 'False'
    end
    object c4: TDBCheckBox
      Left = 288
      Top = 40
      Width = 41
      Height = 17
      Caption = 'D'
      DataField = 'a_D'
      DataSource = DataSource1
      TabOrder = 3
      ValueChecked = 'True'
      ValueUnchecked = 'False'
    end
    object c5: TDBCheckBox
      Left = 8
      Top = 72
      Width = 41
      Height = 17
      Caption = 'E'
      DataField = 'a_E'
      DataSource = DataSource1
      TabOrder = 4
      ValueChecked = 'True'
      ValueUnchecked = 'False'
    end
    object c6: TDBCheckBox
      Left = 288
      Top = 72
      Width = 33
      Height = 17
      Caption = 'F'
      DataField = 'a_F'
      DataSource = DataSource1
      TabOrder = 5
      ValueChecked = 'True'
      ValueUnchecked = 'False'
    end
    object DBEdit1: TDBEdit
      Left = 48
      Top = 8
      Width = 121
      Height = 21
      DataField = 'a_A'
      DataSource = DataSource1
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 6
    end
    object DBEdit2: TDBEdit
      Left = 336
      Top = 8
      Width = 121
      Height = 21
      DataField = 'a_B'
      DataSource = DataSource1
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 7
    end
    object edit3: TDBEdit
      Left = 48
      Top = 40
      Width = 121
      Height = 21
      DataField = 'a_C'
      DataSource = DataSource1
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 8
    end
    object DBEdit4: TDBEdit
      Left = 336
      Top = 40
      Width = 121
      Height = 21
      DataField = 'a_D'
      DataSource = DataSource1
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 9
    end
    object DBEdit5: TDBEdit
      Left = 48
      Top = 72
      Width = 121
      Height = 21
      DataField = 'a_E'
      DataSource = DataSource1
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 10
    end
    object DBEdit6: TDBEdit
      Left = 344
      Top = 72
      Width = 121
      Height = 21
      DataField = 'a_F'
      DataSource = DataSource1
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 11
    end
    object r1: TRadioButton
      Left = 8
      Top = 8
      Width = 33
      Height = 17
      Caption = 'A'
      TabOrder = 12
    end
    object r2: TRadioButton
      Left = 288
      Top = 16
      Width = 41
      Height = 17
      Caption = 'B'
      TabOrder = 13
    end
    object R3: TRadioButton
      Left = 8
      Top = 40
      Width = 41
      Height = 17
      Caption = 'C'
      TabOrder = 14
    end
    object r4: TRadioButton
      Left = 288
      Top = 40
      Width = 41
      Height = 17
      Caption = 'D'
      TabOrder = 15
    end
    object R5: TRadioButton
      Left = 8
      Top = 72
      Width = 41
      Height = 17
      Caption = 'E'
      TabOrder = 16
    end
    object R6: TRadioButton
      Left = 288
      Top = 72
      Width = 49
      Height = 17
      Caption = 'F'
      TabOrder = 17
    end
  end
  object m1: TDBMemo
    Left = 48
    Top = 120
    Width = 553
    Height = 225
    DataField = 'Tm'
    DataSource = DataSource1
    TabOrder = 2
  end
  object q6: TADOQuery
    Active = True
    Connection = Form2.ADOConnection1
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      
        'select tm,a_A,a_B,a_C,a_D,a_E,a_F,right_A,right_b,right_c,right_' +
        'D,right_e,right_F from timu')
    Left = 48
  end
  object DataSource1: TDataSource
    DataSet = q6
    Left = 16
    Top = 8
  end
  object q7: TADOQuery
    Connection = Form2.ADOConnection1
    Parameters = <>
    Left = 128
  end
end