Процедура Reset

Открывает существующий файл

Объявление:

Procedure Reset(Var F [ : File; Recsize : Word ] )

Режим:

Windows,  Protected,  Real

Замечание:

Параметр F - переменная любого файлового типа, связанная с внешним файлом, с использованием процедуры Assign. Параметр RecSize - необязательный параметр, который может быть определен только, если F - нетипизированный файл. В этом случае, RecSize определяет размер блока, который нужно использовать при передаче данных. Если RecSize опущен, принят заданный по умолчанию размер блока в 128 байт. Reset открывает существующий внешний файл с именем, назначенным в переменной F. Происходит ошибка, если внешний файл с данным именем не существует. Если файл F уже открыт, то он сначала закрывается, а затем вновь открывается. Текущая позиция указателя устанавливается на начало файла. Если переменной F назначено пустое имя, например Assign(F, ''), то после обращения к Reset, переменная F будет относиться к стандартному входному файлу (стандартный номер дескриптора = 0). Если F - текстовый файл, то он открывается только на чтение. После обращения к Reset, Eof(F) = True, если файл пуст, иначе Eof (F) = False. В режиме {$I-} функция IOResult вернет 0, если операция была успешна, иначе, она возвращает отличный от нуля код ошибки.

Пример:

Var F : File;
 Begin
  {$I-}
  Assign(F, FileName);
  Reset(F);
  Close(F);
  {$I+}
  FileExists := (IOResult = 0) And (FileName <> '');
 End;  { FileExists }
 
 Begin
  { Получаем имя файла из командной строки }
 If FileExists(ParamStr(1)) Then WriteLn('Файл существует.')
                            Else WriteLn('Файл не найден!');
End.