Browse Source

Add missing FILE_ATTRIBUTE_XXX constants as found in WinCE 5.0 headers (only FILE_ATTRIBUTE_DEVICE is not defined)

Pierre Muller 2 years ago
parent
commit
7ec5e24541
2 changed files with 8 additions and 3 deletions
  1. 3 3
      packages/vcl-compat/src/system.ioutils.pp
  2. 5 0
      rtl/wince/wininc/defines.inc

+ 3 - 3
packages/vcl-compat/src/system.ioutils.pp

@@ -330,9 +330,9 @@ Const
   WinAttrs : Array[TFileAttribute] of Integer =
      (FILE_ATTRIBUTE_READONLY, FILE_ATTRIBUTE_HIDDEN, FILE_ATTRIBUTE_SYSTEM,
       FILE_ATTRIBUTE_DIRECTORY,FILE_ATTRIBUTE_ARCHIVE, 0{FILE_ATTRIBUTE_DEVICE},
-      FILE_ATTRIBUTE_NORMAL, FILE_ATTRIBUTE_TEMPORARY,0{FILE_ATTRIBUTE_SPARSE_FILE},
-      0{FILE_ATTRIBUTE_REPARSE_POINT}, FILE_ATTRIBUTE_COMPRESSED, 0{FILE_ATTRIBUTE_OFFLINE},
-      0{FILE_ATTRIBUTE_NOT_CONTENT_INDEXED}, 0{FILE_ATTRIBUTE_ENCRYPTED},0{FILE_ATTRIBUTE_REPARSE_POINT});
+      FILE_ATTRIBUTE_NORMAL, FILE_ATTRIBUTE_TEMPORARY,FILE_ATTRIBUTE_SPARSE_FILE,
+      FILE_ATTRIBUTE_REPARSE_POINT, FILE_ATTRIBUTE_COMPRESSED, FILE_ATTRIBUTE_OFFLINE,
+      FILE_ATTRIBUTE_NOT_CONTENT_INDEXED, FILE_ATTRIBUTE_ENCRYPTED,FILE_ATTRIBUTE_REPARSE_POINT);
 {$ENDIF}
 
 {$IFDEF WINDOWS}

+ 5 - 0
rtl/wince/wininc/defines.inc

@@ -452,6 +452,11 @@
      FILE_ATTRIBUTE_READONLY = 1;
      FILE_ATTRIBUTE_SYSTEM = 4;
      FILE_ATTRIBUTE_TEMPORARY = 256;
+     FILE_ATTRIBUTE_SPARSE_FILE = $200;
+     FILE_ATTRIBUTE_REPARSE_POINT = $400;
+     FILE_ATTRIBUTE_OFFLINE = $1000;
+     FILE_ATTRIBUTE_NOT_CONTENT_INDEXED = $2000;
+     FILE_ATTRIBUTE_ENCRYPTED = $40;
      FILE_FLAG_WRITE_THROUGH = $80000000;
      FILE_FLAG_OVERLAPPED = 1073741824;
      FILE_FLAG_NO_BUFFERING = 536870912;