Синтаксис
function ScanDirectory(APath: string; AType: TM_ScanDirType): TM_ScanDirResult;
Описание
Сканирует указанную в APath директорию и возвращает список файлов и папок в этой директории. Путь в параметре APath обязательно должен завершаться символом "\". Параметр AType имеет перечислимый тип данных TM_ScanDirType, который определяет параметры сканирования и может принимать следующие значения:
•sdtAll - искать все файлы и папки, включая скрытые и системные;
•sdtFiles - искать только файлы (исключая скрытые);
•sdtDirs - искать только папки (исключая скрытые);
В результате выполнения функция возвращает список объектов типа TM_ScanDirResult, каждый из которых содержит информацию о найденном файле или папке.
Пример кода
var
I: Integer;
aList: TM_ScanDirResult;
begin
// сканируем путь "D:\MyFolder\" и записываем результат в aList
aList := ScanDirectory('D:\MyFolder\', sdtAll);
// в цикле проходим по результатам сканирования
for i := 0 to aList.Count - 1 do
begin
{ здесь работаем с каждым найденным файлом или папкой, где:
aList[i].Name - полное имя файла или папки, напр. "myFile.txt"
aList[i].ShortName - короткое имя, напр. "myFile"
aList[i].Ext - расширение файла, напр. ".txt"
aList[i].Timestamp - время последнего изменения файла
aList[i].Size - размер файла в байтах }
end;
end.