object FormBrowseFolder: TFormBrowseFolder Left = 318 Top = 117 AutoScroll = False BorderIcons = [biSystemMenu, biMaximize] ClientHeight = 292 ClientWidth = 342 Color = clBtnFace Constraints.MinHeight = 220 Constraints.MinWidth = 210 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] OldCreateOrder = False Position = poScreenCenter ShowHint = True OnShow = FormShow DesignSize = ( 342 292) PixelsPerInch = 96 TextHeight = 13 object BrowseFolderLabel: TLabel Left = 9 Top = 224 Width = 3 Height = 13 Anchors = [akLeft, akBottom] ShowAccelChar = False end object BrowseFolderShellTreeView: TShellTreeView Left = 0 Top = 0 Width = 342 Height = 219 ObjectTypes = [otFolders] Root = 'rfDesktop' UseShellImages = True Align = alTop Anchors = [akLeft, akTop, akRight, akBottom] AutoRefresh = True Indent = 19 ParentColor = False RightClickSelect = True ShowRoot = False TabOrder = 0 OnChange = BrowseFolderShellTreeViewChange end object BrowseFolderButtonOK: TButton Left = 24 Top = 245 Width = 75 Height = 25 Anchors = [akBottom] Default = True ModalResult = 1 TabOrder = 1 OnClick = BrowseFolderButtonOKClick end object BrowseFolderButtonCancel: TButton Left = 243 Top = 245 Width = 75 Height = 25 Anchors = [akBottom] Cancel = True ModalResult = 2 TabOrder = 2 OnClick = BrowseFolderButtonCancelClick end end