--- oup/current/FileClasses/_EmptyFile.pas	2007/07/14 16:50:55	238
+++ oup/current/FileClasses/_EmptyFile.pas	2007/11/26 11:02:28	248
@@ -6,7 +6,7 @@ uses
   _FileTypes;
 
 type
-  TFile_Empty = class(TFile)
+  TFile_Empty = class(TResource)
   end;
 
 implementation