Лабораторная работа № 9. Програмирование с использованием файлов

Цель работы: изучить процесс организации и обработки файлов в языке Object Pascal, освоить применение компонентов OpenDialog и SaveDialog.

9.1. Краткие теоретические сведения

Для организации данных на внешнем носителе используются файлы. Файл – это поименованная совокупность логически связанных данных, хранящихся на запоминающем устройстве компьютера.

Object Pascal располагает средствами создания и обработки файлов различных типов. Для того чтобы получить доступ к файлу, нужно иметь возможность связать созданное в Delphi приложение с некоторым файлом для чтения или записи информации. Эта связь создается при помощи переменных файлового типа - файловых переменных.

В Object Pascal существует три файловых типа:

TextFile – текстовый файл, представляющий собой набор символьных строк переменной длины;

File of <тип> – типизированный файл, представляющий собой набор данных указанного типа;

File – нетипизированный файл, представляющий собой набор неструктурированных данных.

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

Перед использованием файловой переменной она должна быть связана с внешним файлом с помощью вызова процедуры AssignFile:

AssignFile (<файловая переменная>, <имя файла>);

Здесь <файловая переменная> – имя переменной, объявленной в программе как переменная файлового типа;

<имя файла> – символьная строка, содержащая имя файла.

Если файл располагается не в одной папке с программой, то необходимо указать полный путь к файлу.

Когда связь с внешним файлом установлена, его можно открыть для ввода или вывода данных с помощью процедуры Reset:

Reset (<имя файла>);

Эта процедура открывает существующий внешний файл, имя которого было связано с файловой переменной.

Новый файл можно создать и открыть для записи с помощью процедуры Rewrite:

Rewrite(<файловая переменная>);

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

Read (<файловая переменная>, список ввода) чтение записи файла.

Write (<файловая переменная>, список вывода) вывод записи в файл.

Список ввода и список вывода должны иметь данные того же типа, что и компоненты файла.

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

Procedure Seek (var F; N; Longint); перемещает текущую позицию в типизированном файле, связанном с файловой переменной F к компоненту с номером N. Нумерация компонентов в файле начинается с 0.

function FilePos (var F): Longint; Возвращает номер текущего компонента в файле, связанном с файловой переменной F.

function FileSize (var F): Integer; Возвращает количество компонентов в файле, связанном с файловой переменной F.

По завершении обработки файла он должен закрываться с помощью стандартной процедуры CloseFile.

CloseFile (<файловая переменная>);

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