object WildCards: TWildCards Left = 145 Top = 81 Width = 498 Height = 335 Caption = 'WildCards' Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] PixelsPerInch = 96 TextHeight = 13 object OK: TButton Left = 392 Top = 280 Width = 75 Height = 25 Caption = '&OK' Default = True TabOrder = 0 end object Notebook: TNotebook Left = 0 Top = 0 Width = 490 Height = 308 Align = alClient PageIndex = 2 TabOrder = 1 object TPage Left = 0 Top = 0 Caption = 'Welcome' object Label1: TLabel Left = 168 Top = 56 Width = 321 Height = 41 AutoSize = False Caption = 'Search Wizard will search through files on your disk looking for' + ' the strings which you specify.' end object Label2: TLabel Left = 168 Top = 116 Width = 377 Height = 17 AutoSize = False Caption = 'To begin click "Next".' end object Label7: TLabel Left = 168 Top = 16 Width = 170 Height = 29 Caption = 'Search Wizard' Font.Color = clBlack Font.Height = -24 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end end object TPage Left = 0 Top = 0 Caption = 'Directory' object Label5: TLabel Left = 168 Top = 56 Width = 321 Height = 49 AutoSize = False Caption = 'Search Wizard will only report on files found in this this folde' + 'r and all its sub folders. If you want to search your entire har' + 'd disk, put "C:\" here, and check the box.' end object Label6: TLabel Left = 168 Top = 16 Width = 175 Height = 29 Caption = 'Starting Folder' Font.Color = clBlack Font.Height = -24 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object RootDirectory: TEdit Left = 168 Top = 104 Width = 249 Height = 21 TabOrder = 0 Text = 'C:\' end object BtnBrowse: TButton Left = 424 Top = 104 Width = 65 Height = 21 Caption = 'Browse...' TabOrder = 1 end object recurseSubDirectories: TCheckBox Left = 168 Top = 144 Width = 257 Height = 17 Caption = 'Search Other Folders Contained In This One' TabOrder = 2 end end object TPage Left = 0 Top = 0 Caption = 'Depth' object searchString: TEdit Left = 168 Top = 104 Width = 273 Height = 21 TabOrder = 0 Text = 'searchString' end object Memo3: TMemo Left = 0 Top = 0 Width = 490 Height = 265 Align = alTop Font.Color = clBlack Font.Height = -13 Font.Name = 'Courier New' Font.Style = [] Lines.Strings = ( '* matches any sequence of characters.' '? matches any single character.' '+ matches zero or more occurrences of the ' ' character which precedes it.' '^ matches the beginning of a line' '$ matches the end of a line' '@ matches any alphabetic or numeric character' '\ makes the wild character which follows it into a ' ' literal character') ParentFont = False ReadOnly = True TabOrder = 1 end end object TPage Left = 0 Top = 0 Caption = 'Size' object Label12: TLabel Left = 168 Top = 16 Width = 52 Height = 29 Caption = 'Size' Font.Color = clBlack Font.Height = -24 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object Label13: TLabel Left = 168 Top = 56 Width = 321 Height = 33 AutoSize = False Caption = 'Only those directories which are larger than the specified size ' + 'will be liste in the report.' end object Label14: TLabel Left = 168 Top = 88 Width = 321 Height = 33 AutoSize = False Caption = 'You might restrict the size to 1000K, so only those directories ' + 'which are larger than 1Mb are listed in the report.' end object Size: TEdit Left = 168 Top = 192 Width = 97 Height = 21 TabOrder = 0 Text = '0' end end object TPage Left = 0 Top = 0 Caption = 'Sectors' object Label15: TLabel Left = 168 Top = 16 Width = 135 Height = 29 Caption = 'Sector Size' Font.Color = clBlack Font.Height = -24 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object Label16: TLabel Left = 168 Top = 56 Width = 321 Height = 49 AutoSize = False Caption = 'Space on your disks is actually divided into '#39'chunks'#39' called sec' + 'tors. When files are allocated space, they are given it in whole' + ' sectors, even if they only need part of one.' end object Label17: TLabel Left = 168 Top = 104 Width = 321 Height = 33 AutoSize = False Caption = 'Because of this the total space used by your files will usually ' + 'take up more space than the simple total of their specified size' + 's.' end object Label18: TLabel Left = 168 Top = 144 Width = 321 Height = 41 AutoSize = False Caption = 'Checking this option will tell the Wizard to take sector size in' + 'to account when calculating the amount of disk space used by you' + 'r files.' end object LabelSectorSize: TLabel Left = 176 Top = 232 Width = 89 Height = 13 Caption = 'Sector Size (Bytes)' end object SectorSize: TEdit Left = 272 Top = 224 Width = 97 Height = 21 TabOrder = 0 Text = '0' end object UseSectorSize: TCheckBox Left = 184 Top = 200 Width = 185 Height = 17 Caption = 'Consider Sector Size' TabOrder = 1 end end object TPage Left = 0 Top = 0 Caption = 'Finish' object ImageFlag: TImage Left = 16 Top = 16 Width = 200 Height = 250 Picture.Data = {} end object Label3: TLabel Left = 240 Top = 102 Width = 241 Height = 31 AutoSize = False Caption = 'The Wizard now has enough information to complete the task.' end object Label4: TLabel Left = 240 Top = 142 Width = 241 Height = 19 AutoSize = False Caption = 'Click on the finish button to complete the task.' end end end end