object DirForm: TDirForm Left = 322 Top = 207 BorderStyle = bsDialog Caption = 'Change Directory' ClientHeight = 140 ClientWidth = 385 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'System' Font.Style = [] FormStyle = fsStayOnTop Position = poScreenCenter PixelsPerInch = 96 TextHeight = 16 object DirectoryListBox1: TDirectoryListBox Left = 9 Top = 10 Width = 270 Height = 96 Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Arial' Font.Style = [] ItemHeight = 16 ParentFont = False TabOrder = 0 OnChange = DirListBoxChange end object Ok_Button: TButton Left = 289 Top = 10 Width = 86 Height = 24 Caption = 'OK' Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False TabOrder = 1 OnClick = Ok_ButtonClick end object Cancel: TButton Left = 289 Top = 39 Width = 86 Height = 24 Caption = 'Cancel' Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False TabOrder = 2 OnClick = CancelClick end object DriveComboBox1: TDriveComboBox Left = 8 Top = 109 Width = 129 Height = 20 Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Arial' Font.Style = [] ParentFont = False TabOrder = 3 OnChange = DriveComboBox1Change end object FileListBox1: TFileListBox Left = 181 Top = 109 Width = 68 Height = 30 ItemHeight = 16 TabOrder = 4 Visible = False end end