Changeset 101 for oup/rewrite/Global/TypeDefs.pas

Timestamp:

Feb 20, 2007, 9:43:29 PM (18 years ago)

Author:

alloc

Message:

 

File:

• oup/rewrite/Global/TypeDefs.pas (modified) (3 diffs)

oup/rewrite/Global/TypeDefs.pas

@@ -9 +9 @@
 
   TDataBackend = (DB_ONI, DB_ADB);
-  TDataOS = (DOS_WIN, DOS_MAC);
+  TDataOS = (DOS_WIN, DOS_WINDEMO, DOS_MAC, DOS_MACBETA);
 
-  TChangeRights = set of (CR_EditDat, CR_EditRaw, CR_ResizeDat, CR_ResizeRaw);
+  TChangeRights = set of (CR_EditDat, CR_EditRaw, CR_ResizeDat, CR_ResizeRaw, CR_AppendRaw);
 
   TStatusMessages = (
@@ -19 +19 @@
       SM_UnknownExtension,
       SM_IncompatibleFile,
+      SM_IncompatibleDBVersion,
       SM_UnknownError
   ); 
+
+  TExtensionsMap = array of packed record
+      Ident:       array[0..$7] of Byte;
+      Extension:   array[0..$3] of Char;
+      ExtCount:    LongWord;
+  end;
 
   TFileInfo = packed record
@@ -30 +37 @@
       DatAddr:     Integer;
   end;
+  TFiles = array of TFileInfo;
 
   TRawDataInfo = record