Понятие файла достаточно широко. Это может быть обычный файл надиске, коммуникационный порт ЭВМ, устройство печати, клавиатура илидругие устройства.

При работе с файлами выполняются операции ввода - вывода. Операцияввода означает перепись данных с внешнего устройства (из входногофайла) в основную память ЭВМ, операция вывода - это пересылка данныхиз основной памяти на внешнее устройство (в выходной файл).

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

'LAB1.DAT''c:\ABC150\pr.txt''my_files'

Типы файлов Турбо Паскаль

Турбо Паскаль поддерживает три файловых типа:

• текстовые файлы;
• типизированные файлы;
• нетипизированные файлы.

Доступ к файлу в программе происходит с помощью переменныхфайлового типа. Переменную файлового типа описывают одним изтрех способов:

file of тип - типизированный файл (указан тип компоненты);
text - текстовый файл;
file - нетипизированный файл.

Примеры описания файловых переменных:

var f1: file of char; f2: file of integer; f3: file; t: text;

Стандартные процедуры и функции

Любые дисковые файлы становятся доступными программе после связывания ихс файловой переменной, объявленной в программе. Все операции в программе производятся только с помощью связанной с ним файловой переменной.

Assign(f, FileName)

Reset(f)

Rewrite(f)

Close(f)

EOF(f): boolean

Rename(f, NewName)

Erase(f)

IOResult

Работа с типизированными файлами

Типизированный файл - это последовательность компонент любого заданноготипа (кроме типа "файл"). Доступ к компонентам файла осуществляется поих порядковым номерам. Компоненты нумеруются, начиная с 0. Послеоткрытия файла указатель (номер текущей компоненты) стоит в его начале на нулевом компоненте. После каждого чтения или записи указатель сдвигается к следующему компоненту.

Запись в файл:

Write(f, список переменных);

Процедура записывает в файл f всю информацию из списка переменных.

Чтение из файла:

Read(f, список переменных);

Процедура читает из файла f компоненты в указанные переменные. Тип файловыхкомпонент и переменных должны совпадать. Если будет сделана попытка чтения несуществующих компонент, то произойдет ошибочное завершение программы. Необходимо либо точно рассчитывать количество компонент, либо перед каждым чтением данных делать проверку их существования (функция eof, см. выше)

Смещение указателя файла:

Seek(f, n);

Процедура смещает указатель файла f на n-ную позицию. Нумерация в файле начинается с 0.

Определение количества компонент:

FileSize(f): longint;

Функция возвращает количество компонент в файле f.

Определение позиции указателя:

FilePos(f): longint;

Функция возвращает порядковый номер текущего компонента файла f.

Отсечение последних компонент файла:

Truncate(f);

Процедура отсекает конец файла, начиная с текущей позиции включительно.

Работа с текстовыми файлами

Текстовый файл - это совокупность строк, разделенных метками конца строки.Сам файл заканчивается меткой конца файла. Доступ к каждой строке возможенлишь последовательно, начиная с первой. Одновременная запись и чтение запрещены.

Чтение из текстового файла:

Read(f, список переменных);ReadLn(f, список переменных);

Процедуры читают информацию из файла f в переменные. Способ чтения зависитот типа переменных, стоящих в списке. В переменную char помещаются символы из файла. В числовую переменную: пропускаются символы-разделители, начальные пробелыи считывается значение числа до появления следующего разделителя. В переменную типа string помещается количество символов, равное длине строки, но тольков том случае, если раньше не встретились символы конца строки или конца файла.Отличие ReadLn от Read в том, что в нем после прочтения данных пропускаются всеоставшиеся символы в данной строке, включая метку конца строки. Если списокпеременных отсутствует, то процедура ReadLn(f) пропускает строку при чтениитекстового файла.

Запись в текстовый файл:

Write(f, список переменных);WriteLn(f, список переменных);

Процедуры записывают информацию в текстовый файл. Способ записи зависит от типа переменных в списке (как и при выводе на экран). Учитывается формат вывода.WriteLn от Write отличается тем, что после записи всех значений из переменныхзаписывает еще и метку конца строки (формируется законченная строка файла).

Добавление информации к концу файла:

Append(f)

Процедура открывает текстовый файл для добавления информации к его концу.Используйте эту процедуру вместо Rewrite.

Работа с нетипизированными файлами

Нетипизированные файлы - это последовательность компонент произвольного типа.

Открытие нетипизированного файла:

Reset(f, BufSize)Rewrite(f, BufSize)

Параметр BufSize задает число байтов, считываемых из файла или записываемых в него за одно обращение. Минимальное значение BufSize - 1байт, максимальное - 64 К байт. Если BufSize не указан, то по умолчаниюон принимается равным 128.

Чтение данных из нетипизированного файла:

BlockRead(f, X, Count, QuantBlock);

Эта процедура осуществляет за одно обращение чтение в переменную Xколичества блоков, заданное параметром Count, при этом длина блокаравна длине буфера. Значение Count не может быть меньше 1. За однообращение нельзя прочесть больше, чем 64 К байтов.

Необязательный параметр QuantBlock возвращает число блоков, прочитанных текущей операцией BlockRead. В случае успешного завершения операции чтения QuantBlock = Count, в случае аварийной ситуации параметр QuantBlock будет содержать число удачно прочитанныхблоков. Отсюда следует, что с помощью параметра QuantBlock можноконтролировать правильность выполнения операции чтения.

Запись данных в нетипизированный файл:

BlockWrite(f, X, Count, QuantBlock);

Эта процедура осуществляет за одно обращение запись из переменной X количества блоков, заданное параметром Count, при этом длина блока равнадлине буфера.

Необязательный параметр QuantBlock возвращает число блоков, записанных успешно текущей операцией BlockWrite.

Для нетипизированных файлов можно использовать процедуры Seek, FIlePos иFileSize, аналогично соответствующим процедурам типизированных файлов.