- •Структурированные
- •Последовательность работы со всеми типами файлов
- •Открытие файла
- •Дозапись текстового файла
- •Проверка на существование
- •Проверка на существование (Пример)
- •Проверка на существование (Пример)
- •Закрытие файлов
- •Подпрограммы для работы со всеми типами файлов
- •Пример
- •Текстовые файлы
- •Текстовые файлы
- •Чтение посимвольно
- •Чтение построчно
- •Чтение массива
- •Функция EOLn, SeekEOLn, SeekEOF
- •Чтение записей
- •Файлы прямого доступа
- •Файлы прямого доступа
- •Усечение файла
- •Пример типизированного
- •Пример типизированного файла
- •Нетипизированные файлы
- •Чтение и запись в нетипизированные файлы
- •Пример
- •Пример
Структурированные
типы данных языка Паскаль.
Файлы
Последовательность работы со всеми типами файлов
Размещение в памяти файловой переменной соответствующего типа;
Связывание такой переменной с именем дискового файла (как правило указывается полное имя - путь и имя);
Создание/открытие файла - выделение ресурса и указание направления обмена информацией между дисковым файлом и программой (открытие на чтение/запись);
Обмен информацией - чтение/запись данных из/в файл. Перемещения по файлу - изменение позиции чтения/записи;
Закрытие файла.
Файл должен быть открыт перед попыткой закрытия.
Открытие файла
ReWrite(F) – создание нового файла
Reset(F) – открытие существующего файла
(для текстового только чтение)
Append(F) – дозапись текстового файла
|
|
Начало файла |
|
|
.. |
|
|
Конец файла |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
Указатель текущей компоненты |
|
|
|
|
|||
|
|
|
|
|
|
|
|
||||
|
|
|
|
|
|
|
|
|
|||
Reset(F) |
|
|
|
|
|
Append(F) |
|||||
|
|
|
|
|
|
|
|
|
|
|
|
Дозапись текстового файла
Проверка на существование
{$I-} – директива компилятору, отменяющая остановку при ошибке ввода-вывода.
IOResult – возвращает код ошибки последней операции ввода-вывода.
IOResult = коду ошибки
0 – если ошибок нет
Проверка на существование (Пример)
{$
{$
Проверка на существование (Пример)
Закрытие файлов
Close(F) – закрытие файла
помещает специальный маркер “конец файла”
перед закрытием должен быть открыт
при выводе закрывать обязательно
Подпрограммы для работы со всеми типами файлов
Rename(<ф.п>, <новое имя
файла>) – переименование неоткрытого файла
Erase(<ф.п>)– удаление неоткрытого файла
файл должен существовать
{$I-} reset(f); {$I+} if IOResult=0 then Begin
close(f); Erase(f); End;
GetDir(<номер диска>,<строка>) - путь к текущему
каталогу диска, номер которого указан (0 -- текущий диск, 1 -- диск А, и т.д.)
ChDir(<путь>) - смена текущего каталога. MkDir(<путь>)- создание каталога. RmDir(<путь>)- удаление пустого
каталога.