Index: oup/current/Tools/FileManager.dfm
===================================================================
--- oup/current/Tools/FileManager.dfm	(revision 227)
+++ oup/current/Tools/FileManager.dfm	(revision 227)
@@ -0,0 +1,6 @@
+inherited Form_FileManager: TForm_FileManager
+  Caption = 'Form_FileManager'
+  OnCreate = FormCreate
+  PixelsPerInch = 96
+  TextHeight = 13
+end
Index: oup/current/Tools/FileManager.pas
===================================================================
--- oup/current/Tools/FileManager.pas	(revision 227)
+++ oup/current/Tools/FileManager.pas	(revision 227)
@@ -0,0 +1,36 @@
+unit FileManager;
+
+interface
+
+uses
+  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
+  Dialogs, _BaseTemplate, StdCtrls, ExtCtrls;
+
+type
+  TForm_FileManager = class(TForm_BaseTemplate)
+    procedure FormCreate(Sender: TObject);
+  private
+    procedure NewCon(ID: Integer);
+  public
+  end;
+
+implementation
+{$R *.dfm}
+
+
+procedure TForm_FileManager.NewCon(ID: Integer);
+begin
+  if ID >= 0 then
+  begin
+  end;
+end;
+
+
+procedure TForm_FileManager.FormCreate(Sender: TObject);
+begin
+  inherited;
+  OnNewConnection := NewCon;
+  UpdateConList;
+end;
+
+end.
Index: oup/current/Tools/_TemplateFileList.dfm
===================================================================
--- oup/current/Tools/_TemplateFileList.dfm	(revision 225)
+++ oup/current/Tools/_TemplateFileList.dfm	(revision 227)
@@ -38,6 +38,4 @@
         object tab_files: TTabSheet
           Caption = 'Files'
-          ExplicitWidth = 233
-          ExplicitHeight = 353
           object panel_extension: TPanel
             Left = 0
@@ -48,5 +46,4 @@
             BevelOuter = bvNone
             TabOrder = 0
-            ExplicitWidth = 233
             DesignSize = (
               190
@@ -228,5 +225,4 @@
               TabOrder = 3
               OnClick = combo_extensionClick
-              ExplicitWidth = 232
             end
             object check_zerobyte: TCheckBox
@@ -247,5 +243,4 @@
               AutoSize = False
               TabOrder = 1
-              ExplicitWidth = 232
             end
             object check_filtername: TCheckBox
@@ -269,6 +264,4 @@
             OnClick = listClick
             OnMouseDown = listMouseDown
-            ExplicitWidth = 233
-            ExplicitHeight = 228
           end
         end
@@ -276,4 +269,21 @@
           Caption = 'Meta'
           ImageIndex = 1
+          object filelist_meta: TVirtualStringTree
+            Left = 0
+            Top = 0
+            Width = 190
+            Height = 503
+            Align = alClient
+            Header.AutoSizeIndex = 0
+            Header.Font.Charset = DEFAULT_CHARSET
+            Header.Font.Color = clWindowText
+            Header.Font.Height = -11
+            Header.Font.Name = 'Tahoma'
+            Header.Font.Style = []
+            Header.MainColumn = -1
+            Header.Options = [hoColumnResize, hoDrag]
+            TabOrder = 0
+            Columns = <>
+          end
         end
       end
Index: oup/current/Tools/_TemplateFileList.pas
===================================================================
--- oup/current/Tools/_TemplateFileList.pas	(revision 225)
+++ oup/current/Tools/_TemplateFileList.pas	(revision 227)
@@ -6,5 +6,5 @@
   Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
   Dialogs, _TemplateFile, StdCtrls, ExtCtrls, Menus, Buttons,
-  ComCtrls, TypeDefs;
+  ComCtrls, TypeDefs, VirtualTrees;
 
 type
@@ -39,4 +39,5 @@
     filelist: TListBox;
     tab_meta: TTabSheet;
+    filelist_meta: TVirtualStringTree;
     procedure NewCon(ID: Integer);