object BrowseForFolder: TBrowseForFolder Left = 5 Top = 185 BorderIcons = [biSystemMenu] BorderStyle = bsDialog Caption = 'Browse for Folder' ClientHeight = 267 ClientWidth = 356 Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] PixelsPerInch = 96 TextHeight = 13 object Edit1: TEdit Left = 0 Top = 3 Width = 257 Height = 21 ReadOnly = True TabOrder = 2 end object ComboBox1: TComboBox Left = 0 Top = 245 Width = 257 Height = 21 Style = csDropDownList ItemHeight = 13 Sorted = True TabOrder = 3 OnClick = ComboBox1Click end object Button1: TButton Left = 264 Top = 8 Width = 89 Height = 25 Caption = '&Open' ModalResult = 1 TabOrder = 0 OnClick = Button1Click end object Button2: TButton Left = 264 Top = 40 Width = 89 Height = 25 Caption = '&Cancel' ModalResult = 2 TabOrder = 1 end object Button3: TButton Left = 264 Top = 244 Width = 85 Height = 22 Caption = '&Remove' TabOrder = 4 OnClick = Button3Click end object ShellTree1: TShellTree Left = 0 Top = 24 Width = 257 Height = 221 ShowVirtualFolders = True ShowSharedOverlay = True ShowLinkOverlay = True RootUsePIDL = True RootPIDL = PIDL_DESKTOP RootDir = 'C:\' Options = [TF_FOLDERS, TF_HIDDEN] Path = 'C:\WIN98\Desktop' UpdAutoThread = True UpdAuto = True UpdAutoRec = False ShowIcons = True FileMask = '*.*' FileMaskUse = False FileSortType = so_Name FileSortOrder = so_Ascending PopupMenuMode = pmm_System ShowMessages = True ToolTips = True ReadOnly = True Indent = 19 OnChange = ShellTree1Change TabOrder = 5 RightClickSelect = False end end