unit7.dfm

来自「用delphi和SQLServer开发的人力资源管理信息系统」· DFM 代码 · 共 559 行

object Form7: TForm7
  Left = 199
  Top = 68
  Width = 874
  Height = 404
  Caption = #22791#36873#20154#25165#24211#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 = 441
    Height = 345
    Caption = #22791#36873#20154#25165
    TabOrder = 0
    object DBGrid1: TDBGrid
      Left = 5
      Top = 16
      Width = 428
      Height = 329
      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 = #32534#21495
          Visible = True
        end
        item
          Expanded = False
          FieldName = #22995#21517
          Visible = True
        end
        item
          Expanded = False
          FieldName = #24615#21035
          PickList.Strings = (
            #30007
            #22899)
          Visible = True
        end
        item
          Expanded = False
          FieldName = #22269#31821
          Visible = True
        end
        item
          Expanded = False
          FieldName = #20986#29983#26085#26399
          Visible = True
        end
        item
          Expanded = False
          FieldName = #20986#29983#22320
          Visible = True
        end
        item
          Expanded = False
          FieldName = #31821#36143
          Visible = True
        end
        item
          Expanded = False
          FieldName = #27665#26063
          Visible = True
        end
        item
          Expanded = False
          FieldName = #36523#20221#35777#25110#25252#29031#21495
          Visible = True
        end
        item
          Expanded = False
          FieldName = #25919#27835#38754#35980
          PickList.Strings = (
            #20013#20849#20826#21592
            #20013#20849#39044#22791#20826#21592
            #20849#38738#22242#21592
            #26080#20826#27966#20154#22763
            #32676#20247
            #20854#23427)
          Visible = True
        end
        item
          Expanded = False
          FieldName = #23130#23035#29366#20917
          PickList.Strings = (
            #26410#23130
            #24050#23130
            #20007#20598
            #31163#23130
            #20854#23427)
          Visible = True
        end
        item
          Expanded = False
          FieldName = #23478#24237#20303#22336
          Visible = True
        end
        item
          Expanded = False
          FieldName = #23478#24237#30005#35805
          Visible = True
        end
        item
          Expanded = False
          FieldName = #31227#21160#30005#35805
          Visible = True
        end
        item
          Expanded = False
          FieldName = #21150#20844#30005#35805
          Visible = True
        end
        item
          Expanded = False
          FieldName = #26368#39640#23398#21382
          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 = #27605#19994#23398#26657
          Visible = True
        end
        item
          Expanded = False
          FieldName = #19987#19994
          Visible = True
        end
        item
          Expanded = False
          FieldName = #31508#35797#25104#32489
          Visible = True
        end
        item
          Expanded = False
          FieldName = #38754#35797#25104#32489
          Visible = True
        end
        item
          Expanded = False
          FieldName = #24212#32856#37096#38376
          Visible = True
        end
        item
          Expanded = False
          FieldName = #24212#32856#23703#20301
          PickList.Strings = (
            #37096#38376#36127#36131#20154
            #20027#31649
            #32844#21592)
          Visible = True
        end
        item
          Expanded = False
          FieldName = #20869#37096#20154#21592#26631#24535
          PickList.Strings = (
            #26159
            #21542)
          Visible = True
        end>
    end
  end
  object GroupBox3: TGroupBox
    Left = 448
    Top = 0
    Width = 417
    Height = 345
    Caption = #20154#25165#38656#27714
    TabOrder = 1
    object Label2: TLabel
      Left = 58
      Top = 33
      Width = 60
      Height = 21
      Caption = #37096#38376#21495
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -20
      Font.Name = #21326#25991#34892#26999
      Font.Style = []
      ParentFont = False
    end
    object Label3: TLabel
      Left = 48
      Top = 81
      Width = 80
      Height = 21
      Caption = #25307#32856#23703#20301
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -20
      Font.Name = #21326#25991#34892#26999
      Font.Style = []
      ParentFont = False
    end
    object Label4: TLabel
      Left = 48
      Top = 129
      Width = 80
      Height = 21
      Caption = #25307#32856#20154#25968
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -20
      Font.Name = #21326#25991#34892#26999
      Font.Style = []
      ParentFont = False
    end
    object Label5: TLabel
      Left = 48
      Top = 177
      Width = 80
      Height = 21
      Caption = #25307#32856#23545#35937
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -20
      Font.Name = #21326#25991#34892#26999
      Font.Style = []
      ParentFont = False
    end
    object Label6: TLabel
      Left = 28
      Top = 225
      Width = 120
      Height = 21
      Caption = #36866#29992#19987#19994#33539#22260
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -20
      Font.Name = #21326#25991#34892#26999
      Font.Style = []
      ParentFont = False
    end
    object Label7: TLabel
      Left = 48
      Top = 273
      Width = 80
      Height = 21
      Caption = #23398#21382#35201#27714
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -20
      Font.Name = #21326#25991#34892#26999
      Font.Style = []
      ParentFont = False
    end
    object DBNavigator1: TDBNavigator
      Left = 80
      Top = 312
      Width = 220
      Height = 25
      DataSource = DataSource2
      VisibleButtons = [nbFirst, nbPrior, nbNext, nbLast]
      TabOrder = 0
    end
    object DBEdit1: TDBEdit
      Left = 168
      Top = 33
      Width = 121
      Height = 21
      DataField = #37096#38376#21495
      DataSource = DataSource2
      TabOrder = 1
    end
    object DBEdit2: TDBEdit
      Left = 168
      Top = 81
      Width = 121
      Height = 21
      DataField = #25307#32856#23703#20301
      DataSource = DataSource2
      TabOrder = 2
    end
    object DBEdit3: TDBEdit
      Left = 168
      Top = 129
      Width = 121
      Height = 21
      DataField = #25307#32856#20154#25968
      DataSource = DataSource2
      TabOrder = 3
    end
    object DBEdit4: TDBEdit
      Left = 168
      Top = 177
      Width = 121
      Height = 21
      DataField = #25307#32856#23545#35937
      DataSource = DataSource2
      TabOrder = 4
    end
    object DBEdit5: TDBEdit
      Left = 168
      Top = 225
      Width = 121
      Height = 21
      DataField = #36866#29992#19987#19994#33539#22260
      DataSource = DataSource2
      TabOrder = 5
    end
    object DBEdit6: TDBEdit
      Left = 168
      Top = 273
      Width = 121
      Height = 21
      DataField = #23398#21382#35201#27714
      DataSource = DataSource2
      TabOrder = 6
    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 = 16
    Top = 64
  end
  object ADOTable1: TADOTable
    Active = True
    Connection = ADOConnection1
    CursorType = ctStatic
    TableName = #24212#32856
    Left = 80
    Top = 104
    object ADOTable1DSDesigner: TIntegerField
      FieldName = #32534#21495
    end
    object ADOTable1DSDesigner2: TStringField
      FieldName = #22995#21517
      FixedChar = True
    end
    object ADOTable1DSDesigner3: TStringField
      FieldName = #24615#21035
      FixedChar = True
      Size = 2
    end
    object ADOTable1DSDesigner4: TStringField
      FieldName = #22269#31821
      FixedChar = True
    end
    object ADOTable1DSDesigner5: TStringField
      FieldName = #20986#29983#26085#26399
      FixedChar = True
      Size = 10
    end
    object ADOTable1DSDesigner6: TStringField
      FieldName = #20986#29983#22320
      FixedChar = True
      Size = 100
    end
    object ADOTable1DSDesigner7: TStringField
      FieldName = #31821#36143
      FixedChar = True
      Size = 100
    end
    object ADOTable1DSDesigner8: TStringField
      FieldName = #27665#26063
      FixedChar = True
    end
    object ADOTable1DSDesigner9: TStringField
      FieldName = #36523#20221#35777#25110#25252#29031#21495
      FixedChar = True
      Size = 18
    end
    object ADOTable1DSDesigner10: TStringField
      FieldName = #25919#27835#38754#35980
      FixedChar = True
    end
    object ADOTable1DSDesigner11: TStringField
      FieldName = #23130#23035#29366#20917
      FixedChar = True
      Size = 4
    end
    object ADOTable1DSDesigner12: TStringField
      FieldName = #23478#24237#20303#22336
      FixedChar = True
      Size = 100
    end
    object ADOTable1DSDesigner13: TStringField
      FieldName = #23478#24237#30005#35805
      FixedChar = True
    end
    object ADOTable1DSDesigner14: TStringField
      FieldName = #31227#21160#30005#35805
      FixedChar = True
      Size = 11
    end
    object ADOTable1DSDesigner15: TStringField
      FieldName = #21150#20844#30005#35805
      FixedChar = True
    end
    object ADOTable1DSDesigner16: TStringField
      FieldName = #26368#39640#23398#21382
      FixedChar = True
    end
    object ADOTable1DSDesigner17: TStringField
      FieldName = #27605#19994#23398#26657
      FixedChar = True
      Size = 100
    end
    object ADOTable1DSDesigner18: TStringField
      FieldName = #19987#19994
      FixedChar = True
      Size = 50
    end
    object ADOTable1DSDesigner19: TIntegerField
      FieldName = #31508#35797#25104#32489
    end
    object ADOTable1DSDesigner20: TIntegerField
      FieldName = #38754#35797#25104#32489
    end
    object ADOTable1DSDesigner21: TStringField
      FieldName = #24212#32856#37096#38376
      FixedChar = True
    end
    object ADOTable1DSDesigner22: TStringField
      FieldName = #24212#32856#23703#20301
      FixedChar = True
      Size = 10
    end
    object ADOTable1DSDesigner23: TStringField
      FieldName = #20869#37096#20154#21592#26631#24535
      FixedChar = True
      Size = 2
    end
  end
  object MainMenu1: TMainMenu
    Left = 32
    Top = 136
    object N1: TMenuItem
      Caption = #28155#21152
      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 = #25361#36873
      OnClick = N6Click
    end
    object N8: TMenuItem
      Caption = #36820#22238
      OnClick = N8Click
    end
    object N7: TMenuItem
      Caption = #36864#20986
      OnClick = N7Click
    end
  end
  object ADOTable2: TADOTable
    Connection = ADOConnection1
    CursorType = ctStatic
    TableName = #25307#32856
    Left = 96
    Top = 192
    object ADOTable2DSDesigner: TIntegerField
      FieldName = #25307#32856#32534#21495
    end
    object ADOTable2DSDesigner2: TStringField
      FieldName = #37096#38376#21495
      FixedChar = True
      Size = 2
    end
    object ADOTable2DSDesigner3: TStringField
      FieldName = #25307#32856#23703#20301
      FixedChar = True
      Size = 50
    end
    object ADOTable2DSDesigner4: TIntegerField
      FieldName = #25307#32856#20154#25968
    end
    object ADOTable2DSDesigner5: TStringField
      FieldName = #25307#32856#36884#24452
      FixedChar = True
      Size = 50
    end
    object ADOTable2DSDesigner6: TStringField
      FieldName = #36866#29992#19987#19994#33539#22260
      FixedChar = True
      Size = 50
    end
    object ADOTable2DSDesigner7: TStringField
      FieldName = #23398#21382#35201#27714
      FixedChar = True
      Size = 50
    end
    object ADOTable2DSDesigner8: TIntegerField
      FieldName = #34218#37228#24453#36935
    end
    object ADOTable2DSDesigner9: TStringField
      FieldName = #25311#23450#21040#23703#26102#38388
      FixedChar = True
      Size = 10
    end
    object ADOTable2DSDesigner10: TStringField
      FieldName = #25307#32856#26041#27861
      FixedChar = True
      Size = 200
    end
    object ADOTable2DSDesigner11: TStringField
      FieldName = #25307#32856#23545#35937
      FixedChar = True
      Size = 100
    end
  end
  object DataSource1: TDataSource
    DataSet = ADOTable1
    Left = 152
    Top = 136
  end
  object DataSource2: TDataSource
    AutoEdit = False
    DataSet = ADOTable2
    Left = 168
    Top = 208
  end
end