Функция GetFirstFile

Назначение

Функции GetFirstFile и GetNextFile предназначены для получения списка файлов из заданной директории.

Функция GetFirstFile возвращает имя первого найденного файла в директории strPath, удовлетворяющего условию маски файла strMask. Для получения имен остальных файлов директории следует воспользоваться функцией GetNextFile.

Описание

function GetFirstFile(strPath : string, strMask : string) : string;

Параметры

strPath - директория, в которой ищутся файлы.

strMask - "маска" искомого файла, например '*Vip'.

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

Функция возвращает имя первого найденного файла в директории strPath, удовлетворяющего условию маски файла strMask.

Если файл не найден, функция возвращает строковую константу strDataIsEmpty.

Пример

Для каждого файла с расширением 'sys' из директории 'c:\' выводится сообщение с его именем.

var str : string;
str := GetFirstFile('c:\','*.sys');

while str <> strDataIsEmpty do
{
  message(str);
  str := GetNextFile;
}

Версия

Атлантис 5.3.07