--- oup/current/Tools/MetaEditor.pas	2007/07/17 22:28:01	242
+++ oup/current/Tools/MetaEditor.pas	2007/08/10 17:26:03	243
@@ -263,6 +263,7 @@ var
 
   i: Integer;
   links: TStrings;
+  ifile: TFile;
 begin
   inherited;
   if Assigned(Node) then
@@ -278,16 +279,15 @@ begin
           2: HintText := '';
         end;
       end;
-      if (data.Field is _MetaTypes.TDatLink) and (Column = 2) then
+      if data.Field is TFile then
       begin
-        links := nil;
-        links := ConManager.Connection[FConnectionID].GetFilesList(_MetaTypes.TDatLink(data.Field).PosExts, '', False, ST_NameAsc);
-        HintText := IntToStr(links.Count);
-        for i := 0 to Min(links.Count - 1, 99) do
-        begin
-          if (i mod 5) = 0 then
-            HintText := HintText + #13+#10;
-          HintText := HintText + links.Strings[i] + '       ';
+        ifile := TFile(data.Field);
+        case Column of
+          0: HintText :=
+            'FileID:    ' + IntToStr(ifile.FileInfo.ID) + #13#10 +
+            'Name:      ' + ifile.FileInfo.Name + #13#10 +
+            'Extension: ' + ifile.FileInfo.Extension + #13#10 +
+            '.dat-size: ' + IntToStr(ifile.FileInfo.Size) + #13#10;
         end;
       end;
     end;