umain.dfm

说明: 比较简单的人事档案管理程序,包含了人事档案的大部分功能,做人事档案的兄弟可以看看. 本程序类型：delphi7 + Access2000 桌面数据库 初始用户名/密码:admin

        FieldName = 'employee_othertel'
        Footers = <>
        Title.Alignment = taCenter
        Title.Caption = #20854#23427#30005#35805
        Width = 75
      end
      item
        IsCurrency = False
        DisplayNullIfZero = False
        EditButtons = <>
        FieldName = 'employee_school'
        Footers = <>
        Title.Alignment = taCenter
        Title.Caption = #27605#19994#38498#26657
        Width = 120
      end
      item
        IsCurrency = False
        DisplayNullIfZero = False
        EditButtons = <>
        FieldName = 'employee_email'
        Footers = <>
        Title.Alignment = taCenter
        Title.Caption = 'E-Mail'
        Width = 75
      end
      item
        IsCurrency = False
        DisplayNullIfZero = False
        EditButtons = <>
        FieldName = 'employee_homepage'
        Footers = <>
        Title.Alignment = taCenter
        Title.Caption = #20010#20154#20027#39029
        Width = 75
      end
      item
        IsCurrency = False
        DisplayNullIfZero = False
        EditButtons = <>
        FieldName = 'employee_city'
        Footers = <>
        Title.Alignment = taCenter
        Title.Caption = #31821#36143
        Width = 120
      end
      item
        IsCurrency = False
        DisplayNullIfZero = False
        EditButtons = <>
        FieldName = 'employee_nowaddress'
        Footers = <>
        Title.Alignment = taCenter
        Title.Caption = #29616#20303#22336
        Width = 120
      end
      item
        IsCurrency = False
        DisplayNullIfZero = False
        EditButtons = <>
        FieldName = 'employee_memo'
        Footers = <>
        Title.Alignment = taCenter
        Title.Caption = #20010#20154#22791#27880
        Width = 150
      end>
  end
  object MainMenu1: TMainMenu
    Images = ICOlist
    Left = 24
    Top = 88
    object F1: TMenuItem
      Caption = '&F'#31243#24207' '
      object N21: TMenuItem
        Caption = #21592#24037#21015#34920
        ImageIndex = 6
        OnClick = N21Click
      end
      object N20: TMenuItem
        Caption = '-'
      end
      object N1: TMenuItem
        Caption = #31995#32479#35774#32622
        SubMenuImages = ICOlist
        ImageIndex = 41
        OnClick = N1Click
      end
      object N2: TMenuItem
        Caption = #22806#35266#36873#25321
        SubMenuImages = ICOlist
        ImageIndex = 30
        object N45: TMenuItem
          Caption = #20256#32479#24773#35843
          OnClick = N45Click
        end
        object WinXP1: TMenuItem
          Caption = 'WinXP'#32463#20856
          OnClick = WinXP1Click
        end
        object Mac1: TMenuItem
          Caption = 'Mac'#30028#38754
          ImageIndex = 52
          OnClick = Mac1Click
        end
        object Lunix1: TMenuItem
          Caption = 'Lunix'#32463#20856
          OnClick = Lunix1Click
        end
        object N22: TMenuItem
          Caption = '-'
        end
        object N23: TMenuItem
          Caption = #26356#22810'..'
          OnClick = N23Click
        end
      end
      object N3: TMenuItem
        Caption = '-'
      end
      object RepairNumber: TMenuItem
        Caption = #20462#22797#24182#37325#26032#35745#31639#32534#21495
        ImageIndex = 54
        OnClick = RepairNumberClick
      end
      object N32: TMenuItem
        Caption = '-'
      end
      object N70: TMenuItem
        Caption = #29992#25143#31649#29702
        ImageIndex = 51
        OnClick = N70Click
      end
      object Initialize: TMenuItem
        Caption = #21021#22987#21270#31995#32479
        ImageIndex = 58
        OnClick = InitializeClick
      end
      object N31: TMenuItem
        Caption = '-'
      end
      object N4: TMenuItem
        Caption = #36864#20986
        ImageIndex = 37
        OnClick = N4Click
      end
    end
    object S1: TMenuItem
      Caption = '&S'#35774#32622' '
      object N5: TMenuItem
        Caption = #37096#38376#35774#32622
        ImageIndex = 39
        OnClick = N5Click
      end
      object N6: TMenuItem
        Caption = #36755#20837#39044#35774#32622
        ImageIndex = 24
        OnClick = N6Click
      end
      object N9: TMenuItem
        Caption = #33258#21160#20445#23384#39033
        ImageIndex = 12
        OnClick = N9Click
      end
      object N82: TMenuItem
        Caption = '-'
        Visible = False
      end
      object OutFieldSet: TMenuItem
        Caption = #23548#20986#23383#27573#35774#32622
        ImageIndex = 24
        Visible = False
        OnClick = OutFieldSetClick
      end
    end
    object N7: TMenuItem
      Caption = '&E'#32534#36753' '
      object MainMenu_AddNewEmployee: TMenuItem
        Caption = #21152#20837#26032#21592#24037
        ImageIndex = 2
        ShortCut = 16462
        OnClick = MainMenu_AddNewEmployeeClick
      end
      object N24: TMenuItem
        Caption = '-'
      end
      object MainMenu_EditEmployee: TMenuItem
        Caption = '&E'#32534#36753
        ImageIndex = 8
        ShortCut = 16453
        OnClick = MainMenu_EditEmployeeClick
      end
      object MainMenu_DeleteEmployee: TMenuItem
        Caption = '&D'#21024#38500
        ImageIndex = 33
        ShortCut = 16452
        OnClick = MainMenu_DeleteEmployeeClick
      end
      object MainMenu_MoveOtherDept: TMenuItem
        Caption = '&M'#36716#31227#21040#20854#23427#37096#38376
        ShortCut = 16461
        OnClick = MainMenu_MoveOtherDeptClick
      end
      object N28: TMenuItem
        Caption = '-'
      end
      object MainMenu_Family: TMenuItem
        Caption = '&F'#23478#24237
        ImageIndex = 31
        ShortCut = 16454
        OnClick = MainMenu_FamilyClick
      end
      object MainMenu_Leave: TMenuItem
        Caption = '&L'#35831#20551
        ShortCut = 16460
        OnClick = MainMenu_LeaveClick
      end
      object MainMenu_Award: TMenuItem
        Caption = '&A'#22870#24809
        ImageIndex = 26
        OnClick = MainMenu_AwardClick
      end
      object MainMenu_Plant: TMenuItem
        Caption = '&P'#22521#35757
        ImageIndex = 44
      end
      object MainMenu_MoveToDept: TMenuItem
        Caption = '&K'#35843#21160#35760#24405
        ImageIndex = 40
        OnClick = MainMenu_MoveToDeptClick
      end
      object MainMenu_WorkStoy: TMenuItem
        Caption = '&W'#24037#20316#21333#20301
        ImageIndex = 28
        OnClick = MainMenu_WorkStoyClick
      end
      object N29: TMenuItem
        Caption = '-'
      end
      object MainMenu_AllEmployeeNumber: TMenuItem
        Caption = '&Z'#24403#21069#32844#24037#25968#30446
        OnClick = MainMenu_AllEmployeeNumberClick
      end
      object MainMenu_OutTxt: TMenuItem
        Caption = '&O'#23548#20986#24403#21069#20869#23481#21040#25991#26412
        OnClick = MainMenu_OutTxtClick
      end
      object N30: TMenuItem
        Caption = '-'
      end
      object MainMenu_OutExcel: TMenuItem
        Caption = '&X'#23548#20986#24403#21069#20869#23481#21040'EXCEL'
        ImageIndex = 11
        OnClick = MainMenu_OutExcelClick
      end
      object MainMenu_OutHtml: TMenuItem
        Caption = '&H'#23548#20986#24403#21069#20869#23481#21040'HTML'#32593#39029
        ImageIndex = 46
        ShortCut = 16456
        OnClick = MainMenu_OutHtmlClick
      end
    end
    object V1: TMenuItem
      Caption = '&V'#26597#30475
      object MainMenu_ViewRecord1: TMenuItem
        Caption = '&M'#26597#30475#20010#20154#36164#26009
        ImageIndex = 0
        OnClick = MainMenu_ViewRecord1Click
      end
      object N91: TMenuItem
        Caption = '-'
      end
      object MainMenu_ViewRecord2: TMenuItem
        Caption = '&A'#25152#26377#23478#24237#25104#21592#35760#24405
        OnClick = MainMenu_ViewRecord2Click
      end
      object MainMenu_ViewRecord3: TMenuItem
        Caption = '&L'#25152#26377#35831#20551#35760#24405
        OnClick = MainMenu_ViewRecord3Click
      end
      object MainMenu_ViewRecord4: TMenuItem
        Caption = '&R'#25152#26377#22870#24809#35760#24405
        OnClick = MainMenu_ViewRecord4Click
      end
      object MainMenu_ViewRecord5: TMenuItem
        Caption = '&T'#25152#26377#22521#35757#35760#24405
        OnClick = MainMenu_ViewRecord5Click
      end
      object MainMenu_ViewRecord6: TMenuItem
        Caption = '&K'#25152#26377#35843#21160#35760#24405
        OnClick = MainMenu_ViewRecord6Click
      end
      object MainMenu_ViewRecord7: TMenuItem
        Caption = '&U'#25152#26377#24037#20316#21333#20301#35760#24405
        OnClick = MainMenu_ViewRecord7Click
      end
      object N92: TMenuItem
        Caption = '-'
      end
      object N93: TMenuItem
        Caption = #25490#24207
        object MainMenu_Compositor1: TMenuItem
          Caption = '1-'#25353#32534#21495
          OnClick = MainMenu_Compositor1Click
        end
        object MainMenu_Compositor2: TMenuItem
          Caption = '2-'#25353#22995#21517
          OnClick = MainMenu_Compositor2Click
        end
        object MainMenu_Compositor3: TMenuItem
          Caption = '3-'#25353#20986#29983#26085#26399
          OnClick = MainMenu_Compositor3Click
        end
        object MainMenu_Compositor4: TMenuItem
          Caption = '4-'#25353#21152#20837#26412#21333#20301#26085#26399
          OnClick = MainMenu_Compositor4Click
        end
        object MainMenu_Compositor5: TMenuItem
          Caption = '5-'#25353#24320#22987#24037#20316#26085#26399
          OnClick = MainMenu_Compositor5Click
        end
      end
    end
    object N44: TMenuItem
      Caption = '&T'#32479#35745' '
      object MainMenu_CombinationQuery: TMenuItem
        Caption = #33258#23450#20041#26597#35810