object PickDir: TPickDir
  Left = 246
  Top = 166
  BorderIcons = [biSystemMenu]
  BorderStyle = bsSingle
  Caption = 'Select Directory'
  ClientHeight = 312
  ClientWidth = 369
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = 'System'
  Font.Style = []
  Position = poScreenCenter
  OnCreate = FormCreate
  OnKeyDown = FormKeyDown
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 16
  object prompt: TLabel
    Left = 24
    Top = 8
    Width = 321
    Height = 16
    Alignment = taCenter
    AutoSize = False
    Caption = 'prompt'
  end
  object Bevel1: TBevel
    Left = 8
    Top = 32
    Width = 353
    Height = 241
  end
  object BitBtn1: TBitBtn
    Left = 72
    Top = 280
    Width = 81
    Height = 25
    Caption = '&OK'
    TabOrder = 0
    Kind = bkOK
  end
  object picked: TEdit
    Left = 24
    Top = 48
    Width = 321
    Height = 21
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 1
    OnChange = pickedChange
  end
  object BitBtn2: TBitBtn
    Left = 208
    Top = 280
    Width = 81
    Height = 25
    Caption = '&Cancel'
    TabOrder = 2
    Kind = bkCancel
  end
  object SystemTreeView1: TSystemTreeView
    Left = 24
    Top = 88
    Width = 321
    Height = 169
    ShowHiddenDirs = False
    HideSelection = False
    Indent = 25
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentColor = False
    TabOrder = 3
    OnClick = SystemTreeView1Click
    ParentFont = False
  end
  object ResolutionFix1: TResolutionFix
    DesignRes = 96
    Left = 320
    Top = 280
  end
end