object Pocdni: TPocdni Left = 216 Top = 224 HelpContext = 20 BorderIcons = [biSystemMenu] BorderStyle = bsSingle Caption = 'Nastaven� po�tu dn�' ClientHeight = 201 ClientWidth = 377 Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] OnClose = FormClose OnCreate = FormCreate OnDestroy = FormDestroy PixelsPerInch = 96 TextHeight = 13 object Label7: TLabel Left = 0 Top = 173 Width = 217 Height = 17 Alignment = taCenter AutoSize = False Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object Panel2: TPanel Left = 11 Top = 3 Width = 172 Height = 154 BorderStyle = bsSingle Caption = 'Panel2' TabOrder = 0 object Label4: TLabel Left = 2 Top = 126 Width = 67 Height = 14 Alignment = taCenter AutoSize = False Caption = 'Mesic' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object Label5: TLabel Left = 92 Top = 127 Width = 41 Height = 13 Alignment = taCenter AutoSize = False Caption = 'Rok' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object Label3: TLabel Left = 16 Top = 6 Width = 56 Height = 13 Caption = 'Datum od' Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object Calendar: TCalendar Left = 1 Top = 24 Width = 164 Height = 94 TabStop = False StartOfWeek = 1 TabOrder = 1 OnChange = CalendarChange OnKeyPress = CalendarKeyPress end object SpinButton1: TSpinButton Left = 70 Top = 121 Width = 20 Height = 25 DownGlyph.Data = { 92000000424D9200000000000000760000002800000007000000070000000100 0400000000001C00000000000000000000001000000010000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFFF0 FFFFFF000FFFF00000FF0000000FFFFFFFFFFFFFFFFF} TabOrder = 0 UpGlyph.Data = { 92000000424D9200000000000000760000002800000007000000070000000100 0400000000001C00000000000000000000001000000010000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFFFF FFFF0000000FF00000FFFF000FFFFFF0FFFFFFFFFFFF} OnDownClick = SpinButton1DownClick OnUpClick = SpinButton1UpClick end object Edit1: TEdit Left = 93 Top = 2 Width = 72 Height = 21 TabStop = False Font.Color = clRed Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False TabOrder = 2 end object SpinButton3: TSpinButton Left = 134 Top = 121 Width = 20 Height = 25 DownGlyph.Data = { 92000000424D9200000000000000760000002800000007000000070000000100 0400000000001C00000000000000000000001000000010000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFFF0 FFFFFF000FFFF00000FF0000000FFFFFFFFFFFFFFFFF} TabOrder = 3 UpGlyph.Data = { 92000000424D9200000000000000760000002800000007000000070000000100 0400000000001C00000000000000000000001000000010000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFFFF FFFF0000000FF00000FFFF000FFFFFF0FFFFFFFFFFFF} OnDownClick = SpinButton3DownClick OnUpClick = SpinButton3UpClick end end object Panel1: TPanel Left = 196 Top = 4 Width = 172 Height = 154 BorderStyle = bsSingle Caption = 'Panel2' TabOrder = 1 object Label1: TLabel Left = 1 Top = 126 Width = 67 Height = 14 Alignment = taCenter AutoSize = False Caption = 'Mesic' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object Label2: TLabel Left = 89 Top = 127 Width = 41 Height = 13 Alignment = taCenter AutoSize = False Caption = 'Rok' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object Label6: TLabel Left = 20 Top = 6 Width = 55 Height = 13 Caption = 'Datum do' Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object Calendar1: TCalendar Left = 1 Top = 24 Width = 164 Height = 94 TabStop = False StartOfWeek = 1 TabOrder = 1 OnChange = Calendar1Change OnKeyPress = Calendar1KeyPress end object SpinButton2: TSpinButton Left = 69 Top = 121 Width = 20 Height = 25 DownGlyph.Data = { 92000000424D9200000000000000760000002800000007000000070000000100 0400000000001C00000000000000000000001000000010000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFFF0 FFFFFF000FFFF00000FF0000000FFFFFFFFFFFFFFFFF} TabOrder = 0 UpGlyph.Data = { 92000000424D9200000000000000760000002800000007000000070000000100 0400000000001C00000000000000000000001000000010000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFFFF FFFF0000000FF00000FFFF000FFFFFF0FFFFFFFFFFFF} OnDownClick = SpinButton2DownClick OnUpClick = SpinButton2UpClick end object Edit2: TEdit Left = 93 Top = 2 Width = 72 Height = 21 TabStop = False Font.Color = clRed Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False TabOrder = 2 end object SpinButton4: TSpinButton Left = 135 Top = 121 Width = 20 Height = 25 DownGlyph.Data = { 92000000424D9200000000000000760000002800000007000000070000000100 0400000000001C00000000000000000000001000000010000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFFF0 FFFFFF000FFFF00000FF0000000FFFFFFFFFFFFFFFFF} TabOrder = 3 UpGlyph.Data = { 92000000424D9200000000000000760000002800000007000000070000000100 0400000000001C00000000000000000000001000000010000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFFFF FFFF0000000FF00000FFFF000FFFFFF0FFFFFFFFFFFF} OnDownClick = SpinButton4DownClick OnUpClick = SpinButton4UpClick end end object Button1: TButton Left = 223 Top = 168 Width = 70 Height = 25 Caption = 'OK' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False TabOrder = 2 OnClick = Button1Click end object Button2: TButton Left = 301 Top = 168 Width = 66 Height = 25 Cancel = True Caption = '&Opustit' TabOrder = 3 OnClick = Button2Click end object MSOfficeCaption1: TMSOfficeCaption AppNameText.FontKind = fkSystemB AppNameText.Visible = True CaptionText.Caption = 'Nastaven� po�tu dn�' CaptionText.ColorActive = clYellow CaptionText.ColorInactive = clGray CaptionText.FontKind = fkSystem CaptionText.Visible = True CompanyText.FontKind = fkSystemBI CompanyText.Visible = True Left = 344 end end