ViewVC Help
View File | Revision Log | View Changeset | Root Listing
root/Oni2/oup/current/FileClasses/_MetaManager.pas
(Generate patch)

Comparing oup/current/FileClasses/_MetaManager.pas (file contents):
Revision 213 by alloc, Tue Jun 12 17:00:48 2007 UTC vs.
Revision 214 by alloc, Tue Jun 12 17:35:56 2007 UTC

# Line 1 | Line 1
1   unit _MetaManager;
2   interface
3  
4 < uses _FileTypes, TXAN, TXMP, _EmptyFile;
4 > uses _FileTypes, SUBT, TXAN, TXMP, _EmptyFile;
5  
6   type
7    TFileType = class of TFile;
# Line 11 | Line 11 | type
11    end;
12  
13   const
14 <  FileDescs: array[0..1] of TFileDesc = (
14 >  FileDescs: array[0..2] of TFileDesc = (
15 >    (ext: 'SUBT'; ftype: TFile_SUBT),
16      (ext: 'TXAN'; ftype: TFile_TXAN),
17      (ext: 'TXMP'; ftype: TFile_TXMP)
18    );
# Line 34 | Line 35 | type
35        property FileById[Id: Integer]: TFile read GetFileById;
36    end;
37  
38 + var
39 +  Meta: TMetaManager;
40 +
41   implementation
42  
43   uses

Diff Legend

Removed lines
+ Added lines
< Changed lines (old)
> Changed lines (new)