object SubDate1: TSubDate1 Left = 288 Top = 161 Width = 224 Height = 250 Caption = '�\����̑}��' Font.Color = clWindowText Font.Height = -12 Font.Name = '�l�r �o�S�V�b�N' Font.Style = [] Position = poScreenCenter PixelsPerInch = 96 TextHeight = 12 object Label1: TLabel Left = 16 Top = 8 Width = 12 Height = 12 Caption = '�N' end object Label2: TLabel Left = 104 Top = 8 Width = 12 Height = 12 Caption = '��' end object Label3: TLabel Left = 160 Top = 8 Width = 12 Height = 12 Caption = '��' end object Label4: TLabel Left = 16 Top = 88 Width = 24 Height = 12 Caption = '����' end object SE_d: TSpinEdit Left = 160 Top = 24 Width = 41 Height = 21 MaxValue = 31 MinValue = 1 TabOrder = 2 Value = 1 end object SE_m: TSpinEdit Left = 104 Top = 24 Width = 41 Height = 21 MaxValue = 12 MinValue = 1 TabOrder = 1 Value = 3 OnChange = SE_mChange end object SE_y: TSpinEdit Left = 16 Top = 24 Width = 73 Height = 21 MaxValue = 2050 MinValue = 1000 TabOrder = 0 Value = 1997 end object btnOK: TButton Left = 16 Top = 56 Width = 89 Height = 25 Caption = '�n�@�j' Default = True TabOrder = 3 OnClick = btnOKClick end object btnCancel: TButton Left = 112 Top = 56 Width = 89 Height = 25 Cancel = True Caption = 'Cancel' TabOrder = 4 OnClick = btnCancelClick end object ListBox1: TListBox Left = 16 Top = 104 Width = 185 Height = 81 ItemHeight = 12 Items.Strings = ( '�i�Ȃ��j' '���ƁE�E�E��' '�܂ŁE�E�E��' '�܂ł��ƁE�E�E��' '�́E�E�E����' '�͂��ƁE�E�E����') TabOrder = 5 OnDblClick = ListBox1DblClick end object CB_Date: TCheckBox Left = 16 Top = 200 Width = 185 Height = 17 Caption = '���̓��t��tⳎ��̊����ɐݒ�' TabOrder = 6 end end