Changeset 285 for Include/Classes/System/IO/Path.ab

Timestamp:

Jul 26, 2007, 5:43:54 PM (17 years ago)

Author:

イグトランス (egtra)

Message:

wtypes.abを追加

File:

• Include/Classes/System/IO/Path.ab (modified) (1 diff)

Include/Classes/System/IO/Path.ab

@@ -72 +72 @@
 
         Dim tempFileName[ELM(MAX_PATH)] As TCHAR
-        __GetTempFileName(tempPath, "ABT", 0, tempFileName)
-        free(tempPath)
-        Return tempFileName
+        Dim len = __GetTempFileName(tempPath, "ABT", 0, tempFileName)
+        _System_free(tempPath)
+        Return New String(tempFileName, len As Long)
     End Function