Специальные типы файлов языка Pascal

Наряду со стандартными типизированными файлами присутствуют текстовые и нетипизированные файлы. Текстовые файлы являются особыми в том смысле, что состоят из записей произвольной длины и не все описанные выше файловые операции к ним применимы, а те, что применимы, иногда имеют другой смысл. Элементом файла является строка. В качестве разделителей записей используют специальные управляющие символы: возврат каретки (CR) и перевод строки (LF). В программе текстовый файл описывается следующим образом: Var F: text;

Работа с текстовыми файлами имеет некоторые особенности. Текстовый файл нельзя модифицировать, как в примере 2. Неприменима процедура установки указателя. В качестве частичной замены процедуры установки указателя применяются процедуры:

SeekEoLn(F); - установка указателя на конец текущей строки.

SeekEoF(F); - установка указателя в конец файла.

Операции в/в (read, write) имеют свои особенности при работе с текстовыми файлами. Главная особенность: при работе с данными других типов, происходит автоматическое преобразование этих данных к текстовому типу.

Данные хранят в текстовых файлах, если их нужно перенести в другую вычислительную среду. “+”: возможность редактирования, скрыт механизм преобразования типов; ”–”: потери времени на преобразование типов, усечение младших разрядов.

В любой прог-е на Pascal объявлены 2 файловые переменные (input, output), они связаны со стандартными устройствами в/в.

Program name(input, output);

…

var

input, output: text;

…

write(output, p1, p2,…);

read(input, p1, p2,…);

end.

С помощью процедуры Assign можно переназначить значения переменных input и output. Когда прог-а начинает исполняться, эти файлы считаются открытыми.

Для текстовых файлов определены 2 дополнительные стандартные процедуры:

Append(F); - открывает текстовый файл для записи, является аналогом процедуры Rewrite(F); (но Rewrite устанавливает указатель на начало файла, а Append – на конец файла)

SetTextBuf(var F; var Buf; BufSize); - устанавливает буфер для операций над текстовыми файлами, позволяет управлять размещением и размером буфера. По умолчанию размер буфера =128 байт и находится в системной области. (F – файловая переменная; Buf – буфер(например, массив типа char); BufSize – размер буфера (типа word)).

Эти 2 операции только для текстовых файлов.

Нетипизированные файлы:

Не входят в стандарт языка Pascal. Нетипизир-е файлы предназначены для работы с данными произвольной структуры. Тип элемента файла неопределён. Единственное, что известно – длина элемента (записи) файла.

Преимущества использования таких файлов: программист может расширить набор файловых операций языка; чтение носителей, отформатированных в другой файловой системе.

Нетипиз-е файлы описываются в программе так: Var F: file;

Пример открытия нетипиз-е файла:

…

Assign (F, ‘a.dat’);

Reset(F,Size); // Size – длина записи

…

Rewrite(F,Size);

Следует принимать во внимание соответствие длины записи Size и размера физического блока устройства. Для жёстких дисков эта рекомендация не так важна. Универсальное решение проблемы – установить Size=1. Size должен быть кратен длине физической записи, иначе последняя запись может быть не прочитана.

Для организации обмена с нетипизированными файлами, используются 2 стандартные процедуры:

BlockRead(var F: file; var Buf; count: word; var Result: word);

Count – количество записей, заказанных для чтения (за 1 операцию в/в).

Result – число фактически прочитанных записей (за 1 операцию в/в). (Result<=Count)

Дата добавления: 2014-01-07