object FormDateTimeEditor: TFormDateTimeEditor Left = 389 Top = 280 BorderIcons = [] BorderStyle = bsNone Caption = 'Kalend��' ClientHeight = 169 ClientWidth = 303 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -10 Font.Name = 'MS Sans Serif' Font.Style = [] KeyPreview = True OldCreateOrder = True OnKeyDown = FormKeyDown PixelsPerInch = 96 TextHeight = 13 object PanelMain: TPanel Left = 0 Top = 0 Width = 303 Height = 169 Align = alClient Ctl3D = True ParentColor = True ParentCtl3D = False TabOrder = 0 object LabelInfo2: TLabel Left = 38 Top = 144 Width = 143 Height = 13 AutoSize = False Caption = 'LabelInfo2' end object BtnPrevYear: TSpeedButton Left = 5 Top = 5 Width = 22 Height = 22 Hint = 'P�edchoz� rok (Ctrl+PgDn)' Glyph.Data = { DE000000424DDE0000000000000076000000280000000D0000000D0000000100 0400000000006800000000000000000000001000000010000000000000000000 8000008000000080800080000000800080008080000080808000C0C0C0000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00EEEEEEEEEEEE E000EEEEE0EEEEEE0000EEEE00EEEEE00000EEE000EEEE000000EE0000EEE000 0000E00000EE00000000000000E000000000E00000EE00000000EE0000EEE000 0000EEE000EEEE000000EEEE00EEEEE00000EEEEE0EEEEEE0000EEEEEEEEEEEE E000} Layout = blGlyphRight ParentShowHint = False ShowHint = True OnClick = BtnPrevYearClick end object BtnPrevMonth: TSpeedButton Left = 28 Top = 5 Width = 22 Height = 22 Hint = 'P�edchoz� m�s�c (PgDn)' Glyph.Data = { DE000000424DDE0000000000000076000000280000000D0000000D0000000100 0400000000006800000000000000000000001000000010000000000000000000 8000008000000080800080000000800080008080000080808000C0C0C0000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00EEEEEEEEEEEE E000EEEEEEEE0EEEE000EEEEEEE00EEEE000EEEEEE000EEEE000EEEEE0000EEE E000EEEE00000EEEE000EEE000000EEEE000EEEE00000EEEE000EEEEE0000EEE E000EEEEEE000EEEE000EEEEEEE00EEEE000EEEEEEEE0EEEE000EEEEEEEEEEEE E000} Layout = blGlyphRight ParentShowHint = False ShowHint = True OnClick = BtnPrevMonthClick end object NextMonth: TSpeedButton Left = 193 Top = 5 Width = 22 Height = 22 Hint = 'N�sleduj�c� m�s�c (PgUp)' Glyph.Data = { DE000000424DDE0000000000000076000000280000000D0000000D0000000100 0400000000006800000000000000000000001000000010000000000000000000 8000008000000080800080000000800080008080000080808000C0C0C0000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00EEEEEEEEEEEE E000EEEE0EEEEEEEE000EEEE00EEEEEEE000EEEE000EEEEEE000EEEE0000EEEE E000EEEE00000EEEE000EEEE000000EEE000EEEE00000EEEE000EEEE0000EEEE E000EEEE000EEEEEE000EEEE00EEEEEEE000EEEE0EEEEEEEE000EEEEEEEEEEEE E000} Layout = blGlyphRight ParentShowHint = False ShowHint = True OnClick = NextMonthClick end object BtnNextYear: TSpeedButton Left = 216 Top = 5 Width = 22 Height = 22 Hint = 'N�sleduj�c� rok (Ctrl+PgUp)' Glyph.Data = { DE000000424DDE0000000000000076000000280000000D0000000D0000000100 0400000000006800000000000000000000001000000010000000000000000000 8000008000000080800080000000800080008080000080808000C0C0C0000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00EEEEEEEEEEEE E0000EEEEEE0EEEEE00000EEEEE00EEEE000000EEEE000EEE0000000EEE0000E E00000000EE00000E000000000E00000000000000EE00000E0000000EEE0000E E000000EEEE000EEE00000EEEEE00EEEE0000EEEEEE0EEEEE000EEEEEEEEEEEE E000} Layout = blGlyphRight ParentShowHint = False ShowHint = True OnClick = BtnNextYearClick end object LabelInfo1: TLabel Left = 56 Top = 9 Width = 133 Height = 13 Alignment = taCenter AutoSize = False Caption = 'LabelInfo1' Font.Charset = DEFAULT_CHARSET Font.Color = clNavy Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object BtnOk: TSpeedButton Left = 193 Top = 140 Width = 22 Height = 22 Hint = 'Potvrdit (Enter)' Glyph.Data = { DE000000424DDE0000000000000076000000280000000D0000000D0000000100 0400000000006800000000000000000000001000000010000000000000000000 8000008000000080800080000000800080008080000080808000C0C0C0000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888 8000888882208888800088882220888880008882222208888000882228220888 8000822288822088800082288882208880008888888822088000888888882208 8000888888888220800088888888822080008888888888228000888888888888 8000} Layout = blGlyphRight ParentShowHint = False ShowHint = True end object BtnCancel: TSpeedButton Left = 216 Top = 140 Width = 22 Height = 22 Hint = 'Storno (Esc)' Glyph.Data = { DE000000424DDE0000000000000076000000280000000D0000000D0000000100 0400000000006800000000000000000000001000000010000000000000000000 8000008000000080800080000000800080008080000080808000C0C0C0000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00EEEEEEEEEEEE E000EEEEEEEEEEEEE000EE117EEEE11EE000EE1117EE111EE000EEE1117111EE E000EEEE11111EEEE000EEEEE1117EEEE000EEEE111117EEE000EEE111E1117E E000EE111EEE111EE000EE11EEEEE11EE000EEEEEEEEEEEEE000EEEEEEEEEEEE E000} Layout = blGlyphRight ParentShowHint = False ShowHint = True end object BtnToday: TSpeedButton Left = 5 Top = 140 Width = 22 Height = 22 Hint = 'P�ej�t k dne�ku (Home)' Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 0400000000000001000000000000000000001000000010000000000000000000 8000008000000080800080000000800080008080000080808000C0C0C0000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555550555 555555555555F55555555505555B0555570555F55557F55555F55B50555B0555 7B55575F5557F555575555B5055B5557B5555575F55755557555555B5550005B 55555557555FFF575555555555BBB0055555555555777FF5555555555BBBBB00 55555555577777FF55555000BBBBBBB050005FFF7777777F5FFFBBB5BBBBBBB0 BBB577757777777F77755555BBBBBBB55555555577777775555555555BBBBB55 55555555577777555555555705BBB55505555555F5777555F555557B5555055B 505555575555F5575F5557B5555B0555B50555755557F55575F55B55555B0555 5B5557555557F55557555555555B555555555555555755555555} Layout = blGlyphRight NumGlyphs = 2 ParentShowHint = False ShowHint = True OnClick = TodayClick end object Bevel1: TBevel Left = 245 Top = 4 Width = 5 Height = 160 Shape = bsLeftLine end object Calendar: TCalendarPlus Left = 5 Top = 32 Width = 235 Height = 101 StartOfWeek = 1 TabOrder = 0 UseCurrentDate = False OnChange = CalendarChange end object TimeBar: TTimeBar Left = 252 Top = 4 Width = 45 Height = 160 Color = clInfoBk Font.Charset = DEFAULT_CHARSET Font.Color = clGray Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentColor = False ParentFont = False TabOrder = 1 TabStop = True end end end