object Form10: TForm10 Left = 213 Top = 140 HelpContext = 137 AutoScroll = False BorderWidth = 5 Caption = 'Import dat' ClientHeight = 466 ClientWidth = 671 Color = clBtnFace Constraints.MinHeight = 450 Constraints.MinWidth = 681 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] HelpFile = '.\DATA\napoveda.hlp' KeyPreview = True OldCreateOrder = False Position = poMainFormCenter OnClose = FormClose OnKeyDown = FormKeyDown OnResize = FormResize OnShow = FormShow PixelsPerInch = 96 TextHeight = 13 object Label1: TLabel Left = 208 Top = 140 Width = 26 Height = 13 Caption = 'Pole' Font.Charset = DEFAULT_CHARSET Font.Color = clNavy Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False Transparent = True end object Label2: TLabel Left = 208 Top = 164 Width = 54 Height = 13 Caption = 'Import do' Font.Charset = DEFAULT_CHARSET Font.Color = clNavy Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False Transparent = True end object Label3: TLabel Left = 512 Top = 4 Width = 91 Height = 13 Caption = 'Sch'#233'ma importu' Font.Charset = DEFAULT_CHARSET Font.Color = clNavy Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False Transparent = True end object Label4: TLabel Left = 8 Top = 227 Width = 5 Height = 13 Font.Charset = DEFAULT_CHARSET Font.Color = clMaroon Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False Transparent = True end object RadioGroup1: TRadioGroup Left = 8 Top = 8 Width = 185 Height = 114 Caption = ' Form'#225't zdroje ' ItemIndex = 0 Items.Strings = ( 'TXT - st'#345'edn'#237'k jako odd'#283'lova'#269 'CSV - '#269#225'rka jako odd'#283'lova'#269 'TXT - tabul'#225'tor jako odd'#283'lova'#269) TabOrder = 0 end object Button1: TButton Left = 8 Top = 144 Width = 57 Height = 49 Cursor = crUpArrow Caption = '&Zdroj' TabOrder = 2 OnClick = Button1Click end object Button2: TButton Left = 72 Top = 144 Width = 57 Height = 49 Cursor = crUpArrow Caption = '&Uk'#225'zka' TabOrder = 3 OnClick = Button2Click end object Button3: TButton Left = 584 Top = 136 Width = 75 Height = 49 Cursor = crUpArrow Caption = '&Import' TabOrder = 13 OnClick = Button3Click end object ComboBox1: TComboBox Left = 280 Top = 136 Width = 217 Height = 21 BevelKind = bkFlat Style = csDropDownList Ctl3D = True ItemHeight = 13 ParentCtl3D = False TabOrder = 6 end object ComboBox2: TComboBox Left = 280 Top = 160 Width = 217 Height = 21 BevelKind = bkFlat Style = csDropDownList ItemHeight = 13 TabOrder = 7 Items.Strings = ( 'titul' 'jm'#233'no' 'p'#345#237'jmen'#237 'firma' 'funkce' 'IC' 'DIC' 'internet' 'e-mail 1' 'e-mail 2' 'e-mail 3' 'pozn'#225'mka' 'TEL mobil 1' 'TEL mobil 2' 'TEL dom'#367' 1' 'TEL dom'#367' 2' 'TEL firma 1' 'TEL firma 2' 'adresa dom'#367': Ulice' 'adresa dom'#367': '#268'P' 'adresa dom'#367': Obec' 'adresa dom'#367': '#268#225'st' 'adresa dom'#367': PS'#268 'adresa dom'#367': St'#225't' 'adresa firma: Ulice' 'adresa firma: '#268'P' 'adresa firma: Obec' 'adresa firma: '#268#225'st' 'adresa firma: PS'#268 'adresa firma: St'#225't' 'adresa jin'#233': Ulice' 'adresa jin'#233': '#268'P' 'adresa jin'#233': Obec' 'adresa jin'#233': '#268#225'st' 'adresa jin'#233': PS'#268 'adresa jin'#233': St'#225't') end object ValueListEditor1: TValueListEditor Left = 208 Top = 8 Width = 289 Height = 114 Ctl3D = False Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goColSizing, goEditing, goRowSelect, goThumbTracking] ParentCtl3D = False Strings.Strings = ( '=') TabOrder = 14 TitleCaptions.Strings = ( ' Pole' ' Import do') OnSelectCell = ValueListEditor1SelectCell ColWidths = ( 142 143) end object Button4: TButton Left = 280 Top = 192 Width = 73 Height = 25 Cursor = crUpArrow Caption = '&P'#345'idat' TabOrder = 8 OnClick = Button4Click end object Button5: TButton Left = 352 Top = 192 Width = 73 Height = 25 Cursor = crUpArrow Caption = '&Odebrat' TabOrder = 9 OnClick = Button5Click end object Button7: TButton Left = 512 Top = 24 Width = 49 Height = 25 Cursor = crUpArrow Caption = 'Ot&ev'#345#237't' TabOrder = 5 OnClick = Button7Click end object ComboBox3: TComboBox Left = 512 Top = 56 Width = 145 Height = 21 BevelKind = bkFlat Style = csDropDownList ItemHeight = 13 TabOrder = 4 end object Button6: TButton Left = 560 Top = 24 Width = 49 Height = 25 Cursor = crUpArrow Caption = 'U&lo'#382'it' TabOrder = 11 OnClick = Button6Click end object Button8: TButton Left = 608 Top = 24 Width = 49 Height = 25 Cursor = crUpArrow Caption = '&Smazat' TabOrder = 12 OnClick = Button8Click end object Button9: TButton Left = 424 Top = 192 Width = 73 Height = 25 Cursor = crUpArrow Caption = 'Op&ravit' TabOrder = 10 OnClick = Button9Click end object CheckBox1: TCheckBox Left = 8 Top = 200 Width = 217 Height = 17 Caption = 'prvn'#237' '#345#225'dka p'#345'edstavuje n'#225'zvy sloupc'#367 Checked = True State = cbChecked TabOrder = 1 OnClick = CheckBox1Click end object StringGrid1: TStringGrid Left = 0 Top = 248 Width = 671 Height = 218 Align = alBottom Anchors = [akLeft, akTop, akRight, akBottom] ColCount = 6 Ctl3D = False DefaultColWidth = 120 DefaultRowHeight = 16 FixedCols = 0 RowCount = 2 Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goColSizing, goRowSelect] ParentCtl3D = False TabOrder = 15 end object Button10: TButton Left = 584 Top = 192 Width = 75 Height = 25 Cursor = crUpArrow Caption = 'Zp'#283'&t' TabOrder = 16 OnClick = Button10Click end object OpenDialog1: TOpenDialog DefaultExt = 'csv' Filter = 'CSV|*.csv;*.txt' Options = [ofReadOnly, ofHideReadOnly, ofPathMustExist, ofFileMustExist, ofEnableSizing] OptionsEx = [ofExNoPlacesBar] Title = 'Import CSV' Left = 160 end end