* Need FILE_WRITE_ATTRIBUTES for setfiledate (mantis #23290)

git-svn-id: trunk@22952 -

rtl/win/sysutils.pp

@@ -217,7 +217,7 @@ const
   AccessMode: array[0..2] of Cardinal  = (
     GENERIC_READ,
     GENERIC_WRITE,
-    GENERIC_READ or GENERIC_WRITE);
+    GENERIC_READ or GENERIC_WRITE or FILE_WRITE_ATTRIBUTES);
   ShareModes: array[0..4] of Integer = (
                0,
                0,