calendf.dfm

公历与农历转换组件

object Form1: TForm1
  Left = 383
  Top = 197
  BorderIcons = [biSystemMenu]
  BorderStyle = bsSingle
  Caption = #19975#24180#21382
  ClientHeight = 368
  ClientWidth = 280
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Icon.Data = {
    0000010001002020100000000000E80200001600000028000000200000004000
    0000010004000000000080020000000000000000000000000000000000000000
    000000008000008000000080800080000000800080008080000080808000C0C0
    C0000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF008888
    8888888888888888888888888888888888888888888888888888888888888888
    8888888888888888888888888880888888888888888888888888888888808888
    8888888888888888888888888888888808800000000000000000088888888888
    000000000000000000000888888888880FFFFFFFFFFFFFFFFFF0088888888888
    0FFF99999FFF99999FF00888888888880FF99FFF99F99FFF99F0088888888888
    0FF99FFF99F99FFF99F00888888888880FF99FFF99F99FFF99F0088888888888
    0FF99FFF99F99FFF99F00888888888880FF99FFF99F99FFF99F0088888888888
    0FFF99999FFF99999FF00888888888880FFFF999FFFFF999FFF0088888888888
    0FFF99999FFF99999FF00888888888880FF99FFF99F99FFF99F0088888888888
    0FF99FFF99F99FFF99F00888888888880FF99FFF99F99FFF99F0088888888888
    0FF99FFF99F99FFF99F00888888888880FF99FFF99F99FFF99F0088888888888
    0FFF99999FFF99999FF00888888888880FFFFFFFFFFFFFFFFFF0088888888888
    000000000000000000000888888888880EEEEEEEEEEEEEEEEEE0088888888888
    0EE0EEEEEE0EEEEEE0EE08888888888800000000000000000000088888888888
    80CCC0880CCC0880CCC088888888888888000888800088880008888888888888
    8888888888888888888888888888888888888888888888888888888888880000
    0000000000000000000100000001000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    000000000000000000000000000000000000000000000000000000000000}
  OldCreateOrder = False
  OnClose = FormClose
  OnCreate = FormCreate
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object GroupBox1: TGroupBox
    Left = 1
    Top = 2
    Width = 277
    Height = 165
    Caption = #20844#21382#65309#12299#20892#21382#12289#24178#25903#21382
    Ctl3D = True
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clNavy
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentCtl3D = False
    ParentFont = False
    TabOrder = 0
    DesignSize = (
      277
      165)
    object Label1: TLabel
      Left = 5
      Top = 32
      Width = 70
      Height = 16
      AutoSize = False
      Caption = #20844'        '#21382':'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clMaroon
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label2: TLabel
      Left = 5
      Top = 58
      Width = 70
      Height = 16
      AutoSize = False
      Caption = #20892'        '#21382':'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clMaroon
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label3: TLabel
      Left = 5
      Top = 84
      Width = 70
      Height = 16
      AutoSize = False
      Caption = #24178'  '#25903'  '#21382':'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clMaroon
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label7: TLabel
      Left = 5
      Top = 110
      Width = 70
      Height = 16
      AutoSize = False
      Caption = #20844#21382#33410#26085':'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clMaroon
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label9: TLabel
      Left = 5
      Top = 136
      Width = 70
      Height = 16
      AutoSize = False
      Caption = #20892#21382#33410#26085':'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clMaroon
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object SpinEdit1: TSpinEdit
      Left = 81
      Top = 29
      Width = 57
      Height = 22
      Anchors = []
      AutoSize = False
      Ctl3D = True
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clMaroon
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      MaxValue = 2500
      MinValue = 1900
      ParentColor = True
      ParentCtl3D = False
      ParentFont = False
      TabOrder = 0
      Value = 2004
      OnKeyDown = SpinEdit1KeyDown
    end
    object SpinEdit2: TSpinEdit
      Left = 138
      Top = 29
      Width = 39
      Height = 22
      AutoSize = False
      Ctl3D = True
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clMaroon
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      MaxValue = 12
      MinValue = 1
      ParentColor = True
      ParentCtl3D = False
      ParentFont = False
      TabOrder = 1
      Value = 10
      OnKeyDown = SpinEdit1KeyDown
    end
    object SpinEdit3: TSpinEdit
      Left = 177
      Top = 29
      Width = 39
      Height = 22
      AutoSize = False
      Ctl3D = True
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clMaroon
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      MaxValue = 32
      MinValue = 1
      ParentColor = True
      ParentCtl3D = False
      ParentFont = False
      TabOrder = 2
      Value = 10
      OnKeyDown = SpinEdit1KeyDown
    end
    object Edit1: TEdit
      Left = 81
      Top = 58
      Width = 136
      Height = 19
      AutoSelect = False
      AutoSize = False
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clMaroon
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentColor = True
      ParentFont = False
      ReadOnly = True
      TabOrder = 4
    end
    object Edit2: TEdit
      Left = 81
      Top = 85
      Width = 136
      Height = 19
      AutoSelect = False
      AutoSize = False
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clMaroon
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentColor = True
      ParentFont = False
      ReadOnly = True
      TabOrder = 5
    end
    object Edit4: TEdit
      Left = 221
      Top = 58
      Width = 46
      Height = 19
      AutoSelect = False
      AutoSize = False
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clMaroon
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentColor = True
      ParentFont = False
      ReadOnly = True
      TabOrder = 6
    end
    object Edit5: TEdit
      Left = 221
      Top = 85
      Width = 46
      Height = 19
      AutoSelect = False
      AutoSize = False
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clMaroon
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentColor = True
      ParentFont = False
      ReadOnly = True
      TabOrder = 7
    end
    object Edit6: TEdit
      Left = 221
      Top = 28
      Width = 46
      Height = 22
      AutoSelect = False
      AutoSize = False
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clMaroon
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentColor = True
      ParentFont = False
      ReadOnly = True
      TabOrder = 3
    end
    object Edit11: TEdit
      Left = 81
      Top = 111
      Width = 186
      Height = 19
      AutoSelect = False
      AutoSize = False
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clMaroon
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentColor = True
      ParentFont = False
      ReadOnly = True
      TabOrder = 8
    end
    object Edit12: TEdit
      Left = 82
      Top = 137
      Width = 185
      Height = 19
      AutoSelect = False
      AutoSize = False
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clMaroon
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentColor = True
      ParentFont = False
      ReadOnly = True
      TabOrder = 9
    end
  end
  object GroupBox2: TGroupBox
    Left = 2
    Top = 168
    Width = 277
    Height = 171
    Caption = #20892#21382#65309#12299#20844#21382#12289#24178#25903#21382
    Ctl3D = True
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clNavy