| 12345678910111213141516171819 |
- 'File System Example
- SuperStrict
- Local dir:Byte Ptr = ReadDir(BlitzMaxPath() )
- If Not dir Then
- RuntimeError "Cannot open folder"
- End If
- Local file:String
- Repeat
-
- file = NextFile(Dir) ' Get the filenames in folder
- Print file
-
- Until file = ""
- CloseDir(dir)
|
