object FHrana: TFHrana Left = 260 Top = 439 BorderStyle = bsDialog Caption = 'FHrana' ClientHeight = 245 ClientWidth = 444 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Position = poScreenCenter OnShow = FormShow PixelsPerInch = 96 TextHeight = 13 object Label1: TLabel Left = 20 Top = 120 Width = 40 Height = 13 Caption = 'Zna�en�' end object GroupBox2: TGroupBox Left = 10 Top = 16 Width = 199 Height = 185 Caption = 'Spojen�' TabOrder = 0 object Label5: TLabel Left = 12 Top = 24 Width = 63 Height = 13 Caption = 'Vzd�lenost' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object Label6: TLabel Left = 12 Top = 52 Width = 27 Height = 13 Caption = 'Cesta' end object Label8: TLabel Left = 164 Top = 26 Width = 17 Height = 13 Caption = 'km' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object Label10: TLabel Left = 12 Top = 144 Width = 50 Height = 13 Caption = 'Pozn�mka' end object Label7: TLabel Left = 12 Top = 72 Width = 53 Height = 33 AutoSize = False Caption = 'Zna�en� 1 (cyklo)' WordWrap = True end object Label11: TLabel Left = 12 Top = 100 Width = 53 Height = 29 AutoSize = False Caption = 'Zna�en� 2 (p��)' WordWrap = True end object EDelka: TEdit Left = 80 Top = 23 Width = 81 Height = 21 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] MaxLength = 4 ParentFont = False TabOrder = 0 OnChange = EDelkaChange OnKeyPress = EDelkaKeyPress end object CCesta: TComboBox Left = 80 Top = 50 Width = 105 Height = 21 Style = csDropDownList ItemHeight = 13 Items.Strings = ( '(nezn�m�)' 'P��' 'Lesn�/poln�' 'Vozov�' 'Silnice' 'Hlavn� silnice' 'Rychlostn� silnice' 'Motorov� silnice' 'D�lnice') TabOrder = 1 OnChange = EDelkaChange OnKeyPress = EDelkaKeyPress end object CZnaceni1: TComboBox Left = 80 Top = 76 Width = 105 Height = 21 Style = csDropDownList ItemHeight = 13 Items.Strings = ( '(Nezn�m�)' '�erven� p��' 'Modr� p��' 'Zelen� p��' '�lut� p��' '�erven� m�stn�' 'Modr� m�stn�' 'Zelen� m�stn�' '�lut� m�stn�' '�erven� cyklo' 'Modr� cyklo' 'Zelen� cyklo' '�lut� cyklo' 'Doporu�en� cyklo' 'Spojovac� cyklo' 'Cykloturistick�' 'Nau�n� stezka') TabOrder = 2 OnChange = EDelkaChange OnKeyPress = EDelkaKeyPress end object HPozn: TMemo Left = 80 Top = 127 Width = 105 Height = 50 MaxLength = 255 TabOrder = 3 WantReturns = False OnChange = EDelkaChange OnKeyPress = EDelkaKeyPress end object CZnaceni2: TComboBox Left = 80 Top = 101 Width = 105 Height = 21 Style = csDropDownList ItemHeight = 13 Items.Strings = ( '(Nezn�m�)' '�erven� p��' 'Modr� p��' 'Zelen� p��' '�lut� p��' '�erven� m�stn�' 'Modr� m�stn�' 'Zelen� m�stn�' '�lut� m�stn�' '�erven� cyklo' 'Modr� cyklo' 'Zelen� cyklo' '�lut� cyklo' 'Doporu�en� cyklo' 'Spojovac� cyklo' 'Cykloturistick�' 'Nau�n� stezka') TabOrder = 4 OnChange = EDelkaChange OnKeyPress = EDelkaKeyPress end end object Button1: TButton Left = 10 Top = 208 Width = 75 Height = 24 Caption = 'OK' TabOrder = 1 OnClick = Button1Click end object Button2: TButton Left = 113 Top = 207 Width = 75 Height = 25 Caption = 'Storno' TabOrder = 2 OnClick = Button2Click end object Preview: TPanel Left = 216 Top = 16 Width = 217 Height = 217 BevelOuter = bvLowered Caption = 'Preview' Color = 9476264 TabOrder = 3 object ImUkazka: TImage Left = 1 Top = 1 Width = 215 Height = 215 end end end