home *** CD-ROM | disk | FTP | other *** search
- 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
-