DirectoryEntryType

DirectoryEntryType()

Синтаксис

Result = DirectoryEntryType(#Directory)

Описание

Возвращает тип текущей записи указанного перечисления, определяемой функциями ExamineDirectory() и NextDirectoryEntry().

Параметры

#Directory Номер идентифицирующий перечисление записей каталога, которое было создано вызовом функции ExamineDirectory().

Возвращаемое значение

Возвращает одно из следующих значений:

  #PB_DirectoryEntry_File     : Эта запись является файлом.
  #PB_DirectoryEntry_Directory: Эта запись является каталогом.

Пример (Фран)

Repertoire$ = GetHomeDirectory() ; Создаёт перечисление всех файлов и папок домашнего каталога.
If ExamineDirectory(0, Repertoire$, "*.*")
While NextDirectoryEntry(0)
If DirectoryEntryType(0) = #PB_DirectoryEntry_File
Type$ = " [Файл] "
Size$ = " (Размер : " + DirectoryEntrySize(0) + ")"
Else
Type$ = " [Каталог] "
Size$ = "" ; Для каталога размер напрямую не определяется.
EndIf

Debug Type$ + DirectoryEntryName(0) + Size$
Wend
FinishDirectory(0)
EndIf

См. также

ExamineDirectory(), NextDirectoryEntry(), DirectoryEntryName(), DirectoryEntrySize(), DirectoryEntryAttributes(), DirectoryEntryDate()

Поддерживаемые OS

Все