Для чего используется процедура close f
Процедура close
После записи информации в файл его необходимо закрывать с помощью процедуры close.
Процедура rename.
Процедура erase.
Удаление файла, связанного с переменной f, выполняется посредством процедуры erase(f), в которой также является именем файловой переменной. Для корректного выполнения этой операции файл должен быть закрыт.
Процедуры write, read.
Для чтения информации из файла, связанного с файловой переменной f, можно воспользоваться стандартными операторами чтения следующей структуры:
read (f, x1, x2, …, xn);
read (f, x);
Процедура read не проверяет, достигнут ли конец файла. За этим нужно следить с помощью функции eof.
Для записи в файл можно применять стандартные операторы записи следующей структуры:
write (f, x1, x2, …, xn);
write (f, x);
Операторы последовательно записывают в файл значения переменных. Типы файла и переменных должны совпадать.
Подведем итог. Для того чтобы создать файл, необходимо выполнить следующие действия
1. Описать файловую переменную.
2. Связать ее с физическим файлом (assign).
3. Открыть файл для записи (rewrite).
4. Внести необходимую информацию в файл (write).
5. Обязательно закрыть файл (close).
Для выполнения считывания информации из файла надо:
1. Описать файловую переменную.
2. Связать ее с физическим файлом.
3. Открыть файл для чтения.
4. Считать необходимую информацию (на этом этапе нужно проверять, достигнут ли конец файла).
Пример 1. Записать n действительных чисел в файл.
program abc;
f : file of real;
Begin
assign (f, ‘ d: \tp\ abc.dat’);
rewrite(f);
read(n);
for i : =1 to n do
Begin
write (‘a=’);
read (a);
write (f,a)
close (f)
Пример 2. На диске D в каталоге TP находится файл вещественных чисел. Необходимо распечатать его содержимое и вычислить количество компонентов файла.
program bca;
f1:file of real;
Begin
assign (f1, ‘D:\TP\abc1.dat’);
reset (f1);
while not eof (f1) do
Begin
read(f1,a);
writeln(n, ‘-й элемент файла равен ‘, a:10:6)
writeln;
writeln (‘в файле ‘,n,’ элементов’);
Turbo Pascal Documentation
Процедура Close
Функция: Закрывает открытый файл.
Описание: Close(f)
Примечания: Параметр f представляет собой файловую пе-
ременную любого типа файла, который был предварительно отк-
рыт с помощью процедур Rеset, Rеwrite или Аppеnd. Для внеш-
него файла, связанного с переменной f полностью выполняется
его обновление и затем он закрывается, после чего файловый
канал ДОС для данного файла освобождается для последующего
использования.
При использовании директивы компилятора
будет возвращать 0, если операция завершилась успешно и не-
нулевой код ошибки в противном случае.
Прочее: См. также процедуры Append, Assign, Reset,
Rewrite.
Пример:
var f: file;
begin
Assign(f,’\AUTOEXEC.BAT’); < открыть файл >
Reset(f,1);
Writeln(‘Размер файла = ‘,FileSize);
Close(f); < закрыть файл >
end.
Процедура CloseGraph
Модуль Graph
Функция: Останавливает работу графической системы.
Описание: CloseGraph
Примечания: Данная процедура восстанавливает исходный
режим экрана (который был установлен до инициализации графи-
ки) и освобождает в динамически распределяемой области па-
мять, используемую графическим драйвером.
Ограничения: Должен использоваться графический режим.
Прочее: См. также процедуры CloseGraph, DetectGraph,
InitGraph, RestoreCrtMode, SetGraphMode.
Пример:
grDriver := Detect; < установить автоматическое распозна-
вание аппаратуры >
InitGraph(grDriver,grMode,»);
.
CloseGraph;
Pascal: Занятие № 12 Часть1. Работа с файлами в паскале (текстовые файлы)
Работа с файлами в паскале
Виды файлов в зависимости от их описания и режимом работы
Описание файловых переменных:
Для связи файла в коде программы и действительного файла на внешнем носителе используется процедура ASSIGN :
где myfile — имя переменной (объявленной ранее в области var ), ассоциированной с файлом
c:\text.txt — путь к реальному файлу
Первый аргумент процедуры assign в паскаль — переменная, второй – путь к файлу на диске.
Для считывания из файла достаточно связать поток ввода с файлом: