unit6.dfm

用delphi和SQLServer开发的人力资源管理信息系统

object Form6: TForm6
  Left = 234
  Top = 132
  Width = 898
  Height = 484
  Caption = #25307#32856#24037#20316#31649#29702
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Menu = MainMenu1
  OldCreateOrder = False
  OnActivate = FormActivate
  PixelsPerInch = 96
  TextHeight = 13
  object GroupBox1: TGroupBox
    Left = 0
    Top = 0
    Width = 417
    Height = 321
    Caption = #25307#32856#38656#27714
    TabOrder = 0
    object DBGrid1: TDBGrid
      Left = 16
      Top = 24
      Width = 401
      Height = 265
      DataSource = DataSource2
      ReadOnly = True
      TabOrder = 0
      TitleFont.Charset = DEFAULT_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -11
      TitleFont.Name = 'MS Sans Serif'
      TitleFont.Style = []
      Columns = <
        item
          Expanded = False
          FieldName = #37096#38376#21495
          Visible = True
        end
        item
          Expanded = False
          FieldName = #37096#38376#21517#31216
          Visible = True
        end
        item
          Expanded = False
          FieldName = #37096#38376#36127#36131#20154
          Visible = True
        end
        item
          Expanded = False
          FieldName = #24212#26377#20027#31649#20154#25968
          Visible = True
        end
        item
          Expanded = False
          FieldName = #29616#26377#20027#31649#20154#25968
          Visible = True
        end
        item
          Expanded = False
          FieldName = #24212#26377#32844#21592#25968
          Visible = True
        end
        item
          Expanded = False
          FieldName = #29616#26377#32844#21592#25968
          Visible = True
        end>
    end
  end
  object GroupBox2: TGroupBox
    Left = 424
    Top = 0
    Width = 462
    Height = 321
    Caption = #25307#32856#35745#21010
    TabOrder = 1
    object DBGrid2: TDBGrid
      Left = 8
      Top = 24
      Width = 441
      Height = 265
      DataSource = DataSource1
      TabOrder = 0
      TitleFont.Charset = DEFAULT_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -11
      TitleFont.Name = 'MS Sans Serif'
      TitleFont.Style = []
      Columns = <
        item
          Expanded = False
          FieldName = #25307#32856#32534#21495
          Visible = True
        end
        item
          Expanded = False
          FieldName = #37096#38376#21495
          Visible = True
        end
        item
          Expanded = False
          FieldName = #25307#32856#23703#20301
          PickList.Strings = (
            #37096#38376#36127#36131#20154
            #20027#31649
            #32844#21592)
          Visible = True
        end
        item
          Expanded = False
          FieldName = #25307#32856#20154#25968
          Visible = True
        end
        item
          Expanded = False
          FieldName = #25307#32856#36884#24452
          PickList.Strings = (
            #20891#36716#24178#37096
            #36864#20237#20853#25509#21463
            #20844#24320#25307#32856
            #21171#21153#29992#24037#22806#32856
            #20854#23427)
          Visible = True
        end
        item
          Expanded = False
          FieldName = #36866#29992#19987#19994#33539#22260
          Visible = True
        end
        item
          Expanded = False
          FieldName = #23398#21382#35201#27714
          PickList.Strings = (
            #30740#31350#29983
            #22823#23398#26412#31185
            #22823#19987
            #39640#20013
            #20013#19987
            #25216#26657
            #21021#20013
            #21021#20013#20197#19979)
          Visible = True
        end
        item
          Expanded = False
          FieldName = #34218#37228#24453#36935
          Visible = True
        end
        item
          Expanded = False
          FieldName = #25311#23450#21040#23703#26102#38388
          Visible = True
        end
        item
          Expanded = False
          FieldName = #25307#32856#26041#27861
          Visible = True
        end
        item
          Expanded = False
          FieldName = #25307#32856#23545#35937
          PickList.Strings = (
            #20869#37096#20154#21592
            #22806#37096#20154#21592)
          Visible = True
        end
        item
          Expanded = False
          FieldName = #25307#32856#32467#26463#26631#35760
          PickList.Strings = (
            #26159
            '')
          Visible = True
        end>
    end
  end
  object GroupBox3: TGroupBox
    Left = -2
    Top = 308
    Width = 888
    Height = 118
    Caption = #26597#35810
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -21
    Font.Name = #21326#25991#34892#26999
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 2
    object Label11: TLabel
      Left = 280
      Top = 49
      Width = 88
      Height = 22
      Caption = #25307#32856#23703#20301
    end
    object Label13: TLabel
      Left = 560
      Top = 49
      Width = 88
      Height = 22
      Caption = #25307#32856#36884#24452
    end
    object Label10: TLabel
      Left = 48
      Top = 49
      Width = 66
      Height = 22
      Caption = #37096#38376#21495
    end
    object Edit1: TEdit
      Left = 128
      Top = 48
      Width = 121
      Height = 30
      TabOrder = 0
    end
    object ComboBox1: TComboBox
      Left = 680
      Top = 48
      Width = 145
      Height = 30
      ItemHeight = 22
      TabOrder = 1
      Items.Strings = (
        #20891#36716#24178#37096
        #36864#20237#20853#25509#21463
        #20844#24320#25307#32856
        #20869#37096#35843#25972
        #21171#21153#29992#24037#22806#32856
        #20854#23427)
    end
    object ComboBox2: TComboBox
      Left = 384
      Top = 48
      Width = 145
      Height = 30
      ItemHeight = 22
      TabOrder = 2
      Items.Strings = (
        #21333#20301#36127#36131#20154
        #20027#31649
        #32844#21592
        #20854#23427)
    end
  end
  object ADOConnection1: TADOConnection
    Connected = True
    ConnectionString = 
      'Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security In' +
      'fo=False;Initial Catalog=it'
    LoginPrompt = False
    Provider = 'SQLOLEDB.1'
    Left = 24
    Top = 120
  end
  object ADOTable1: TADOTable
    Active = True
    Connection = ADOConnection1
    CursorType = ctStatic
    TableName = #25307#32856
    Left = 56
    Top = 120
    object ADOTable1DSDesigner: TIntegerField
      FieldName = #25307#32856#32534#21495
    end
    object ADOTable1DSDesigner2: TStringField
      FieldName = #37096#38376#21495
      FixedChar = True
      Size = 2
    end
    object ADOTable1DSDesigner3: TStringField
      FieldName = #25307#32856#23703#20301
      FixedChar = True
      Size = 50
    end
    object ADOTable1DSDesigner4: TIntegerField
      FieldName = #25307#32856#20154#25968
    end
    object ADOTable1DSDesigner5: TStringField
      FieldName = #25307#32856#36884#24452
      FixedChar = True
      Size = 50
    end
    object ADOTable1DSDesigner6: TStringField
      FieldName = #36866#29992#19987#19994#33539#22260
      FixedChar = True
      Size = 50
    end
    object ADOTable1DSDesigner7: TStringField
      FieldName = #23398#21382#35201#27714
      FixedChar = True
      Size = 50
    end
    object ADOTable1DSDesigner8: TIntegerField
      FieldName = #34218#37228#24453#36935
    end
    object ADOTable1DSDesigner9: TStringField
      FieldName = #25311#23450#21040#23703#26102#38388
      FixedChar = True
      Size = 10
    end
    object ADOTable1DSDesigner10: TStringField
      FieldName = #25307#32856#26041#27861
      FixedChar = True
      Size = 200
    end
    object ADOTable1DSDesigner11: TStringField
      FieldName = #25307#32856#23545#35937
      FixedChar = True
      Size = 100
    end
    object ADOTable1DSDesigner12: TStringField
      FieldName = #25307#32856#32467#26463#26631#35760
      FixedChar = True
      Size = 2
    end
  end
  object DataSource1: TDataSource
    DataSet = ADOTable1
    Left = 88
    Top = 120
  end
  object MainMenu1: TMainMenu
    Left = 120
    Top = 120
    object N1: TMenuItem
      Caption = #38656#27714
      OnClick = N1Click
    end
    object N2: TMenuItem
      Caption = #30830#23450
      OnClick = N2Click
    end
    object N3: TMenuItem
      Caption = #21462#28040
      OnClick = N3Click
    end
    object N4: TMenuItem
      Caption = #21024#38500
      OnClick = N4Click
    end
    object N5: TMenuItem
      Caption = #20462#25913
      OnClick = N5Click
    end
    object N6: TMenuItem
      Caption = #26597#35810
      OnClick = N6Click
    end
    object N7: TMenuItem
      Caption = #21462#28040#26597#35810
      OnClick = N7Click
    end
    object N8: TMenuItem
      Caption = #36864#20986
      OnClick = N8Click
    end
  end
  object ADOTable2: TADOTable
    Active = True
    Connection = ADOConnection1
    CursorType = ctStatic
    TableName = #21333#20301
    Left = 56
    Top = 152
    object ADOTable2DSDesigner: TStringField
      FieldName = #37096#38376#21495
      FixedChar = True
      Size = 2
    end
    object ADOTable2DSDesigner2: TStringField
      FieldName = #37096#38376#21517#31216
      FixedChar = True
    end
    object ADOTable2DSDesigner3: TStringField
      FieldName = #37096#38376#36127#36131#20154
      FixedChar = True
      Size = 5
    end
    object ADOTable2DSDesigner4: TStringField
      FieldName = #37096#38376#30005#35805
      FixedChar = True
    end
    object ADOTable2DSDesigner5: TStringField
      FieldName = #37096#38376#20171#32461
      FixedChar = True
      Size = 100
    end
    object ADOTable2DSDesigner6: TIntegerField
      FieldName = #24212#26377#20027#31649#20154#25968
    end
    object ADOTable2DSDesigner7: TIntegerField
      FieldName = #29616#26377#20027#31649#20154#25968
    end
    object ADOTable2DSDesigner8: TIntegerField
      FieldName = #24212#26377#32844#21592#25968
    end
    object ADOTable2DSDesigner9: TIntegerField
      FieldName = #29616#26377#32844#21592#25968
    end
  end
  object DataSource2: TDataSource
    DataSet = ADOTable2
    Left = 88
    Top = 152
  end
end