Читайте также: |
|
Типизированные файлы позволяют организовать прямой доступ к каждой из компонента (по его порядковому номеру), поскольку длина любого компонента типизированного файла строго постоянна. Описание файловой переменной для таких файлов выполняется в следующем виде
Var <ф.п.>: file of <тип компонент>;
Перед первым обращением к процедурам ввода-вывода указатель файла стоит в его начале и указывает на компоненту с номером нуль. После каждого чтения или записи указатель сдвигается с следующему компоненту файла. Переменные в списках ввода-вывода должны иметь тот же тип, что и компоненты файла. Если этих переменных в списке несколько, указатель будет смещаться после каждой операции обмена данными между переменными и дисковым файлом.
Для работы с типизированными файлами определены следующие процедуры и функции (табл.9). Процедура SEEK и функции FILESIZE, FILEPOS нельзя использовать для текстовых файлов.
Чтобы переместить указатель в конец файла, можно написать, например: Seek(f,FileSize(f)); где f - файловая переменная.
Файловая переменная предварительно должна быть объявлена предложением FILE OF и связана с именем физического файла процедурой ASSIGN. Файл перед обращением к нему должен быть открыт.
Таблица 9
Процедуры и функции для работы с типизированными файлами
Процедуры, функции | Выполняемые действия |
READ(<ф.п.>, <список ввода>); WRITE(<ф.п.>, <список вывода>); SEEK(<ф.п.>, <номер_компоненты>) FILESIZE(<ф.п.>): LongInt; FILEPOS(<ф.п.>); | Процедура обеспечивает чтение очередных компонентов файла Процедура используется для записи новых компонентов в файл; в качестве элементов вывод может быть выражение Процедура смещает указатель файла к компоненту с указанным номером; <номер_компоненты> - выражение типа LONGINT Функция возвращает количество компонент, содержащихся в файле Функция возвращает порядковый номер компоненты файла, доступной для чтения или записи |
Дата добавления: 2015-09-05; просмотров: 55 | Нарушение авторских прав
<== предыдущая страница | | | следующая страница ==> |
Текстовые файлы | | | Нетипизированные файлы |