object DirectoryForm: TDirectoryForm Left = 232 Top = 114 Caption = 'DirectoryForm' ClientHeight = 426 ClientWidth = 504 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] OldCreateOrder = True PixelsPerInch = 96 TextHeight = 13 object DirListBox: TListBox Left = 0 Top = 0 Width = 504 Height = 426 Align = alClient Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Courier New' Font.Style = [] ItemHeight = 14 ParentFont = False TabOrder = 0 end end