rsgl.dfm

用delphi开发的 人事管理系统

        DateMode = dmComboBox
        Kind = dtkDate
        ParseInput = False
        TabOrder = 3
      end
      object DBEdit2: TDBEdit
        Left = 309
        Top = 85
        Width = 138
        Height = 23
        DataField = 'Sfzh'
        DataSource = DataSource1
        TabOrder = 4
      end
      object DBEdit3: TDBEdit
        Left = 310
        Top = 18
        Width = 121
        Height = 23
        DataField = 'Xm'
        DataSource = DataSource1
        TabOrder = 5
      end
      object DBComboBox3: TDBComboBox
        Left = 552
        Top = 51
        Width = 105
        Height = 23
        ItemHeight = 15
        Items.Strings = (
          '博研'
          '硕研'
          '大本'
          '大专'
          '高中'
          '初中'
          '小学')
        TabOrder = 6
      end
      object DBLookupComboBox1: TDBLookupComboBox
        Left = 551
        Top = 85
        Width = 105
        Height = 23
        KeyField = 'mc'
        ListField = 'mc'
        ListSource = DataSource2
        TabOrder = 7
      end
      object DBLookupComboBox2: TDBLookupComboBox
        Left = 310
        Top = 121
        Width = 105
        Height = 23
        ListField = 'mc'
        ListSource = DataSource3
        TabOrder = 8
      end
      object DBLookupComboBox3: TDBLookupComboBox
        Left = 551
        Top = 121
        Width = 105
        Height = 23
        KeyField = 'mc'
        ListField = 'mc'
        ListSource = DataSource4
        TabOrder = 9
      end
      object DateTimePicker2: TDateTimePicker
        Left = 86
        Top = 121
        Width = 123
        Height = 23
        CalAlignment = dtaLeft
        Date = 37492.5668164352
        Time = 37492.5668164352
        DateFormat = dfLong
        DateMode = dmComboBox
        Kind = dtkDate
        ParseInput = False
        TabOrder = 10
      end
    end
    object GroupBox2: TGroupBox
      Left = 16
      Top = 172
      Width = 665
      Height = 85
      Caption = '联系信息'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -15
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
      TabOrder = 1
      object Label14: TLabel
        Left = 12
        Top = 20
        Width = 60
        Height = 15
        Caption = '家庭住址'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -15
        Font.Name = '宋体'
        Font.Style = []
        ParentFont = False
      end
      object Label15: TLabel
        Left = 436
        Top = 58
        Width = 90
        Height = 15
        Caption = '固定联系电话'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -15
        Font.Name = '宋体'
        Font.Style = []
        ParentFont = False
      end
      object Label16: TLabel
        Left = 216
        Top = 58
        Width = 60
        Height = 15
        Caption = '手机号码'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -15
        Font.Name = '宋体'
        Font.Style = []
        ParentFont = False
      end
      object Label17: TLabel
        Left = 17
        Top = 58
        Width = 48
        Height = 15
        Caption = 'E-mail'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -15
        Font.Name = '宋体'
        Font.Style = []
        ParentFont = False
      end
      object Bevel4: TBevel
        Left = 3
        Top = 44
        Width = 662
        Height = 2
        Shape = bsTopLine
      end
      object Bevel10: TBevel
        Left = 79
        Top = 9
        Width = 2
        Height = 73
      end
      object Bevel11: TBevel
        Left = 210
        Top = 44
        Width = 2
        Height = 40
      end
      object Bevel12: TBevel
        Left = 430
        Top = 45
        Width = 2
        Height = 40
      end
      object Bevel13: TBevel
        Left = 531
        Top = 45
        Width = 2
        Height = 40
      end
      object DBEdit4: TDBEdit
        Left = 88
        Top = 54
        Width = 113
        Height = 23
        DataField = 'Email'
        DataSource = DataSource1
        TabOrder = 0
      end
      object DBEdit5: TDBEdit
        Left = 288
        Top = 54
        Width = 129
        Height = 23
        DataField = 'Sjhm'
        DataSource = DataSource1
        TabOrder = 1
      end
      object DBEdit6: TDBEdit
        Left = 536
        Top = 54
        Width = 121
        Height = 23
        DataField = 'Gdlxdh'
        DataSource = DataSource1
        TabOrder = 2
      end
      object DBEdit7: TDBEdit
        Left = 88
        Top = 16
        Width = 361
        Height = 23
        DataField = 'Jtzz'
        DataSource = DataSource1
        TabOrder = 3
      end
    end
  end
  object Panel3: TPanel
    Left = 0
    Top = 329
    Width = 703
    Height = 55
    Align = alClient
    TabOrder = 2
    object Button1: TButton
      Left = 72
      Top = 16
      Width = 89
      Height = 25
      Caption = '增加(&I)'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -15
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
      TabOrder = 0
    end
    object Button2: TButton
      Left = 208
      Top = 16
      Width = 89
      Height = 25
      Caption = '删除(&D)'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -15
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
      TabOrder = 1
    end
    object Button3: TButton
      Left = 368
      Top = 16
      Width = 89
      Height = 25
      Caption = '提交(&X)'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -15
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
      TabOrder = 2
    end
    object Button4: TButton
      Left = 528
      Top = 16
      Width = 89
      Height = 25
      Caption = '退出(&E)'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -15
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
      TabOrder = 3
      OnClick = Button4Click
    end
  end
  object DataSource1: TDataSource
    DataSet = Query1
    Left = 168
    Top = 16
  end
  object Query1: TQuery
    DatabaseName = 'rsgzgl'
    SQL.Strings = (
      'select * from ygzlb')
    Left = 104
    Top = 16
  end
  object Query2: TQuery
    Active = True
    DatabaseName = 'rsgzgl'
    SQL.Strings = (
      'select  mc from jbcsb where lx=2')
    Left = 520
    Top = 161
  end
  object DataSource2: TDataSource
    DataSet = Query2
    Left = 496
    Top = 161
  end
  object Query3: TQuery
    Active = True
    DatabaseName = 'rsgzgl'
    SQL.Strings = (
      'select mc from jbcsb where lx=3')
    Left = 360
    Top = 201
  end
  object DataSource3: TDataSource
    DataSet = Query3
    Left = 336
    Top = 209
  end
  object Query4: TQuery
    Active = True
    DatabaseName = 'rsgzgl'
    SQL.Strings = (
      'select mc from jbcsb where lx=4')
    Left = 584
    Top = 201
  end
  object DataSource4: TDataSource
    DataSet = Query4
    Left = 568
    Top = 209
  end
end