object Edit40: TEdit40 Left = 261 Top = 180 HelpContext = 350 BorderIcons = [biSystemMenu] BorderStyle = bsSingle Caption = '5 ze 40' ClientHeight = 162 ClientWidth = 348 Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] OnActivate = FormActivate OnClose = FormClose OnCreate = FormCreate OnDestroy = FormDestroy PixelsPerInch = 96 TextHeight = 13 object Label1: TLabel Left = 184 Top = 32 Width = 117 Height = 13 Caption = 'Zadejte ta�en� ��sla' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object Label7: TLabel Left = 256 Top = 8 Width = 51 Height = 13 Caption = 'T�den �.' Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object Button1: TButton Left = 284 Top = 128 Width = 58 Height = 25 Cancel = True Caption = '&Opustit' TabOrder = 0 OnClick = Button1Click end object Panel2: TPanel Left = 3 Top = 3 Width = 172 Height = 154 BorderStyle = bsSingle Caption = 'Panel2' TabOrder = 1 object Label4: TLabel Left = 5 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 = 112 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 Label8: TLabel Left = 5 Top = 4 Width = 71 Height = 13 Caption = '��sla ta�en�' Font.Color = clBlack 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 end object SpinButton1: TSpinButton Left = 79 Top = 120 Width = 20 Height = 26 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 DragMode = dmAutomatic Font.Color = clRed Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False ReadOnly = True TabOrder = 2 Text = 'Edit1' end end object Edit2: TEdit Left = 184 Top = 51 Width = 27 Height = 21 Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] MaxLength = 2 ParentFont = False TabOrder = 3 OnExit = Edit2Exit OnKeyPress = Edit2KeyPress end object Edit3: TEdit Left = 216 Top = 51 Width = 27 Height = 21 Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] MaxLength = 2 ParentFont = False TabOrder = 4 OnExit = Edit3Exit OnKeyPress = Edit3KeyPress end object Edit4: TEdit Left = 248 Top = 51 Width = 27 Height = 21 Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] MaxLength = 2 ParentFont = False TabOrder = 5 OnExit = Edit4Exit OnKeyPress = Edit4KeyPress end object Edit5: TEdit Left = 280 Top = 51 Width = 27 Height = 21 Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] MaxLength = 2 ParentFont = False TabOrder = 6 OnExit = Edit5Exit OnKeyPress = Edit5KeyPress end object Edit6: TEdit Left = 312 Top = 51 Width = 27 Height = 21 Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] MaxLength = 2 ParentFont = False TabOrder = 7 OnExit = Edit6Exit OnKeyPress = Edit6KeyPress end object Button2: TButton Left = 184 Top = 128 Width = 75 Height = 25 Caption = '&Ulo�it ��sla' Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False TabOrder = 8 OnClick = Button2Click end object Edit16: TEdit Left = 311 Top = 3 Width = 27 Height = 21 Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] MaxLength = 2 ParentFont = False TabOrder = 2 OnExit = Edit16Exit OnKeyPress = Edit16KeyPress end object MSOfficeCaption1: TMSOfficeCaption AppNameText.FontKind = fkSystemB AppNameText.Visible = True CaptionText.Caption = '5 ze 40' CaptionText.ColorActive = clYellow CaptionText.ColorInactive = clGray CaptionText.FontKind = fkSystem CaptionText.Visible = True CompanyText.FontKind = fkSystemBI CompanyText.Visible = True Color = clNavy Left = 192 Top = 1 end end