home *** CD-ROM | disk | FTP | other *** search
- object frmFav: TfrmFav
- Left = 325
- Top = 275
- Width = 457
- Height = 279
- HelpContext = 121
- BorderIcons = [biSystemMenu]
- Caption = 'Favorite Archive Folders'
- Color = clBtnFace
- Constraints.MinHeight = 279
- Constraints.MinWidth = 457
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- OldCreateOrder = False
- OnActivate = FormActivate
- OnCreate = FormCreate
- OnResize = FormResize
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 13
- object StatusBar2: TStatusBar
- Left = 0
- Top = 233
- Width = 449
- Height = 19
- Panels = <
- item
- Bevel = pbNone
- Width = 50
- end>
- SimplePanel = False
- end
- object Panel1: TPanel
- Left = 367
- Top = 0
- Width = 82
- Height = 233
- Align = alRight
- BevelOuter = bvNone
- TabOrder = 1
- object Button1: TButton
- Left = 0
- Top = 8
- Width = 75
- Height = 25
- Caption = '&Open'
- Default = True
- TabOrder = 0
- OnClick = lvListDblClick
- end
- object Button2: TButton
- Left = 0
- Top = 72
- Width = 75
- Height = 25
- Caption = '&Search'
- TabOrder = 1
- OnClick = Button2Click
- end
- object Button3: TButton
- Left = 0
- Top = 40
- Width = 75
- Height = 25
- Cancel = True
- Caption = 'Cancel'
- ModalResult = 2
- TabOrder = 2
- end
- object Button4: TButton
- Left = 0
- Top = 120
- Width = 75
- Height = 25
- Caption = 'O&ptions...'
- TabOrder = 3
- OnClick = Button4Click
- end
- object btnHelp: TButton
- Left = 0
- Top = 152
- Width = 75
- Height = 25
- Caption = '&Help'
- TabOrder = 4
- OnClick = btnHelpClick
- end
- end
- object Panel2: TPanel
- Left = 0
- Top = 0
- Width = 367
- Height = 233
- Align = alClient
- BevelOuter = bvNone
- Caption = 'Panel2'
- TabOrder = 2
- object Label1: TLabel
- Left = 8
- Top = 213
- Width = 59
- Height = 13
- Caption = 'Files of &type:'
- FocusControl = cboType
- end
- object Label2: TLabel
- Left = 8
- Top = 16
- Width = 48
- Height = 13
- Caption = 'File name:'
- FocusControl = lvList
- end
- object lblPath: TPathLabel
- Left = 64
- Top = 16
- Width = 289
- Height = 13
- AutoSize = False
- end
- object cboType: TComboBox
- Left = 104
- Top = 168
- Width = 241
- Height = 22
- Style = csOwnerDrawFixed
- Enabled = False
- ItemHeight = 16
- TabOrder = 0
- OnChange = cboTypeChange
- Items.Strings = (
- 'Blak Hole files'
- 'Cab files'
- 'GZip files'
- 'Jar files'
- 'Lha files'
- 'Lzh files'
- 'Tar files'
- 'Zip files')
- end
- object lvList: TdfsEnhListView
- Left = 8
- Top = 40
- Width = 353
- Height = 158
- AutoColumnSort = acsSortToggle
- AutoResort = False
- NoColumnResize = False
- ShowSortArrows = True
- OnDblClick = lvListDblClick
- Columns = <
- item
- Caption = 'Name'
- Width = 100
- end
- item
- Caption = 'Modified'
- Width = 100
- end
- item
- Caption = 'Folder'
- Width = 130
- end>
- ReadOnly = True
- OnChange = lvListChange
- OnSelectItem = lvListSelectItem
- TabOrder = 1
- ViewStyle = vsReport
- SmallImages = frmMain.sysSmallImages
- end
- object cboArctype: TComboBox
- Left = 80
- Top = 208
- Width = 281
- Height = 21
- Style = csDropDownList
- ItemHeight = 13
- TabOrder = 2
- OnChange = cboArctypeChange
- Items.Strings = (
- 'All archives'
- 'Encoded files'
- 'Zip files'
- 'Ace files'
- 'Arc files'
- 'Arj files'
- 'Bh files'
- 'Cab files'
- 'GZip files'
- 'Jar files'
- 'Lha files'
- 'Pak files'
- 'Rar files'
- 'Tar files'
- 'Zoo files')
- end
- end
- object FormCenter1: TFormCenter
- Center = True
- Left = 416
- Top = 160
- end
- object Search: TFileSearch
- Stop = True
- OnFileFind = SearchFileFind
- OnChangeFolder = SearchChangeFolder
- OnFinish = SearchFinish
- Left = 336
- Top = 8
- end
- object Scanner: TDADirScan
- OnDirFound = ScannerDirFound
- OnFileFound = ScannerFileFound
- Levels = 50
- RecursiveScan = False
- CompleteData = False
- Left = 304
- Top = 8
- end
- object Holder: TStrHolder
- Macros = <>
- Left = 272
- Top = 8
- InternalVer = 1
- end
- end
-