Rewrite, процедура

Синтаксис


procedure	Rewrite(var F: TextFile);
procedure	Rewrite(var F: File);
procedure	Rewrite(var F: File;  RecordSize: Integer);

Описание

Процедура Rewrite открывает новый файл для записи. Если файл уже существует, его содержимое уничтожается до открытия файла. Текстовый файл открывается только для записи. Двоичный файл открывается для чтения и для записи. Rewrite не является настоящей процедурой.
Если файл - типизированный двоичный файл (file of тип данных), используется вторая форма Reset, т. е. передается только файловая переменная. Если файл - нетипизированный двоичный файл (просто file), можно дополнительно указать второй аргумент, определяющий размер записи. Если размер записи не указан, то он равен 128 байт.

Ошибки

  • Если до процедуры Rewrite не была вызвана AssignFile, генерируется ошибка 102.
  • Если Rewrite не может открыть файл, в качестве ошибки ввода/вывода выдается код ошибки Windows.

Советы и приемы

  • Если файл уже открыт, он сначала закрывается.
  • Если файл нетипизированный, то проще всего при его открытии указать размер записи, равный 1, и затем использовать BlockRead и BlockWrite для чтения и записи требуемого количества данных. Как вариант можно создать тип File of Byte, и тогда не потребуется указывать размер записи при вызове Rewrite.

Пример


Пример рассмотрен в описании процедуры Reset.

Смотрите также

Функция IOResult, процедуры Append, AssignFile, CloseFile, Rewrite, Reset.
    Учебник по языку Pascal          Лабораторные работы по программированию          Справочник




Нет комментариев.



Оставить комментарий:
Ваше Имя:
Email:
Антибот:  
Ваш комментарий: