Changeset 105 for Include/Classes/System/IO/FileSystemInfo.ab

Timestamp:

Feb 17, 2007, 6:38:05 PM (17 years ago)

Author:

OverTaker

Message:

index.ab追加とFileSystemInfoの細かい修整。

File:

• Include/Classes/System/IO/FileSystemInfo.ab (modified) (2 diffs)

Include/Classes/System/IO/FileSystemInfo.ab

@@ -12 +12 @@
         Select Case m_FileAttributes
             Case FILE_ATTRIBUTE_ARCHIVE
-                Return Archive
+                Return FileAttributes.Archive
             Case FILE_ATTRIBUTE_COMPRESSED
-                Return Compressed
+                Return FileAttributes.Compressed
             Case FILE_ATTRIBUTE_DIRECTORY
-                Return Directory
+                Return FileAttributes.Directory
             Case FILE_ATTRIBUTE_ENCRYPTED
-                Return Encrypted
+                Return FileAttributes.Encrypted
             Case FILE_ATTRIBUTE_HIDDEN
-                Return Hidden
+                Return FileAttributes.Hidden
             Case FILE_ATTRIBUTE_NORMAL
-                Return Normal
+                Return FileAttributes.Normal
             Case FILE_ATTRIBUTE_OFFLINE
-                Return Offline
+                Return FileAttributes.Offline
             Case FILE_ATTRIBUTE_READONLY
-                Return ReadOnly
+                Return FileAttributes.ReadOnly
             Case FILE_ATTRIBUTE_REPARSE_POINT
-                Return ReparsePoint
+                Return FileAttributes.ReparsePoint
             Case FILE_ATTRIBUTE_SPARSE_FILE
-                Return SparseFile
+                Return FileAttributes.SparseFile
             Case FILE_ATTRIBUTE_SYSTEM
-                Return System
+                Return FileAttributes.System
             Case FILE_ATTRIBUTE_TEMPORARY
-                Return Temporary
+                Return FileAttributes.Temporary
             Case Else
                 'Exception
@@ -45 +45 @@
         Dim attributes As DWord
         Select Case value
-            Case Archive
+            Case FileAttributes.Archive
                 attributes = FILE_ATTRIBUTE_ARCHIVE
-            Case Compressed
+            Case FileAttributes.Compressed
                 attributes = FILE_ATTRIBUTE_COMPRESSED
-            Case Directory
+            Case FileAttributes.Directory
                 attributes = FILE_ATTRIBUTE_DIRECTORY
-            Case Hidden
+            Case FileAttributes.Hidden
                 attributes = FILE_ATTRIBUTE_HIDDEN
-            Case Normal
+            Case FileAttributes.Normal
                 attributes = FILE_ATTRIBUTE_NORMAL
-            Case Offline
+            Case FileAttributes.Offline
                 attributes = FILE_ATTRIBUTE_OFFLINE
-            Case ReadOnly
+            Case FileAttributes.ReadOnly
                 attributes = FILE_ATTRIBUTE_READONLY
-            Case System
+            Case FileAttributes.System
                 attributes = FILE_ATTRIBUTE_SYSTEM
-            Case Temporary
+            Case FileAttributes.Temporary
                 attributes = FILE_ATTRIBUTE_TEMPORARY
             Case Else