object PickDirs: TPickDirs
  Left = 211
  Top = 160
  HelpContext = 3
  BorderIcons = [biSystemMenu]
  BorderStyle = bsDialog
  Caption = 'Select Base Folders'
  ClientHeight = 308
  ClientWidth = 487
  Font.Color = clBlack
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Position = poScreenCenter
  ShowHint = True
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Label3: TLabel
    Left = 16
    Top = 256
    Width = 33
    Height = 13
    Caption = 'Drives:'
  end
  object Label4: TLabel
    Left = 200
    Top = 256
    Width = 33
    Height = 13
    Caption = 'Drives:'
  end
  object Bevel1: TBevel
    Left = 188
    Top = 120
    Width = 4
    Height = 169
    Shape = bsLeftLine
  end
  object Path1: TLabel
    Left = 16
    Top = 120
    Width = 104
    Height = 13
    Caption = 'C:\Beyond\Beyond32'
  end
  object Path2: TLabel
    Left = 200
    Top = 120
    Width = 104
    Height = 13
    Caption = 'C:\Beyond\Beyond32'
  end
  object Bevel2: TBevel
    Left = 372
    Top = 120
    Width = 4
    Height = 169
    Shape = bsLeftLine
  end
  object Label1: TLabel
    Left = 392
    Top = 120
    Width = 30
    Height = 13
    Caption = 'Filters:'
  end
  object Bevel3: TBevel
    Left = 16
    Top = 16
    Width = 361
    Height = 89
    Shape = bsFrame
  end
  object Label2: TLabel
    Left = 32
    Top = 32
    Width = 40
    Height = 13
    Caption = 'Session:'
  end
  object DirectoryListBox1: TDirectoryListBox
    Left = 16
    Top = 144
    Width = 161
    Height = 105
    DirLabel = Path1
    ItemHeight = 16
    TabOrder = 3
    OnClick = DirectoryListBox1Click
    OnEnter = DirectoryListBox1Enter
  end
  object DriveComboBox1: TDriveComboBox
    Left = 16
    Top = 272
    Width = 161
    Height = 19
    DirList = DirectoryListBox1
    TabOrder = 4
  end
  object DirectoryListBox2: TDirectoryListBox
    Left = 200
    Top = 144
    Width = 161
    Height = 105
    DirLabel = Path2
    ItemHeight = 16
    TabOrder = 5
    OnClick = DirectoryListBox2Click
    OnEnter = DirectoryListBox2Enter
  end
  object DriveComboBox2: TDriveComboBox
    Left = 200
    Top = 272
    Width = 161
    Height = 19
    DirList = DirectoryListBox2
    TabOrder = 6
  end
  object OKBtn: TBitBtn
    Left = 392
    Top = 16
    Width = 81
    Height = 26
    Caption = 'OK'
    Default = True
    ModalResult = 1
    TabOrder = 9
    OnClick = OKBtnClick
    NumGlyphs = 2
  end
  object CancelBtn: TBitBtn
    Left = 392
    Top = 48
    Width = 81
    Height = 26
    Cancel = True
    Caption = 'Cancel'
    ModalResult = 2
    TabOrder = 10
    NumGlyphs = 2
  end
  object HelpBtn: TBitBtn
    Left = 392
    Top = 80
    Width = 81
    Height = 26
    Caption = '&Help'
    TabOrder = 11
    OnClick = HelpBtnClick
    NumGlyphs = 2
  end
  object Filters: TMemo
    Left = 392
    Top = 144
    Width = 81
    Height = 123
    Lines.Strings = (
      '*.pas'
      '*.dfm'
      '*.dpr'
      '*.dcr')
    ScrollBars = ssVertical
    TabOrder = 8
    WordWrap = False
  end
  object SessionChoices: TComboBox
    Left = 32
    Top = 48
    Width = 233
    Height = 21
    Style = csDropDownList
    ItemHeight = 13
    TabOrder = 0
    OnClick = SessionChoicesClick
  end
  object SaveBtn: TBitBtn
    Left = 280
    Top = 32
    Width = 81
    Height = 26
    Caption = '&Save As...'
    TabOrder = 1
    OnClick = SaveBtnClick
  end
  object RemoveBtn: TBitBtn
    Left = 280
    Top = 64
    Width = 81
    Height = 26
    Caption = '&Remove'
    TabOrder = 2
    OnClick = RemoveBtnClick
  end
  object AllFilesBtn: TBitBtn
    Left = 440
    Top = 120
    Width = 33
    Height = 17
    Caption = '*.*'
    TabOrder = 7
    OnClick = AllFilesBtnClick
  end
end