object ArcPeekWindow: TArcPeekWindow
  Left = 191
  Top = 71
  Cursor = crArrow
  HorzScrollBar.Visible = False
  VertScrollBar.Visible = False
  BorderIcons = [biSystemMenu, biMinimize]
  BorderStyle = bsSingle
  Caption = 'Archive Peek'
  ClientHeight = 228
  ClientWidth = 211
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Icon.Data = {<image000.ico>}
  Menu = MainMenu1
  Position = poScreenCenter
  OnClose = FormClose
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object Label2: TLabel
    Left = 8
    Top = 160
    Width = 74
    Height = 13
    Caption = 'Files to look for:'
  end
  object Label1: TLabel
    Left = 8
    Top = 0
    Width = 74
    Height = 13
    Caption = 'Look for files in:'
  end
  object DirectoryListBox1: TDirectoryListBox
    Left = 8
    Top = 16
    Width = 193
    Height = 113
    Hint = 'Choose here the directory you want Archive Peek to search in'
    ItemHeight = 16
    TabOrder = 0
  end
  object Files: TEdit
    Left = 7
    Top = 175
    Width = 194
    Height = 21
    TabOrder = 2
    OnChange = FilesChange
    OnKeyPress = FilesKeyPress
  end
  object BeginSearch: TButton
    Left = 8
    Top = 199
    Width = 73
    Height = 25
    Hint = 'Click here to start your search'
    Caption = 'Begin search'
    Enabled = False
    TabOrder = 3
    OnClick = BeginSearchClick
  end
  object DriveComboBox1: TDriveComboBox
    Left = 8
    Top = 136
    Width = 193
    Height = 19
    Hint = 'Choose here the drive you want Archive Peek to search in'
    TabOrder = 1
    OnChange = DriveComboBox1Change
  end
  object ShowResults: TButton
    Left = 88
    Top = 199
    Width = 113
    Height = 25
    Caption = 'Show Results Window'
    TabOrder = 4
    Visible = False
    OnClick = ShowResultsClick
  end
  object MainMenu1: TMainMenu
    Left = 152
    Top = 96
    object Options1: TMenuItem
      Caption = '&Options'
      ShortCut = 0
      object Casesensitive1: TMenuItem
        Caption = '&Case sensitive'
        ShortCut = 0
        OnClick = Casesensitive1Click
      end
      object Includesubfolders1: TMenuItem
        Caption = 'Include &subfolders'
        ShortCut = 0
        OnClick = Includesubfolders1Click
      end
      object Displaycountonly1: TMenuItem
        Caption = 'Display count &only'
        ShortCut = 0
        OnClick = Displaycountonly1Click
      end
      object Advancedoptions1: TMenuItem
        Caption = '&Advanced options...'
        ShortCut = 0
        OnClick = Advancedoptions1Click
      end
    end
    object Help1: TMenuItem
      Caption = '&Help'
      ShortCut = 0
      object Contents1: TMenuItem
        Caption = '&Contents'
        ShortCut = 0
        OnClick = Contents1Click
      end
      object About1: TMenuItem
        Caption = '&About Archive Peek...'
        ShortCut = 0
        OnClick = About1Click
      end
    end
  end
end