source: oup/current/FileClasses/_MetaTypes.pas@ 1016

Last change on this file since 1016 was 248, checked in by alloc, 17 years ago
File size: 6.3 KB
Line 
1unit _MetaTypes;
2
3interface
4
5uses
6 _FileTypes, _EmptyFile, _DataTypes, _Extensions, _TreeElement,
7 AKEV, AKVA, BINA, SUBT, TXAN, TXMP;
8// ABNA, AGDB, AGQC, AGQG, AGQM, AGQR, AISA, AITR, AIWA, AKAA, AKBA, AKBP, AKDA,
9// AKEV, AKOT, AKVA, BINA, CBPI, CBPM, CONS, CRSA, DOOR, DPge, EDIA, ENVP, FILM,
10// FXLR, GMAN, HPge, IDXA, IGHH, IGPA, IGPG, IGSA, IGSt, Impt, IPge, KeyI, M3GA,
11// M3GM, M3TA, Mtrl, NMSA, OBAN, OBDC, OBLS, OBOA, OFGA, ONCC, ONCP, ONCV, ONFA,
12// ONGS, ONIA, ONLD, ONLV, ONMA, ONOA, ONSA, ONSK, ONTA, ONVL, ONWC, OPge, OSBD,
13// OTIT, OTLF, PLEA, PNTA, PSpc, PSpL, PSUI, QTNA, QUDA, SNDD, StNA, SUBT, TMFA,
14// TMRA, TRAC, TRAM, TRAS, TRBS, TRCM, TRFT, TRGA, TRGE, TRIA, TRIG, TRMA, TRSC,
15// TRTA, TSFF, TSFL, TSFT, TSGA, TStr, TURR, TXAN, TXCA, TXMA, TXMB, TXMP, TXPC,
16// TxtC, UUEA, UVDL, VCRA, WMCL, WMDD, WMM_, WMMB, WPge;
17
18type
19 TTreeElement = _TreeElement.TTreeElement;
20 TResource = _FileTypes.TResource;
21 TFile_Empty = _EmptyFile.TFile_Empty;
22 TExtension = _Extensions.TExtension;
23 TExtensions = _Extensions.TExtensions;
24
25 TDataField = _DataTypes.TDataField;
26 TContainer = _DataTypes.TContainer;
27 TBlock = _DataTypes.TBlock;
28 TArray = _DataTypes.TArray;
29
30 TResourceID = _DataTypes.TResourceID;
31 TLevelID = _DataTypes.TLevelID;
32 TInt = _DataTypes.TInt;
33 TFloat = _DataTypes.TFloat;
34 TString = _DataTypes.TString;
35 TBitSet = _DataTypes.TBitSet;
36 TDatLink = _DataTypes.TDatLink;
37 TLinkByID = _DataTypes.TLinkByID;
38 TRawLink = _DataTypes.TRawLink;
39 TUnused = _DataTypes.TUnused;
40
41 TResourceClass = class of TResource;
42 TResourceDesc = record
43 ext: String;
44 ftype: TResourceClass;
45 end;
46
47const
48 ResourceDescs: array[0..5] of TResourceDesc = (
49 (ext: 'AKEV'; ftype: TFile_AKEV),
50 (ext: 'AKVA'; ftype: TFile_AKVA),
51 (ext: 'BINA'; ftype: TFile_BINA),
52 (ext: 'SUBT'; ftype: TFile_SUBT),
53 (ext: 'TXAN'; ftype: TFile_TXAN),
54 (ext: 'TXMP'; ftype: TFile_TXMP)
55 );
56
57{
58 FileDescs: array[0..112] of TFileDesc = (
59 (ext: 'ABNA'; ftype: TFile_ABNA),
60 (ext: 'AGDB'; ftype: TFile_AGDB),
61 (ext: 'AGQC'; ftype: TFile_AGQC),
62 (ext: 'AGQG'; ftype: TFile_AGQG),
63 (ext: 'AGQM'; ftype: TFile_AGQM),
64 (ext: 'AGQR'; ftype: TFile_AGQR),
65 (ext: 'AISA'; ftype: TFile_AISA),
66 (ext: 'AITR'; ftype: TFile_AITR),
67 (ext: 'AIWA'; ftype: TFile_AIWA),
68 (ext: 'AKAA'; ftype: TFile_AKAA),
69 (ext: 'AKBA'; ftype: TFile_AKBA),
70 (ext: 'AKBP'; ftype: TFile_AKBP),
71 (ext: 'AKDA'; ftype: TFile_AKDA),
72 (ext: 'AKEV'; ftype: TFile_AKEV),
73 (ext: 'AKOT'; ftype: TFile_AKOT),
74 (ext: 'AKVA'; ftype: TFile_AKVA),
75 (ext: 'BINA'; ftype: TFile_BINA),
76 (ext: 'CBPI'; ftype: TFile_CBPI),
77 (ext: 'CBPM'; ftype: TFile_CBPM),
78 (ext: 'CONS'; ftype: TFile_CONS),
79 (ext: 'CRSA'; ftype: TFile_CRSA),
80 (ext: 'DOOR'; ftype: TFile_DOOR),
81 (ext: 'DPge'; ftype: TFile_DPge),
82 (ext: 'EDIA'; ftype: TFile_EDIA),
83 (ext: 'ENVP'; ftype: TFile_ENVP),
84 (ext: 'FILM'; ftype: TFile_FILM),
85 (ext: 'FXLR'; ftype: TFile_FXLR),
86 (ext: 'GMAN'; ftype: TFile_GMAN),
87 (ext: 'HPge'; ftype: TFile_HPge),
88 (ext: 'IDXA'; ftype: TFile_IDXA),
89 (ext: 'IGHH'; ftype: TFile_IGHH),
90 (ext: 'IGPA'; ftype: TFile_IGPA),
91 (ext: 'IGPG'; ftype: TFile_IGPG),
92 (ext: 'IGSA'; ftype: TFile_IGSA),
93 (ext: 'IGSt'; ftype: TFile_IGSt),
94 (ext: 'Impt'; ftype: TFile_Impt),
95 (ext: 'IPge'; ftype: TFile_IPge),
96 (ext: 'KeyI'; ftype: TFile_KeyI),
97 (ext: 'M3GA'; ftype: TFile_M3GA),
98 (ext: 'M3GM'; ftype: TFile_M3GM),
99 (ext: 'M3TA'; ftype: TFile_M3TA),
100 (ext: 'Mtrl'; ftype: TFile_Mtrl),
101 (ext: 'NMSA'; ftype: TFile_NMSA),
102 (ext: 'OBAN'; ftype: TFile_OBAN),
103 (ext: 'OBDC'; ftype: TFile_OBDC),
104 (ext: 'OBLS'; ftype: TFile_OBLS),
105 (ext: 'OBOA'; ftype: TFile_OBOA),
106 (ext: 'OFGA'; ftype: TFile_OFGA),
107 (ext: 'ONCC'; ftype: TFile_ONCC),
108 (ext: 'ONCP'; ftype: TFile_ONCP),
109 (ext: 'ONCV'; ftype: TFile_ONCV),
110 (ext: 'ONFA'; ftype: TFile_ONFA),
111 (ext: 'ONGS'; ftype: TFile_ONGS),
112 (ext: 'ONIA'; ftype: TFile_ONIA),
113 (ext: 'ONLD'; ftype: TFile_ONLD),
114 (ext: 'ONLV'; ftype: TFile_ONLV),
115 (ext: 'ONMA'; ftype: TFile_ONMA),
116 (ext: 'ONOA'; ftype: TFile_ONOA),
117 (ext: 'ONSA'; ftype: TFile_ONSA),
118 (ext: 'ONSK'; ftype: TFile_ONSK),
119 (ext: 'ONTA'; ftype: TFile_ONTA),
120 (ext: 'ONVL'; ftype: TFile_ONVL),
121 (ext: 'ONWC'; ftype: TFile_ONWC),
122 (ext: 'OPge'; ftype: TFile_OPge),
123 (ext: 'OSBD'; ftype: TFile_OSBD),
124 (ext: 'OTIT'; ftype: TFile_OTIT),
125 (ext: 'OTLF'; ftype: TFile_OTLF),
126 (ext: 'PLEA'; ftype: TFile_PLEA),
127 (ext: 'PNTA'; ftype: TFile_PNTA),
128 (ext: 'PSpc'; ftype: TFile_PSpc),
129 (ext: 'PSpL'; ftype: TFile_PSpL),
130 (ext: 'PSUI'; ftype: TFile_PSUI),
131 (ext: 'QTNA'; ftype: TFile_QTNA),
132 (ext: 'QUDA'; ftype: TFile_QUDA),
133 (ext: 'SNDD'; ftype: TFile_SNDD),
134 (ext: 'StNA'; ftype: TFile_StNA),
135 (ext: 'SUBT'; ftype: TFile_SUBT),
136 (ext: 'TMFA'; ftype: TFile_TMFA),
137 (ext: 'TMRA'; ftype: TFile_TMRA),
138 (ext: 'TRAC'; ftype: TFile_TRAC),
139 (ext: 'TRAM'; ftype: TFile_TRAM),
140 (ext: 'TRAS'; ftype: TFile_TRAS),
141 (ext: 'TRBS'; ftype: TFile_TRBS),
142 (ext: 'TRCM'; ftype: TFile_TRCM),
143 (ext: 'TRFT'; ftype: TFile_TRFT),
144 (ext: 'TRGA'; ftype: TFile_TRGA),
145 (ext: 'TRGE'; ftype: TFile_TRGE),
146 (ext: 'TRIA'; ftype: TFile_TRIA),
147 (ext: 'TRIG'; ftype: TFile_TRIG),
148 (ext: 'TRMA'; ftype: TFile_TRMA),
149 (ext: 'TRSC'; ftype: TFile_TRSC),
150 (ext: 'TRTA'; ftype: TFile_TRTA),
151 (ext: 'TSFF'; ftype: TFile_TSFF),
152 (ext: 'TSFL'; ftype: TFile_TSFL),
153 (ext: 'TSFT'; ftype: TFile_TSFT),
154 (ext: 'TSGA'; ftype: TFile_TSGA),
155 (ext: 'TStr'; ftype: TFile_TStr),
156 (ext: 'TURR'; ftype: TFile_TURR),
157 (ext: 'TXAN'; ftype: TFile_TXAN),
158 (ext: 'TXCA'; ftype: TFile_TXCA),
159 (ext: 'TXMA'; ftype: TFile_TXMA),
160 (ext: 'TXMB'; ftype: TFile_TXMB),
161 (ext: 'TXMP'; ftype: TFile_TXMP),
162 (ext: 'TXPC'; ftype: TFile_TXPC),
163 (ext: 'TxtC'; ftype: TFile_TxtC),
164 (ext: 'UUEA'; ftype: TFile_UUEA),
165 (ext: 'UVDL'; ftype: TFile_UVDL),
166 (ext: 'VCRA'; ftype: TFile_VCRA),
167 (ext: 'WMCL'; ftype: TFile_WMCL),
168 (ext: 'WMDD'; ftype: TFile_WMDD),
169 (ext: 'WMM_'; ftype: TFile_WMM_),
170 (ext: 'WMMB'; ftype: TFile_WMMB),
171 (ext: 'WPge'; ftype: TFile_WPge)
172 );
173}
174
175implementation
176
177end.
Note: See TracBrowser for help on using the repository browser.