employee.dfm

来自「一个以前收集的基于C/S架构的ERP客户端源代码」· DFM 代码 · 共 692 行 · 第 1/2 页

        end
        object seEmployeeTel: TSDEdit
          Left = 64
          Top = 238
          Width = 157
          Height = 18
          Ctl3D = False
          Font.Charset = GB2312_CHARSET
          Font.Color = clBlack
          Font.Height = -12
          Font.Name = '宋体'
          Font.Style = []
          MaxLength = 20
          ParentColor = True
          ParentCtl3D = False
          ParentFont = False
          TabOrder = 8
          Text = 'seEmployeeTel'
          CharType = ctMathematic
          SplitSymbol = ' | '
        end
        object seEmployeeRpr: TSDEdit
          Left = 64
          Top = 266
          Width = 223
          Height = 18
          Ctl3D = False
          MaxLength = 80
          ParentColor = True
          ParentCtl3D = False
          TabOrder = 9
          Text = 'seEmployeeRpr'
          SplitSymbol = ' | '
        end
        object seEmployeePhot: TSDEdit
          Left = 64
          Top = 181
          Width = 207
          Height = 18
          Ctl3D = False
          Font.Charset = GB2312_CHARSET
          Font.Color = clBlack
          Font.Height = -12
          Font.Name = '宋体'
          Font.Style = []
          MaxLength = 6
          ParentColor = True
          ParentCtl3D = False
          ParentFont = False
          TabOrder = 10
          Text = 'seEmployeePhot'
          CharType = ctMathematic
          SplitSymbol = ' | '
        end
      end
    end
    object tsJZQK: TTabSheet
      Caption = '就职情况  '
      ImageIndex = 1
      object FloatPanel2: TFloatPanel
        Left = 0
        Top = 0
        Width = 304
        Height = 387
        Align = alClient
        Color = clWhite
        Caption = 'FloatPanel1'
        ParentColor = False
        TabOrder = 0
        object Label5: TLabel
          Left = 7
          Top = 43
          Width = 60
          Height = 12
          Caption = '入职日期：'
        end
        object Label22: TLabel
          Left = 31
          Top = 15
          Width = 36
          Height = 12
          Caption = '状态：'
        end
        object Label4: TLabel
          Left = 7
          Top = 71
          Width = 60
          Height = 12
          Caption = '所属部门：'
          Font.Charset = GB2312_CHARSET
          Font.Color = clWindowText
          Font.Height = -12
          Font.Name = '宋体'
          Font.Style = []
          ParentFont = False
        end
        object Label10: TLabel
          Left = 7
          Top = 156
          Width = 60
          Height = 12
          Caption = '所在职务：'
        end
        object Label11: TLabel
          Left = 7
          Top = 100
          Width = 60
          Height = 12
          Caption = '所属车间：'
        end
        object Label15: TLabel
          Left = 7
          Top = 128
          Width = 60
          Height = 12
          Caption = '所属班组：'
        end
        object Label16: TLabel
          Left = 7
          Top = 184
          Width = 60
          Height = 12
          Caption = '所属工种：'
        end
        object Label17: TLabel
          Left = 7
          Top = 212
          Width = 60
          Height = 12
          Caption = '技术水平：'
        end
        object Label18: TLabel
          Left = 7
          Top = 241
          Width = 60
          Height = 12
          Caption = '工资核算：'
        end
        object Label23: TLabel
          Left = 7
          Top = 297
          Width = 60
          Height = 12
          Caption = '离职原因：'
        end
        object Label20: TLabel
          Left = 7
          Top = 269
          Width = 60
          Height = 12
          Caption = '离职日期：'
        end
        object deEmployeeCdate: TDateEdit
          Left = 66
          Top = 40
          Width = 91
          Height = 18
          LineOffset = 2
          LineColor = clGreen
          LineVisible = False
          CDate = '2003-05-14'
          InitDate = '2003-05-14 10:54:22'
          ModalResult = 0
          TabOrder = 0
          Color = 50331647
          Ctl3D = False
          ParentCtl3D = False
        end
        object scEmployeeState: TSDComboBox
          Left = 66
          Top = 7
          Width = 122
          Height = 20
          Color = clWhite
          Ctl3D = False
          ItemHeight = 12
          ParentCtl3D = False
          TabOrder = 1
          Text = 'scEmployeeState'
          Items.Strings = (
            '0-在职'
            '1-离职')
          ReadOnly = True
        end
        object scEmployeeRank: TSDComboBox
          Left = 66
          Top = 148
          Width = 169
          Height = 20
          Style = csDropDownList
          Color = clWhite
          Ctl3D = False
          Font.Charset = GB2312_CHARSET
          Font.Color = clWindowText
          Font.Height = -12
          Font.Name = '宋体'
          Font.Style = []
          ItemHeight = 12
          ParentCtl3D = False
          ParentFont = False
          TabOrder = 2
          KeyItem = cbItem2
        end
        object scEmployeeTow: TSDComboBox
          Left = 66
          Top = 176
          Width = 169
          Height = 20
          Style = csDropDownList
          Color = clWhite
          Ctl3D = False
          ItemHeight = 12
          ParentCtl3D = False
          TabOrder = 3
          KeyItem = cbItem2
        end
        object scEmployeeSkill: TSDComboBox
          Left = 66
          Top = 203
          Width = 169
          Height = 20
          Color = clWhite
          Ctl3D = False
          ItemHeight = 12
          ParentCtl3D = False
          TabOrder = 4
          KeyItem = cbItem2
        end
        object seEmployeeDept: TSDEdit
          Left = 66
          Top = 64
          Width = 164
          Height = 18
          Ctl3D = False
          ParentColor = True
          ParentCtl3D = False
          TabOrder = 5
          Text = 'seEmployeeDept'
          KeyItem = cbItem2
          DispItem = cbItem1
          SplitSymbol = ' | '
        end
        object scEmployeeWct: TSDComboBox
          Left = 66
          Top = 232
          Width = 129
          Height = 20
          Style = csDropDownList
          Color = clWhite
          Ctl3D = False
          ItemHeight = 12
          ParentCtl3D = False
          TabOrder = 6
          KeyItem = cbItem2
        end
        object deEmployeeLdate: TDateEdit
          Left = 66
          Top = 265
          Width = 93
          Height = 18
          LineOffset = 2
          LineColor = clGreen
          LineVisible = False
          CDate = '2003-05-14'
          InitDate = '2003-05-14 10:54:22'
          ModalResult = 0
          TabOrder = 7
          Color = 50331647
          Ctl3D = False
          ParentCtl3D = False
        end
        object seEmployeeShop: TSDEdit
          Left = 66
          Top = 93
          Width = 164
          Height = 18
          Ctl3D = False
          ParentColor = True
          ParentCtl3D = False
          TabOrder = 8
          Text = 'seEmployeeShop'
          OnButtonClick = seEmployeeShopButtonClick
          ButtonVisible = True
          KeyItem = cbItem2
          DispItem = cbItem1
          SplitSymbol = ' | '
        end
        object seEmployeeTeam: TSDEdit
          Left = 66
          Top = 121
          Width = 164
          Height = 18
          Ctl3D = False
          ParentColor = True
          ParentCtl3D = False
          TabOrder = 9
          Text = 'seEmployeeTeam'
          OnButtonClick = seEmployeeTeamButtonClick
          ButtonVisible = True
          KeyItem = cbItem2
          DispItem = cbItem1
          SplitSymbol = ' | '
        end
        object seEmployeeLr: TSDEdit
          Left = 66
          Top = 292
          Width = 164
          Height = 18
          Ctl3D = False
          ParentColor = True
          ParentCtl3D = False
          TabOrder = 10
          Text = 'seEmployeeLr'
          OnButtonClick = seEmployeeLrButtonClick
          ButtonVisible = True
          KeyItem = cbItem2
          DispItem = cbItem1
          SplitSymbol = ' | '
        end
      end
    end
  end
  inherited MainMenu1: TMainMenu
    Left = 147
    Top = 139
  end
  inherited ImageList1: TImageList
    Left = 147
    Top = 139
  end
  inherited RecPrintDlg: TPrintDialog
    Left = 147
    Top = 139
  end
  inherited PrnSetupDlg: TPrinterSetupDialog
    Left = 147
    Top = 139
  end
  object OpenPictureDialog1: TOpenPictureDialog
    Options = [ofHideReadOnly, ofPathMustExist, ofEnableSizing]
    Title = '打开员工图象文件'
    Left = 147
    Top = 139
  end
end