object PickDir: TPickDir
  Left = 267
  Top = 119
  BorderIcons = [biSystemMenu]
  BorderStyle = bsSingle
  Caption = 'Browes for folder'
  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 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 = 0
    OnChange = pickedChange
  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 = []
    ParentColor = False
    TabOrder = 1
    OnClick = SystemTreeView1Click
    ParentFont = False
  end
  object BitBtn1: TButton
    Left = 96
    Top = 280
    Width = 75
    Height = 23
    Caption = '&Ok'
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ModalResult = 1
    ParentFont = False
    TabOrder = 2
  end
  object Button2: TButton
    Left = 216
    Top = 280
    Width = 75
    Height = 23
    Cancel = True
    Caption = '&Cancel'
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ModalResult = 2
    ParentFont = False
    TabOrder = 3
  end
  object ResolutionFix1: TResolutionFix
    DesignRes = 96
    Left = 320
    Top = 280
  end
end