object FRM_Date: TFRM_Date
  Left = 568
  Top = 125
  BorderIcons = [biSystemMenu]
  BorderStyle = bsDialog
  Caption = #26085#26399#36984#25799
  ClientHeight = 429
  ClientWidth = 394
  Color = clWhite
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = #23435#20307
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  Scaled = False
  OnClose = FormClose
  OnCreate = FormCreate
  OnDeactivate = FormDeactivate
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 12
  object panel1: TPanel
    Left = 0
    Top = 0
    Width = 394
    Height = 429
    Align = alClient
    BevelOuter = bvNone
    Color = clWhite
    TabOrder = 0
    object lbl_BackYear: TLabel
      Left = 0
      Top = 54
      Width = 394
      Height = 153
      Align = alClient
      Alignment = taCenter
      Caption = '2002'
      Font.Charset = ANSI_CHARSET
      Font.Color = 13756668
      Font.Height = -107
      Font.Name = 'Verdana'
      Font.Style = [fsBold, fsItalic]
      ParentFont = False
      PopupMenu = MenuMonth
      Transparent = True
      Layout = tlBottom
      ExplicitWidth = 304
      ExplicitHeight = 130
    end
    object lbl_BackMonth: TLabel
      Left = 0
      Top = 207
      Width = 394
      Height = 161
      Align = alBottom
      Alignment = taCenter
      Caption = '6'
      Font.Charset = ANSI_CHARSET
      Font.Color = 16705240
      Font.Height = -133
      Font.Name = 'Verdana'
      Font.Style = [fsBold, fsItalic]
      ParentFont = False
      ParentShowHint = False
      PopupMenu = MenuMonth
      ShowHint = False
      Transparent = True
      ExplicitWidth = 95
    end
    object shap_ChooseBox: TShape
      Left = 18
      Top = 83
      Width = 43
      Height = 40
      Brush.Color = 8512126
      Pen.Color = clGreen
    end
    object Shape1: TShape
      Left = 0
      Top = 0
      Width = 394
      Height = 54
      Align = alTop
      Brush.Color = 12114938
      ExplicitTop = -1
    end
    object shp1: TShape
      Left = 0
      Top = 368
      Width = 394
      Height = 61
      Align = alBottom
      Brush.Color = 8404992
      ExplicitTop = 374
    end
    object Bevel2: TBevel
      Left = 13
      Top = 64
      Width = 362
      Height = 10
      Shape = bsBottomLine
    end
    object Label2: TLabel
      Left = 19
      Top = 56
      Width = 42
      Height = 13
      Alignment = taCenter
      Caption = #26143#26399#26085
      Font.Charset = CHINESEBIG5_CHARSET
      Font.Color = clRed
      Font.Height = -13
      Font.Name = #32048#26126#39636
      Font.Style = []
      ParentFont = False
      Layout = tlCenter
    end
    object Label3: TLabel
      Left = 71
      Top = 56
      Width = 42
      Height = 13
      Alignment = taCenter
      Caption = #26143#26399#19968
      Font.Charset = CHINESEBIG5_CHARSET
      Font.Color = clBlack
      Font.Height = -13
      Font.Name = #32048#26126#39636
      Font.Style = []
      ParentFont = False
      Layout = tlCenter
    end
    object Label4: TLabel
      Left = 124
      Top = 56
      Width = 42
      Height = 13
      Alignment = taCenter
      Caption = #26143#26399#20108
      Font.Charset = CHINESEBIG5_CHARSET
      Font.Color = clBlack
      Font.Height = -13
      Font.Name = #32048#26126#39636
      Font.Style = []
      ParentFont = False
      Layout = tlCenter
    end
    object Label5: TLabel
      Left = 176
      Top = 56
      Width = 42
      Height = 13
      Alignment = taCenter
      Caption = #26143#26399#19977
      Font.Charset = CHINESEBIG5_CHARSET
      Font.Color = clBlack
      Font.Height = -13
      Font.Name = #32048#26126#39636
      Font.Style = []
      ParentFont = False
      Layout = tlCenter
    end
    object Label6: TLabel
      Left = 229
      Top = 56
      Width = 42
      Height = 13
      Alignment = taCenter
      Caption = #26143#26399#22235
      Font.Charset = CHINESEBIG5_CHARSET
      Font.Color = clBlack
      Font.Height = -13
      Font.Name = #32048#26126#39636
      Font.Style = []
      ParentFont = False
      Layout = tlCenter
    end
    object Label7: TLabel
      Left = 334
      Top = 56
      Width = 42
      Height = 13
      Alignment = taCenter
      Caption = #26143#26399#20845
      Font.Charset = CHINESEBIG5_CHARSET
      Font.Color = clRed
      Font.Height = -13
      Font.Name = #32048#26126#39636
      Font.Style = []
      ParentFont = False
      Layout = tlCenter
    end
    object Label8: TLabel
      Left = 281
      Top = 56
      Width = 42
      Height = 13
      Alignment = taCenter
      Caption = #26143#26399#20116
      Font.Charset = CHINESEBIG5_CHARSET
      Font.Color = clBlack
      Font.Height = -13
      Font.Name = #32048#26126#39636
      Font.Style = []
      ParentFont = False
      Layout = tlCenter
    end
    object Cnday: TLabel
      Left = 18
      Top = 101
      Width = 40
      Height = 22
      Alignment = taCenter
      AutoSize = False
      Caption = #21021#19968
      Font.Charset = CHINESEBIG5_CHARSET
      Font.Color = 16384
      Font.Height = -12
      Font.Name = #32048#26126#39636
      Font.Style = []
      ParentFont = False
      Transparent = True
      Layout = tlCenter
      Visible = False
      OnClick = CndayClick
    end
    object Label18: TLabel
      Left = 93
      Top = 14
      Width = 21
      Height = 26
      Caption = #26376
      Font.Charset = CHINESEBIG5_CHARSET
      Font.Color = clWindowText
      Font.Height = -21
      Font.Name = #24494#36575#27491#40657#39636
      Font.Style = [fsBold]
      ParentFont = False
      PopupMenu = MenuMonth
      Layout = tlCenter
    end
    object Label22: TLabel
      Left = 9
      Top = 374
      Width = 32
      Height = 16
      Alignment = taCenter
      Caption = #26143#24231
      Color = clFuchsia
      Font.Charset = CHINESEBIG5_CHARSET
      Font.Color = clAqua
      Font.Height = -16
      Font.Name = #32048#26126#39636
      Font.Style = []
      ParentColor = False
      ParentFont = False
      Transparent = True
    end
    object lbl_ChnDateShow: TLabel
      Left = 9
      Top = 400
      Width = 105
      Height = 13
      Alignment = taCenter
      Caption = 'lbl_ChnDateShow'
      Color = clFuchsia
      Font.Charset = CHINESEBIG5_CHARSET
      Font.Color = clYellow
      Font.Height = -13
      Font.Name = #32048#26126#39636
      Font.Style = []
      ParentColor = False
      ParentFont = False
      Transparent = True
    end
    object lbl_Vaction: TLabel
      Left = 213
      Top = 374
      Width = 92
      Height = 21
      Alignment = taCenter
      Caption = #22283#23450#20551#26085
      Color = clFuchsia
      Font.Charset = CHINESEBIG5_CHARSET
      Font.Color = 9815545
      Font.Height = -21
      Font.Name = #32048#26126#39636
      Font.Style = [fsBold]
      ParentColor = False
      ParentFont = False
      Transparent = True
    end
    object day1: TLabel
      Left = 18
      Top = 80
      Width = 40
      Height = 20
      Alignment = taCenter
      AutoSize = False
      Caption = '12'
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlack
      Font.Height = -19
      Font.Name = 'Arial'
      Font.Style = [fsBold]
      ParentFont = False
      PopupMenu = MenuMonth
      Transparent = True
      Visible = False
    end
    object Label9: TLabel
      Left = 329
      Top = 14
      Width = 21
      Height = 26
      Caption = #24180
      Font.Charset = CHINESEBIG5_CHARSET
      Font.Color = clWindowText
      Font.Height = -21
      Font.Name = #24494#36575#27491#40657#39636
      Font.Style = [fsBold]
      ParentFont = False
      PopupMenu = MenuMonth
      Layout = tlCenter
    end
    object Shape3: TShape
      Left = 323
      Top = 383
      Width = 65
      Height = 35
      Brush.Color = clYellow
      Shape = stEllipse
    end
    object lbl_NowDay: TLabel
      Left = 323
      Top = 383
      Width = 65
      Height = 35
      Alignment = taCenter
      AutoSize = False
      Caption = #20170#22825
      Font.Charset = CHINESEBIG5_CHARSET
      Font.Color = clRed
      Font.Height = -16
      Font.Name = #24494#36575#27491#40657#39636
      Font.Style = [fsBold]
      ParentFont = False
      Layout = tlCenter
      OnClick = lbl_NowDayClick
    end
    object lbl_ChooseYear: TLabel
      Left = 235
      Top = 10
      Width = 92
      Height = 38
      Alignment = taCenter
      AutoSize = False
      Caption = '2002'
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlue
      Font.Height = -32
      Font.Name = 'Verdana'
      Font.Style = [fsBold]
      ParentFont = False
      PopupMenu = MenuYear
      Transparent = True
      Layout = tlCenter
    end
    object lbl_ChooseMonth: TLabel
      Left = 47
      Top = 8
      Width = 43
      Height = 38
      Alignment = taCenter
      AutoSize = False
      Caption = '01'
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlue
      Font.Height = -32
      Font.Name = 'Verdana'
      Font.Style = [fsBold]
      ParentFont = False
      PopupMenu = MenuMonth
      Transparent = True
      Layout = tlCenter
    end
    object btn_NextMonth: TBitBtn
      Left = 120
      Top = 12
      Width = 30
      Height = 30
      Glyph.Data = {
        [encoded data, 7616 characters]
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000}
      TabOrder = 0
      OnClick = btn_NextMonthClick
    end
    object btn_PriorMonth: TBitBtn
      Left = 11
      Top = 12
      Width = 30
      Height = 30
      Glyph.Data = {
        [encoded data, 7616 characters]
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000}
      TabOrder = 1
      OnClick = btn_PriorMonthClick
    end
    object btn_NextYear: TBitBtn
      Left = 356
      Top = 12
      Width = 30
      Height = 30
      Glyph.Data = {
        [encoded data, 7616 characters]
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000}
      TabOrder = 3
      OnClick = btn_NextYearClick
    end
    object btn_PriorYear: TBitBtn
      Left = 199
      Top = 12
      Width = 30
      Height = 30
      Glyph.Data = {
        [encoded data, 7616 characters]
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000}
      TabOrder = 2
      OnClick = btn_PriorYearClick
    end
  end
  object MenuMonth: TPopupMenu
    AutoHotkeys = maManual
    AutoLineReduction = maManual
    TrackButton = tbLeftButton
    Left = 331
    Top = 157
    object MenuMonth_1: TMenuItem
      Tag = 1
      Caption = '01'
      OnClick = MenuMonth_1Click
    end
    object MenuMonth_2: TMenuItem
      Tag = 2
      Caption = '02'
      OnClick = MenuMonth_1Click
    end
    object MenuMonth_3: TMenuItem
      Tag = 3
      Caption = '03'
      OnClick = MenuMonth_1Click
    end
    object MenuMonth_4: TMenuItem
      Tag = 4
      Caption = '04'
      OnClick = MenuMonth_1Click
    end
    object MenuMonth_5: TMenuItem
      Tag = 5
      Caption = '05'
      OnClick = MenuMonth_1Click
    end
    object MenuMonth_6: TMenuItem
      Tag = 6
      Caption = '06'
      OnClick = MenuMonth_1Click
    end
    object MenuMonth_7: TMenuItem
      Tag = 7
      Caption = '07'
      OnClick = MenuMonth_1Click
    end
    object MenuMonth_8: TMenuItem
      Tag = 8
      Caption = '08'
      OnClick = MenuMonth_1Click
    end
    object MenuMonth_9: TMenuItem
      Tag = 9
      Caption = '09'
      OnClick = MenuMonth_1Click
    end
    object MenuMonth_10: TMenuItem
      Tag = 10
      Caption = '10'
      OnClick = MenuMonth_1Click
    end
    object MenuMonth_11: TMenuItem
      Tag = 11
      Caption = '11'
      OnClick = MenuMonth_1Click
    end
    object MenuMonth_12: TMenuItem
      Tag = 12
      Caption = '12'
      OnClick = MenuMonth_1Click
    end
  end
  object MenuYear: TPopupMenu
    AutoHotkeys = maManual
    AutoLineReduction = maManual
    TrackButton = tbLeftButton
    Left = 331
    Top = 101
  end
end
