IFileSystemInfoList.Count

Синтаксис

Count: Integer;

Описание

Свойство Count возвращает количество элементов в коллекции.

Пример

Sub Main;

Var

DirInfo: IDirectoryInfo;

SysInfoList: IFileSystemInfoList;

i: Integer;

Begin

DirInfo:=New DirectoryInfo.Attach("c:\New_folder");

If DirInfo.Exists Then

SysInfoList:=DirInfo.GetFileSystemInfos("*");

i:=SysInfoList.Count;

End If;

Dispose DirInfo;

End Sub Main;

После выполнения примера в переменной «i» будет содержаться количество подкаталогов и файлов директории «c:\New_folder».

См.также:

IFileSystemInfoList