| указатель_на_файл = переменная, хранящая указатель, полученный командой ReadDir |
| Эта команда возвращает следующий файл или папку из открытой в
данный момент директории (используйте ReadDir,
чтобы открыть необходимую директорию для считывания). Т.е. она
возвращает строку, содержащую имя папки или файла с расширением.
Используйте FileType, чтобы определить, папка это или файл. Вы
не можете «двигаться» в обратную сторону внутри директории, только
вперед. Можно распределить содержимое директории по элементам массива
для отображения и т.п. Смотрите также: ReadDir и CloseDir. |
| ; ReadDir/NextFile$/CloseDir – пример использования ; Определить, с какой директории начать folder$="C:" ; Открыть директорию и сохранить указатель в myDir myDir=ReadDir(folder$) ; Будем повторять бесконечно, пока не кончатся файлы/папки в заданной директории Repeat ; Назначить следующий объект в директории переменной file$ file$=NextFile$(myDir) ; Если такового нет, выйти из цикла If file$="" Then Exit ; Использовать FileType, чтобы определить является объект папкой или файлом, и вывести результаты If FileType(folder$+""+file$) = 2 Then Print "Folder:" + file$ Else Print "File:" + file$ End If Forever ; Правильно закрыть директорию CloseDir myDir ; Вот и все! Print "Закончили пролистывание файлов!" |