FindClose - Функция. Справочник

Delphi справочник - Форум программистов - Навигация

A B C D E F G H I J K L M N O P Q R S T U V W X Y Z По первой букве

System SysUtils StrUtils DateUtils FileCtrl ConvUtils StdConvs Math Classes Dialogs Types Variants ПО Unit Compiler directives Directives Keywords Types Variables Constants Functions Procedures По категории

Основы Delphi
FindClose Функция	Закрывает успешный FindFirst поиск файла	SysUtils unit

function FindClose ( var SearchResults : TSearchRec ) : Integer;

Описание

Функция FindClose закрывает успешный FindFirst (и FindNext) поиск файла. Это освобождает ресурсы, используемые поиском в SearchResults.

Запрос FindCLose не обязателен, если FindFirst ничего не нашёл, но если он, что-то нашёл, то его просто необходимо вызвать, даже если последующий FindNext вызовет сбои.

Похожие команды

FileSearch  Поиск файла в одной или более папках

FindFirst  Находит все файлы, соответствующие маске файла и атрибутов

FindNext  Находит следующий файл после успешного FindFirst

TSearchRec  Запись, используемая для хранения данных в FindFirst и FindNext

Пример кода : Показываем, когда вызываем FindClose

var
  searchResult : TSearchRec;

begin
  // Пытаемся найти правильные файлы в текущей директории, соответствующие шаблону Unit1.d*
  if FindFirst('Unit1.d*', faAnyFile, searchResult) = 0 then
  begin
    repeat
      ShowMessage('Имя файла = '+searchResult.Name);
      ShowMessage('Имя файла = '+IntToStr(searchResult.Size));
    until FindNext(searchResult) <> 0;

    // Должен освободить ресурсы, используемые этими успешными, поисками
    FindClose(searchResult);
  end;
end;

Имя файла = Unit1.dcu
Размер файла = 4382
Имя файла = Uni1.dfm
Размер файла = 524
Имя файла = Uni1.ddp
Размер файла = 51

Оплата за обучение в Kata Academy только после твоего трудоустройства в IT, начни карьеру Middle Java-разработчика

Интенсив по Python: Работа с API и фреймворками 24-26 ИЮНЯ 2022. Знаете Python, но хотите расширить свои навыки? Slurm подготовили для вас особенный продукт!