tjjs.dfm

某计算机学院的毕业设计及论文

object frJS: TfrJS
  Left = 243
  Top = -14
  Width = 547
  Height = 511
  Caption = #28155#21152#23398#21306#22522#30784#20449#24687
  Color = clBtnFace
  Font.Charset = ANSI_CHARSET
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = #23435#20307
  Font.Style = []
  OldCreateOrder = False
  Position = poDesktopCenter
  OnClose = FormClose
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object GroupBox1: TGroupBox
    Left = 8
    Top = 16
    Width = 524
    Height = 257
    Caption = ' *'#22522#30784#20449#24687'* '
    Color = clBtnFace
    ParentColor = False
    TabOrder = 0
    object Label2: TLabel
      Left = 16
      Top = 25
      Width = 39
      Height = 13
      Caption = #23398#21306#65306
    end
    object Label3: TLabel
      Left = 164
      Top = 25
      Width = 26
      Height = 13
      Caption = #27004#65306
    end
    object Label6: TLabel
      Left = 368
      Top = 25
      Width = 39
      Height = 13
      Caption = #27004#23618#65306
    end
    object DBGrid1: TDBGrid
      Left = 16
      Top = 44
      Width = 137
      Height = 129
      DataSource = DataSource1
      Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit, dgMultiSelect]
      TabOrder = 0
      TitleFont.Charset = ANSI_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -13
      TitleFont.Name = #23435#20307
      TitleFont.Style = []
      OnEnter = DBGrid1Enter
    end
    object DBGrid2: TDBGrid
      Left = 164
      Top = 44
      Width = 189
      Height = 129
      DataSource = DataSource2
      Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit, dgMultiSelect]
      TabOrder = 1
      TitleFont.Charset = ANSI_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -13
      TitleFont.Name = #23435#20307
      TitleFont.Style = []
      OnEnter = DBGrid1Enter
    end
    object DBGrid3: TDBGrid
      Left = 368
      Top = 44
      Width = 137
      Height = 129
      DataSource = DataSource3
      Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit, dgMultiSelect]
      TabOrder = 2
      TitleFont.Charset = ANSI_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -13
      TitleFont.Name = #23435#20307
      TitleFont.Style = []
      OnEnter = DBGrid1Enter
    end
    object DBEdit2: TDBEdit
      Left = 16
      Top = 184
      Width = 137
      Height = 21
      DataField = 'Name'
      DataSource = DataSource1
      TabOrder = 3
      OnEnter = DBEdit2Enter
    end
    object DBEdit3: TDBEdit
      Left = 165
      Top = 184
      Width = 189
      Height = 21
      DataField = 'Name'
      DataSource = DataSource2
      TabOrder = 4
      OnEnter = DBEdit2Enter
    end
    object DBEdit4: TDBEdit
      Left = 368
      Top = 184
      Width = 137
      Height = 21
      DataField = 'Name'
      DataSource = DataSource3
      TabOrder = 5
      OnEnter = DBEdit2Enter
    end
    object DBNavigator1: TDBNavigator
      Left = 16
      Top = 214
      Width = 490
      Height = 28
      DataSource = DataSource1
      Hints.Strings = (
        #39318#35760#24405
        #19978#19968#35760#24405
        #19979#19968#35760#24405
        #26411#35760#24405
        #25554#20837#35760#24405
        #21024#38500#35760#24405
        #32534#36753#35760#24405
        #20445#23384
        #21462#28040
        #21047#26032)
      ParentShowHint = False
      ShowHint = True
      TabOrder = 6
    end
  end
  object GroupBox2: TGroupBox
    Left = 8
    Top = 280
    Width = 521
    Height = 193
    Caption = ' * '#25945#23460' * '
    TabOrder = 1
    object Label8: TLabel
      Left = 416
      Top = 16
      Width = 65
      Height = 13
      Caption = #25945#23460#32534#21495#65306
    end
    object Label9: TLabel
      Left = 416
      Top = 56
      Width = 65
      Height = 13
      Caption = #25945#23460#21517#31216#65306
    end
    object edjsbh: TEdit
      Left = 416
      Top = 32
      Width = 89
      Height = 21
      MaxLength = 6
      TabOrder = 0
    end
    object edjsmc: TEdit
      Left = 416
      Top = 72
      Width = 97
      Height = 21
      MaxLength = 20
      TabOrder = 1
    end
    object Button3: TButton
      Left = 440
      Top = 128
      Width = 75
      Height = 25
      Caption = '<<--'#28155#21152
      TabOrder = 2
      OnClick = Button3Click
    end
    object DBGrid4: TDBGrid
      Left = 12
      Top = 20
      Width = 381
      Height = 133
      DataSource = dsJS
      Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
      ReadOnly = True
      TabOrder = 3
      TitleFont.Charset = ANSI_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -13
      TitleFont.Name = #23435#20307
      TitleFont.Style = []
      OnEnter = DBGrid1Enter
    end
    object DBNavigator2: TDBNavigator
      Left = 13
      Top = 164
      Width = 378
      Height = 23
      DataSource = dsJS
      VisibleButtons = [nbFirst, nbPrior, nbNext, nbLast, nbDelete, nbEdit, nbPost, nbCancel, nbRefresh]
      TabOrder = 4
    end
    object CheckBox1: TCheckBox
      Left = 416
      Top = 104
      Width = 97
      Height = 17
      Alignment = taLeftJustify
      Caption = #26159#21542#22810#23186#20307
      TabOrder = 5
    end
    object Button1: TButton
      Left = 440
      Top = 160
      Width = 75
      Height = 25
      Caption = #36864#20986
      TabOrder = 6
      OnClick = Button1Click
    end
  end
  object XQ: TADOTable
    ConnectionString = 
      'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=.\'#25945#23460#31649#29702'.mdb;Persist ' +
      'Security Info=False;User ID=Admin;Password=""'
    CursorType = ctStatic
    IndexName = 'ID'
    TableName = #23398#21306
    Left = 29
    Top = 64
    object XQID: TAutoIncField
      FieldName = 'ID'
      ReadOnly = True
      Visible = False
    end
    object XQName: TWideStringField
      DisplayLabel = #23398#21306#21517
      DisplayWidth = 10
      FieldName = 'Name'
      Size = 30
    end
  end
  object LH: TADOTable
    ConnectionString = 
      'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=.\'#25945#23460#31649#29702'.mdb;Persist ' +
      'Security Info=False;User ID=Admin;Password=""'
    CursorType = ctStatic
    AfterPost = LHAfterPost
    IndexFieldNames = 'XQID'
    MasterFields = 'ID'
    MasterSource = DataSource1
    TableName = #27004
    Left = 176
    Top = 64
    object LHXQID: TIntegerField
      FieldName = 'XQID'
      Visible = False
    end
    object LHID: TAutoIncField
      FieldName = 'ID'
      ReadOnly = True
      Visible = False
    end
    object LHLBH: TWideStringField
      DisplayLabel = #32534#21495
      FieldName = 'LBH'
      Size = 6
    end
    object LHName: TWideStringField
      DisplayLabel = #21517#31216
      DisplayWidth = 14
      FieldName = 'Name'
      Size = 30
    end
  end
  object LC: TADOTable
    ConnectionString = 
      'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=.\'#25945#23460#31649#29702'.mdb;Persist ' +
      'Security Info=False;User ID=Admin;Password=""'
    CursorType = ctStatic
    IndexName = 'ID'
    TableName = #23618
    Left = 384
    Top = 64
    object LCID: TWideStringField
      DisplayLabel = #32534#21495
      FieldName = 'ID'
      Size = 2
    end
    object LCName: TWideStringField
      DisplayLabel = #21517#31216
      DisplayWidth = 8
      FieldName = 'Name'
      Size = 30
    end
  end
  object DataSource1: TDataSource
    DataSet = XQ
    Left = 61
    Top = 64
  end
  object DataSource2: TDataSource
    DataSet = LH
    Left = 208
    Top = 64
  end
  object DataSource3: TDataSource
    DataSet = LC
    Left = 416
    Top = 64
  end
  object XPManifest1: TXPManifest
    Left = 93
    Top = 64
  end
  object JS: TADOTable
    Active = True
    ConnectionString = 
      'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=.\'#25945#23460#31649#29702'.mdb;Persist ' +
      'Security Info=False;User ID=Admin;Password=""'
    CursorType = ctStatic
    TableName = #25945#23460
    Left = 232
    Top = 248
    object JSJSBH: TWideStringField
      DisplayLabel = #25945#23460#32534#21495
      DisplayWidth = 17
      FieldName = 'JSBH'
      Visible = False
      Size = 14
    end
    object JSName: TWideStringField
      DisplayLabel = #21517#31216
      DisplayWidth = 8
      FieldName = 'Name'
    end
    object JSMT: TBooleanField
      DisplayLabel = #22810#23186#20307
      DisplayWidth = 6
      FieldName = 'MT'
      OnGetText = JSMTGetText
    end
    object JSallname: TWideStringField
      DisplayLabel = #20840#31216
      DisplayWidth = 40
      FieldName = 'allname'
      Size = 100
    end
  end
  object dsJS: TDataSource
    DataSet = JS
    Left = 264
    Top = 248
  end
  object temp: TADOTable
    Active = True
    ConnectionString = 
      'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=.\'#25945#23460#31649#29702'.mdb;Persist ' +
      'Security Info=False;User ID=Admin;Password=""'
    CursorType = ctStatic
    TableName = 'temp'
    Left = 397
    Top = 256
  end
  object dstemp: TDataSource
    DataSet = temp
    Left = 432
    Top = 256
  end
end