ViewVC Help
View File | Revision Log | View Changeset | Root Listing
root/Oni2/oup/current/FileClasses/_EmptyFile.pas
Revision: 238
Committed: Sat Jul 14 16:50:55 2007 UTC (18 years, 3 months ago) by alloc
Content type: text/x-pascal
File size: 128 byte(s)
Log Message: 










File Contents











#

Content



 
 
 
 
 
 

 1

 unit _EmptyFile;
 

 

 
 
 

 2

 
 

 

 
 
 

 3

 interface
 

 

 
 
 

 4

 
 

 

 
 
 

 5

 uses
 

 

 
 
 

 6

   _FileTypes;
 

 

 
 
 

 7

 
 

 

 
 
 

 8

 type
 

 

 
 
 

 9

   TFile_Empty = class(TFile)
 

 

 
 
 

 10

   end;
 

 

 
 
 

 11

 
 

 

 
 
 

 12

 implementation
 

 

 
 
 

 13

 
 

 

 
 
 

 14

 end.
 

 

 
 
 

 15