home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Chip 2004 July
/
Chip_2004-07_cd1.bin
/
servis
/
cztel
/
ct2004s.exe
/
0
/
RCDATA
/
TFORM10
/
TFORM10.txt
Wrap
Text File
|
2004-05-20
|
7KB
|
321 lines
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