Класс TFileSearch |
Наверх Предыдущая Последующая | |
Для организации поиска файлов и папок на диске в скриптовом языке предусмотрен класс TFileSearch, реализующий всю необходимую для поиска функциональность.
Методы:
constructor Create(AOwner: TComponent);
Создает экземпляр класса. Единственный параметр AOwner задает владельца в данном случае не имеет смысла и должен быть равен nil
destructor Free;
Разрушает экземпляр класса, освобождает все занятые им ресурсы.
function FindFirst(AFileMask : string) : boolean;
Поиск первого файла или папки, удовлетворяющего условию поиска. Возвращает TRUE, если первый подходящий объект успешной найден. AFileMask задает маску поиска файлов, например "*.*". В маске допустимо указывать макросы, подробнее см. в разделе "макросы, допустимые в именах файлов"
function FindNext : boolean;
Поиск очередного файла или папки, удовлетворяющего условию поиска. Возвращает TRUE, если очередной подходящий объект успешной найден. Результат последней операции поиска можно так-же получить при помощи свойства Found
function FindClose : boolean;
Завершает поиск, освобождает занятые для поиска ресурсы, но не разрушает экземпляр класса. FindClose автоматически вызывается при вызове FindFirst и Free
Свойства:
property Found : boolean;
Результат последней операции FindFirst или FindNext. Наличие этого свойства упрощеает организацию цикла поиска
property ISDir : boolean;
Возвращает TRUE, если текущий найденный объект является каталогом
property FileName : string;
Возвращает имя файла текущего найденного объекта (важно отметить - только имя, без пути !!)
property FileAttr : byte;
Возвращает атрибуты последнего найденного объекта
property FileTime : TDateTime;
Возвращает дату и время создания последнего найденного объекта