| 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 Not file
- CloseDir(dir)
|
