datewin.dfm

含阴历的中国式日历

object FRM_Date: TFRM_Date
  Left = 335
  Top = 209
  BorderStyle = bsNone
  Caption = #20892#21382#26085#26399#25511#20214'(SimonLee QQ:48211328)'
  ClientHeight = 296
  ClientWidth = 325
  Color = clWhite
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = #23435#20307
  Font.Style = []
  OldCreateOrder = False
  ShowHint = True
  OnClose = FormClose
  OnCreate = FormCreate
  OnDeactivate = FormDeactivate
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 12
  object Shape1: TShape
    Left = 0
    Top = 0
    Width = 325
    Height = 296
    Align = alClient
  end
  object Image1: TImage
    Left = 8
    Top = 56
    Width = 308
    Height = 209
  end
  object Label20: TLabel
    Left = 0
    Top = 58
    Width = 324
    Height = 70
    Alignment = taCenter
    AutoSize = False
    Caption = '2002'
    Font.Charset = ANSI_CHARSET
    Font.Color = 14543103
    Font.Height = -64
    Font.Name = 'Arial Black'
    Font.Style = []
    ParentFont = False
    Transparent = True
    Layout = tlCenter
  end
  object Label16: TLabel
    Left = 0
    Top = 125
    Width = 324
    Height = 108
    Alignment = taCenter
    AutoSize = False
    Caption = '6'
    Font.Charset = ANSI_CHARSET
    Font.Color = 15461355
    Font.Height = -96
    Font.Name = 'Arial Black'
    Font.Style = []
    ParentFont = False
    Transparent = True
    Layout = tlCenter
  end
  object Bevel2: TBevel
    Left = 6
    Top = 46
    Width = 313
    Height = 10
    Shape = bsBottomLine
  end
  object Shape2: TShape
    Left = 12
    Top = 58
    Width = 48
    Height = 33
    Brush.Color = 8512126
  end
  object Label1: TLabel
    Left = 79
    Top = 0
    Width = 76
    Height = 41
    Cursor = crHandPoint
    Alignment = taCenter
    Caption = '2002'
    Color = 15268607
    Font.Charset = ANSI_CHARSET
    Font.Color = clBlue
    Font.Height = -29
    Font.Name = 'Arial Black'
    Font.Style = []
    ParentColor = False
    ParentFont = False
    ParentShowHint = False
    ShowHint = True
    Transparent = True
    Layout = tlCenter
  end
  object Label2: TLabel
    Left = 18
    Top = 40
    Width = 36
    Height = 12
    Alignment = taCenter
    Caption = #26143#26399#26085
    Font.Charset = GB2312_CHARSET
    Font.Color = clRed
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
    Layout = tlCenter
  end
  object Label3: TLabel
    Left = 60
    Top = 40
    Width = 36
    Height = 12
    Alignment = taCenter
    Caption = #26143#26399#19968
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlack
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
    Layout = tlCenter
  end
  object Label4: TLabel
    Left = 104
    Top = 40
    Width = 36
    Height = 12
    Alignment = taCenter
    Caption = #26143#26399#20108
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlack
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
    Layout = tlCenter
  end
  object Label5: TLabel
    Left = 187
    Top = 40
    Width = 36
    Height = 12
    Alignment = taCenter
    Caption = #26143#26399#22235
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlack
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
    Layout = tlCenter
  end
  object Label6: TLabel
    Left = 146
    Top = 40
    Width = 36
    Height = 12
    Alignment = taCenter
    Caption = #26143#26399#19977
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlack
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
    Layout = tlCenter
  end
  object Label7: TLabel
    Left = 272
    Top = 40
    Width = 36
    Height = 12
    Alignment = taCenter
    Caption = #26143#26399#20845
    Font.Charset = GB2312_CHARSET
    Font.Color = clRed
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
    Layout = tlCenter
  end
  object Label8: TLabel
    Left = 229
    Top = 40
    Width = 36
    Height = 12
    Alignment = taCenter
    Caption = #26143#26399#20116
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlack
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
    Layout = tlCenter
  end
  object day1: TLabel
    Left = 14
    Top = 57
    Width = 45
    Height = 20
    Alignment = taCenter
    AutoSize = False
    Caption = '22'
    Font.Charset = ANSI_CHARSET
    Font.Color = clBlack
    Font.Height = -14
    Font.Name = 'Arial Black'
    Font.Style = []
    ParentFont = False
    Transparent = True
    Layout = tlCenter
    Visible = False
  end
  object Cnday: TLabel
    Left = 14
    Top = 75
    Width = 45
    Height = 16
    Alignment = taCenter
    AutoSize = False
    Caption = #21021#19968
    Font.Charset = GB2312_CHARSET
    Font.Color = 16384
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False