home *** CD-ROM | disk | FTP | other *** search
- object Form6: TForm6
- Left = 193
- Top = 106
- Width = 605
- Height = 431
- Caption = 'Seznam soubor�'
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- OldCreateOrder = False
- Position = poScreenCenter
- OnCreate = FormCreate
- PixelsPerInch = 96
- TextHeight = 13
- object HeaderControl1: THeaderControl
- Left = 0
- Top = 0
- Width = 597
- Height = 17
- DragReorder = False
- Sections = <
- item
- ImageIndex = -1
- Text = 'IP'
- Width = 80
- end
- item
- ImageIndex = -1
- Text = '�as'
- Width = 110
- end
- item
- ImageIndex = -1
- Text = 'Velikost [B]'
- Width = 100
- end
- item
- ImageIndex = -1
- Text = 'Soubor (URL)'
- Width = 2000
- end>
- OnSectionClick = HeaderControl1SectionClick
- OnSectionResize = HeaderControl1SectionResize
- end
- object ListBox1: TListBox
- Left = 0
- Top = 17
- Width = 597
- Height = 355
- Align = alClient
- ItemHeight = 16
- PopupMenu = PopupMenu1
- Style = lbOwnerDrawFixed
- TabOrder = 1
- OnDrawItem = ListBox1DrawItem
- OnMouseUp = ListBox1MouseUp
- end
- object Panel1: TPanel
- Left = 0
- Top = 372
- Width = 597
- Height = 32
- Align = alBottom
- BevelOuter = bvNone
- TabOrder = 2
- object Button1: TButton
- Left = 88
- Top = 4
- Width = 75
- Height = 25
- Cancel = True
- Caption = 'Zav��t'
- Default = True
- ModalResult = 2
- TabOrder = 0
- end
- object Button2: TButton
- Left = 8
- Top = 4
- Width = 75
- Height = 25
- Caption = 'Ulo�it...'
- TabOrder = 1
- OnClick = Button2Click
- end
- end
- object PopupMenu1: TPopupMenu
- AutoPopup = False
- Left = 24
- Top = 56
- object ZkoprovatURL1: TMenuItem
- Caption = 'Zkop�rovat URL'
- OnClick = ZkoprovatURL1Click
- end
- end
- object SaveDialog1: TSaveDialog
- DefaultExt = '.csv'
- Filter = 'CSV|*.csv'
- Options = [ofOverwritePrompt, ofHideReadOnly, ofPathMustExist, ofEnableSizing]
- Left = 16
- Top = 320
- end
- end
-