Difference between revisions of "File.FindNextFile"
(Created page with "{{infobox function |name=FindNextFile |object=Файл |caption=Выборка файлов |type=1 |status=2 |db=1 |visual=0}} {{HeadLinks| * Main_Page|Начальна...") |
m (1 revision imported) |
(No difference)
|
Latest revision as of 07:50, 7 February 2021
FindNextFile (Выборка файлов) | |||||||||||
---|---|---|---|---|---|---|---|---|---|---|---|
|
Функция получить следующий файл выборки, открытой ранее с помощью функции FindOpen. Если файлов в выборке больше нет, функция возвращает пустую строку. После выполнения функции, имя файла можно получить снова с помощью атрибута FileName.
Синтаксис
File.FindNextFile():<Имя следующего найденного файла выборки (STRING)>
Возвращаемое значение
Возвращается строка, имя следующего файла в выборке. Если выборка окончена, возвращается пустая строка.
Примеры
Function УдалитьФайлыРекурсивно(Путь) аФС:=File.Create(); аФС.FindOpen(Путь+"*.*"); While аФС.FindNextFile()<>"" Do Файл:=Trim(аФС.FileName); Имя:=Путь+Файл; If аФС.IsDirectory(Имя) Then УдалитьФайлыРекурсивно(Имя+"\"); Message("Удаляется папка "+Имя+"!","I"); аФС.RemoveDirectory(Имя); Else Message("Удаляется файл "+Имя+"!","I"); аФС.DeleteFile(Имя); EndIf; EndDo; EndFunction Путь:="Pictures\"; УдалитьФайлыРекурсивно(Путь);