insertoptioncourse.dfm

中学考试管理系统 采用智能管理 具有统计分析的能力

object Form16: TForm16
  Left = 243
  Top = 180
  Width = 605
  Height = 446
  Caption = 'Form16'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object GroupBox1: TGroupBox
    Left = 16
    Top = 8
    Width = 569
    Height = 145
    Caption = #36873#35838#36755#20837
    Color = clSkyBlue
    ParentColor = False
    TabOrder = 0
    object Label1: TLabel
      Left = 24
      Top = 24
      Width = 36
      Height = 13
      Caption = #23398#21495#65306
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clRed
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object Label2: TLabel
      Left = 16
      Top = 57
      Width = 49
      Height = 16
      AutoSize = False
      Caption = #35838#31243#21495#65306
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clRed
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object Label4: TLabel
      Left = 24
      Top = 88
      Width = 36
      Height = 13
      Caption = #20998#25968#65306
    end
    object Label3: TLabel
      Left = 240
      Top = 56
      Width = 48
      Height = 13
      Caption = #35838#31243#21517#65306
    end
    object Label5: TLabel
      Left = 224
      Top = 24
      Width = 60
      Height = 13
      Caption = #25805#20316#36873#25321#65306
    end
    object Label6: TLabel
      Left = 232
      Top = 88
      Width = 168
      Height = 13
      Caption = #20854#20013#32418#33394#37096#20998#20026#24517#39035#22635#20889#30340#23383#27573
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clRed
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object numEd: TEdit
      Left = 72
      Top = 16
      Width = 137
      Height = 21
      TabOrder = 0
    end
    object markEd: TEdit
      Left = 72
      Top = 80
      Width = 137
      Height = 21
      TabOrder = 1
    end
    object cNumCB: TComboBox
      Left = 72
      Top = 48
      Width = 137
      Height = 21
      ItemHeight = 13
      TabOrder = 2
      Text = '1'
      OnChange = cNumCBChange
    end
    object Button1: TButton
      Left = 104
      Top = 112
      Width = 57
      Height = 25
      Caption = #30830#23450
      TabOrder = 3
      OnClick = Button1Click
    end
    object Button4: TButton
      Left = 256
      Top = 112
      Width = 57
      Height = 25
      Caption = #21462#28040
      TabOrder = 4
      OnClick = Button4Click
    end
    object cNameCB: TComboBox
      Left = 304
      Top = 48
      Width = 145
      Height = 21
      ItemHeight = 13
      TabOrder = 5
      Text = #38899#20048
    end
    object cond: TComboBox
      Left = 304
      Top = 16
      Width = 145
      Height = 21
      ItemHeight = 13
      TabOrder = 6
      Text = #25554#20837#36873#35838#26032#35760#24405
      OnChange = condChange
      Items.Strings = (
        #25554#20837#36873#35838#26032#35760#24405
        #20165#36755#20837#36873#35838#25104#32489)
    end
  end
  object Panel1: TPanel
    Left = 16
    Top = 160
    Width = 257
    Height = 201
    BevelOuter = bvLowered
    Color = clSkyBlue
    TabOrder = 1
    object DBGrid2: TDBGrid
      Left = 8
      Top = 16
      Width = 233
      Height = 129
      DataSource = DataSource1
      ReadOnly = True
      TabOrder = 0
      TitleFont.Charset = DEFAULT_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -11
      TitleFont.Name = 'MS Sans Serif'
      TitleFont.Style = []
    end
    object DBNavigator1: TDBNavigator
      Left = 8
      Top = 152
      Width = 216
      Height = 25
      DataSource = DataSource1
      VisibleButtons = [nbFirst, nbPrior, nbNext, nbLast, nbDelete, nbCancel]
      TabOrder = 1
    end
  end
  object Panel2: TPanel
    Left = 280
    Top = 160
    Width = 305
    Height = 201
    BevelOuter = bvLowered
    Color = clSkyBlue
    TabOrder = 2
    object DBGrid1: TDBGrid
      Left = 8
      Top = 16
      Width = 289
      Height = 121
      DataSource = DataSource2
      ReadOnly = True
      TabOrder = 0
      TitleFont.Charset = DEFAULT_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -11
      TitleFont.Name = 'MS Sans Serif'
      TitleFont.Style = []
    end
    object DBNavigator2: TDBNavigator
      Left = 16
      Top = 152
      Width = 160
      Height = 25
      DataSource = DataSource2
      VisibleButtons = [nbFirst, nbPrior, nbNext, nbLast]
      TabOrder = 1
    end
  end
  object Button3: TButton
    Left = 200
    Top = 376
    Width = 57
    Height = 25
    Caption = #36864#20986
    TabOrder = 3
    OnClick = Button3Click
  end
  object Button2: TButton
    Left = 304
    Top = 376
    Width = 57
    Height = 25
    Caption = #36820#22238
    TabOrder = 4
    OnClick = Button2Click
  end
  object ADOConnection1: TADOConnection
    Connected = True
    ConnectionString = 
      'Provider=Microsoft.Jet.OLEDB.4.0;User ID=Admin;Data Source=kaoSh' +
      'i.mdb;Mode=Share Deny None;Extended Properties="";Persist Securi' +
      'ty Info=False;Jet OLEDB:System database="";Jet OLEDB:Registry Pa' +
      'th="";Jet OLEDB:Database Password="";Jet OLEDB:Engine Type=5;Jet' +
      ' OLEDB:Database Locking Mode=1;Jet OLEDB:Global Partial Bulk Ops' +
      '=2;Jet OLEDB:Global Bulk Transactions=1;Jet OLEDB:New Database P' +
      'assword="";Jet OLEDB:Create System Database=False;Jet OLEDB:Encr' +
      'ypt Database=False;Jet OLEDB:Don'#39't Copy Locale on Compact=False;' +
      'Jet OLEDB:Compact Without Replica Repair=False;Jet OLEDB:SFP=Fal' +
      'se'
    LoginPrompt = False
    Mode = cmShareDenyNone
    Provider = 'Microsoft.Jet.OLEDB.4.0'
    Top = 8
  end
  object courseQry: TADOQuery
    Connection = ADOConnection1
    Parameters = <>
    Top = 40
  end
  object optionTb: TADOTable
    Active = True
    Connection = ADOConnection1
    CursorType = ctStatic
    TableName = 'option_course'
    Left = 512
    Top = 264
  end
  object DataSource1: TDataSource
    DataSet = scTb
    Left = 72
    Top = 280
  end
  object DataSource2: TDataSource
    DataSet = optionTb
    Left = 480
    Top = 264
  end
  object scTb: TADOTable
    Active = True
    Connection = ADOConnection1
    CursorType = ctStatic
    TableName = 'sc'
    Left = 112
    Top = 280
  end
  object insertQry: TADOQuery
    Connection = ADOConnection1
    Parameters = <>
    Left = 40
    Top = 280
  end
end