object FAVCalendar: TFAVCalendar Left = 486 Top = 141 BorderIcons = [biHelp] BorderStyle = bsNone Caption = 'FAVCalendar' ClientHeight = 187 ClientWidth = 203 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] KeyPreview = True OnClose = FormClose OnKeyDown = FormKeyDown OnShow = FormShow PixelsPerInch = 96 TextHeight = 13 object Image1: TImage Left = 0 Top = 0 Width = 203 Height = 187 Align = alClient Picture.Data = {} Stretch = True end object BtnLeftY: TSpeedButton Left = 7 Top = 2 Width = 23 Height = 24 Flat = True Glyph.Data = { F6000000424DF600000000000000760000002800000010000000100000000100 0400000000008000000000000000000000001000000010000000000000000000 8000008000000080800080000000800080008080000080808000C0C0C0000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888 888888888888888888888888880788880788888880B07880B07888880BB0780B B0788880BB0780BB0788880BB0780BB0788880BB0780BB0788880BB0780BB078 888880BB0780BB078888880BB0780BB078888880BB0780BB078888880BB0780B B078888880B07880B07888888807888807888888888888888888} ParentShowHint = False ShowHint = True OnClick = BtnLeftYClick end object BtnLeftM: TSpeedButton Left = 31 Top = 2 Width = 23 Height = 24 Flat = True Glyph.Data = { F6000000424DF600000000000000760000002800000010000000100000000100 0400000000008000000000000000000000001000000010000000000000000000 8000008000000080800080000000800080008080000080808000C0C0C0000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888 888888888888888888888888888880788888888888880B07888888888880BB07 88888888880BB0788888888880BB0788888888880BB0788888888880BB078888 888888880BB078888888888880BB078888888888880BB078888888888880BB07 8888888888880B07888888888888807888888888888888888888} ParentShowHint = False ShowHint = True OnClick = BtnLeftMClick end object BtnRightM: TSpeedButton Left = 141 Top = 2 Width = 23 Height = 24 Flat = True Glyph.Data = { F6000000424DF600000000000000760000002800000010000000100000000100 0400000000008000000000000000000000001000000010000000000000000000 8000008000000080800080000000800080008080000080808000C0C0C0000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888 88888888888888888888888870788888888888880B078888888888880BB07888 8888888880BB078888888888880BB078888888888880BB078888888888880BB0 788888888880BB0788888888880BB0788888888880BB0788888888880BB07888 888888880B078888888888888078888888888888888888888888} ParentShowHint = False ShowHint = True OnClick = BtnRightMClick end object BtnRightY: TSpeedButton Left = 165 Top = 2 Width = 23 Height = 24 Flat = True Glyph.Data = { F6000000424DF600000000000000760000002800000010000000100000000100 0400000000008000000000000000000000001000000010000000000000000000 8000008000000080800080000000800080008080000080808000C0C0C0000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888 88888888888888888888870788870788888880B07880B078888880BB0780BB07 8888880BB0780BB078888880BB0780BB078888880BB0780BB078888880BB0780 BB0788880BB0780BB0788880BB0780BB0788880BB0780BB0788880BB0780BB07 888880B07880B078888888078888078888888888888888888888} ParentShowHint = False ShowHint = True OnClick = BtnRightYClick end object Label1: TLabel Left = 60 Top = 7 Width = 80 Height = 18 Alignment = taCenter AutoSize = False Caption = 'Label1' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False Transparent = True end object Label2: TLabel Left = 48 Top = 154 Width = 107 Height = 16 Alignment = taCenter AutoSize = False Caption = 'Label2' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False Transparent = True end object BtnOk: TSpeedButton Left = 170 Top = 151 Width = 25 Height = 20 Flat = True Glyph.Data = { F6000000424DF600000000000000760000002800000010000000100000000100 04000000000080000000330B0000330B00001000000010000000000000000000 8000008000000080800080000000800080008080000080808000C0C0C0000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888 8888888887788888888888880077888888888880B00788888888880BBB077888 888800BBBBB0778888880BBBBBBB077888880BBB00BBB07788880BB0880BBB07 788880088880BBB07788888888880BBB077888888888870BB077888888888880 BB07888888888888700088888888888888888888888888888888} ParentShowHint = False ShowHint = True OnClick = BtnOkClick end object BtnCancel: TSpeedButton Left = 9 Top = 151 Width = 25 Height = 20 Flat = True Glyph.Data = { F6000000424DF600000000000000760000002800000010000000100000000100 04000000000080000000130B0000130B00001000000010000000000000000000 8000008000000080800080000000800080008080000080808000C0C0C0000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888 8888880007888888807880BBB0788888007880BBBB088880B07880BBBB07880B B0888800BBB070BB078888880BBB0BB07888888880BBBB078888888800BBBB07 88888800BBBBBBB0788880BBBBB00BBB078880BBBB08800BB07880BBB0888880 BB07880008888888000788888888888888888888888888888888} ParentShowHint = False ShowHint = True OnClick = BtnCancelClick end object BtnCancel2: TSpeedButton Left = 190 Top = 2 Width = 10 Height = 12 Flat = True Glyph.Data = { 92000000424D9200000000000000760000002800000007000000070000000100 0400000000001C0000000000000000000000100000001000000000000000C6C6 C600FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00111111100211 10201021021011002110110021101021021002111020} OnClick = BtnCancelClick end object Cal1: TCalendar Left = 8 Top = 27 Width = 186 Height = 120 Color = clInfoBk StartOfWeek = 0 TabOrder = 0 OnClick = Cal1Click OnChange = Cal1Change end end