unit1.dfm

员工管理系统 功能还算齐全,主要用于一般的小型公司

object Fmain: TFmain
  Left = 267
  Top = 219
  Width = 615
  Height = 431
  Caption = #20154#20107#31649#29702#31995#32479
  Color = clSkyBlue
  Constraints.MaxHeight = 431
  Constraints.MaxWidth = 615
  Constraints.MinHeight = 431
  Constraints.MinWidth = 615
  Font.Charset = ANSI_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = #23435#20307
  Font.Style = []
  Menu = MainMenu1
  OldCreateOrder = False
  PopupMenu = PopupMenu1
  OnClose = FormClose
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 12
  object SpeedButton1: TSpeedButton
    Left = 552
    Top = 40
    Width = 47
    Height = 38
    Hint = #19978#19968#20010
    Caption = #65087
    Flat = True
    ParentShowHint = False
    ShowHint = True
    OnClick = SpeedButton1Click
  end
  object SpeedButton2: TSpeedButton
    Left = 552
    Top = 80
    Width = 47
    Height = 38
    Hint = #19979#19968#20010
    Caption = #65088
    Flat = True
    ParentShowHint = False
    ShowHint = True
    OnClick = SpeedButton2Click
  end
  object SpeedButton3: TSpeedButton
    Left = 552
    Top = 0
    Width = 47
    Height = 38
    Hint = #31532#19968#20010
    Caption = #65085
    Flat = True
    ParentShowHint = False
    ShowHint = True
    OnClick = SpeedButton3Click
  end
  object SpeedButton4: TSpeedButton
    Left = 552
    Top = 120
    Width = 47
    Height = 38
    Hint = #26368#21518#19968#20010
    Caption = #65086
    Flat = True
    ParentShowHint = False
    ShowHint = True
    OnClick = SpeedButton4Click
  end
  object Label1: TLabel
    Left = 528
    Top = 328
    Width = 68
    Height = 16
    Caption = #35199#24037#20316#21697
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = #23435#20307
    Font.Style = [fsBold]
    ParentFont = False
  end
  object Label2: TLabel
    Left = 536
    Top = 344
    Width = 35
    Height = 10
    Caption = '2006-01'
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -10
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
  end
  object DBGrid1: TDBGrid
    Left = 0
    Top = 0
    Width = 545
    Height = 313
    Color = clInactiveCaptionText
    DataSource = DataModule3.DataSource1
    FixedColor = clGrayText
    ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
    PopupMenu = PopupMenu1
    TabOrder = 0
    TitleFont.Charset = ANSI_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -12
    TitleFont.Name = #23435#20307
    TitleFont.Style = []
    Columns = <
      item
        Expanded = False
        FieldName = #32534#21495
        Width = 30
        Visible = True
      end
      item
        Expanded = False
        FieldName = #22995#21517
        Visible = True
      end
      item
        Expanded = False
        FieldName = #24615#21035
        Visible = True
      end
      item
        Expanded = False
        FieldName = #37096#38376
        Visible = True
      end
      item
        Expanded = False
        FieldName = #24180#40836
        Visible = True
      end
      item
        Expanded = False
        FieldName = #24037#20316#26085#26399
        Visible = True
      end
      item
        Expanded = False
        FieldName = #24037#36164
        Visible = True
      end
      item
        Expanded = False
        FieldName = #32844#31216
        Visible = True
      end
      item
        Expanded = False
        FieldName = #32844#21153
        Visible = True
      end
      item
        Expanded = False
        FieldName = #31616#21382
        Visible = True
      end
      item
        Expanded = False
        FieldName = #22791#27880
        Width = 50
        Visible = True
      end>
  end
  object Button1: TButton
    Left = 552
    Top = 160
    Width = 49
    Height = 25
    Caption = #21047#26032
    TabOrder = 1
    OnClick = Button1Click
  end
  object Button2: TButton
    Left = 552
    Top = 192
    Width = 49
    Height = 25
    Caption = #28155#21152
    TabOrder = 2
    OnClick = Button2Click
  end
  object Button4: TButton
    Left = 344
    Top = 328
    Width = 65
    Height = 25
    Caption = #26597#25214
    TabOrder = 3
    OnClick = Button4Click
  end
  object ComboBox1: TComboBox
    Left = 32
    Top = 328
    Width = 57
    Height = 20
    ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
    ItemHeight = 12
    TabOrder = 4
    Text = #31934#30830
    Items.Strings = (
      #27169#31946
      #31934#30830)
  end
  object ComboBox2: TComboBox
    Left = 96
    Top = 328
    Width = 97
    Height = 20
    ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
    ItemHeight = 12
    MaxLength = 8
    TabOrder = 5
    Text = #22995#21517
    Items.Strings = (
      #32534#21495
      #22995#21517
      #24615#21035
      #37096#38376
      #24180#40836
      #24037#20316#26085#26399
      #24037#36164
      #32844#31216
      #23703#20301
      #31616#21382
      #22791#27880)
  end
  object Edit1: TEdit
    Left = 200
    Top = 328
    Width = 121
    Height = 20
    ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
    MaxLength = 50
    TabOrder = 6
  end
  object Button6: TButton
    Left = 432
    Top = 328
    Width = 75
    Height = 25
    Caption = #20840#37096#26174#31034
    TabOrder = 7
    OnClick = Button6Click
  end
  object StatusBar1: TStatusBar
    Left = 0
    Top = 358
    Width = 607
    Height = 19
    Panels = <
      item
        Width = 400
      end
      item
        Width = 50
      end>
    SimplePanel = False
  end
  object Button3: TButton
    Left = 552
    Top = 224
    Width = 49
    Height = 25
    Caption = #21024#38500
    TabOrder = 9
    OnClick = Button3Click
  end
  object BitBtn1: TBitBtn
    Left = 552
    Top = 288
    Width = 49
    Height = 25
    Caption = #27983#35272
    TabOrder = 10
    OnClick = N11Click
  end
  object Button5: TButton
    Left = 552
    Top = 256
    Width = 49
    Height = 25
    Caption = #20462#25913
    TabOrder = 11
    OnClick = Button5Click
  end
  object MainMenu1: TMainMenu
    Left = 128
    Top = 248
    object N1: TMenuItem
      Caption = #25805#20316
      object N5: TMenuItem
        Caption = #36864#20986
        OnClick = N5Click
      end
      object N6: TMenuItem
        Caption = #21047#26032
        OnClick = Button1Click
      end
    end
    object N2: TMenuItem
      Caption = #26597#30475
      object N3: TMenuItem
        Caption = #23383#20307
        OnClick = N3Click
      end
      object N4: TMenuItem
        Caption = #39068#33394
        object N12: TMenuItem
          Caption = #31383#20307
          OnClick = N12Click
        end
        object N13: TMenuItem
          Caption = #27983#35272#22495
          OnClick = N13Click
        end
      end
    end
    object N7: TMenuItem
      Caption = #25968#25454
      object N11: TMenuItem
        Caption = #25171#21360
        OnClick = N11Click
      end
      object N14: TMenuItem
        Caption = #28155#21152
        OnClick = Button2Click
      end
      object N15: TMenuItem
        Caption = #21024#38500
        OnClick = Button3Click
      end
    end
    object N8: TMenuItem
      Caption = #20851#20110
      object N9: TMenuItem
        Caption = #24110#21161
        OnClick = N9Click
      end
      object N10: TMenuItem
        Caption = #20851#20110
        OnClick = N10Click
      end
    end
  end
  object FontDialog1: TFontDialog
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    MinFontSize = 0
    MaxFontSize = 0
    Left = 40
    Top = 248
  end
  object ColorDialog1: TColorDialog
    Ctl3D = True
    Left = 80
    Top = 248
  end
  object PopupMenu1: TPopupMenu
    Left = 168
    Top = 248
    object N16: TMenuItem
      Caption = #21047#26032
      OnClick = Button1Click
    end
    object N17: TMenuItem
      Caption = #28155#21152
      OnClick = Button2Click
    end
    object N20: TMenuItem
      Caption = #20462#25913
      OnClick = Button5Click
    end
    object N18: TMenuItem
      Caption = #21024#38500
      OnClick = Button3Click
    end
    object N19: TMenuItem
      Caption = #36864#20986
      OnClick = N5Click
    end
  end
end