Работа с составными типами данных в системе Turbo Pascal. Батхин А.Б - 24 стр.

UptoLike

Составители: 

var
f : text;
data : File of real;
Lit1, Lit2 : File of char;
stf : st_f_45;
fcar : file of car;
При работе с нестандартными файлами имя файловой переменной (data, Lit1, Lit2,
stf, fchar) должно быть связано с реально существующим объектом (файлом на диске).
Для этого используется стандартная процедура Assign:
Assign(<файловая переменная>,<имя файла>);
Имя файла имеет тип string и может содержать описание пути к файлу, выполненное в
формате DOS.
Например, после выполнения процедуры
Assign(data,'massiv.dta');
данные из
дискового файла massiv.dta (который находится в текущем каталоге) будут
доступны программе через файловую переменную data.
При диалоговой обработке различных файлов внутри одной программы полезны
конструкции вида
var
f_name : string;
f : file of <тип>;
. . . . . . . . . .
readln(f_mame);
. . . . . . . . . .
Assign(f, f_name);
Прежде, чем приступить к работе с файлом (после объявления файловой пере-
менной и выполнения процедуры Assign), необходимо провести его инициацию (от-
крыть файл
, сделать его доступным). Для этого используют одну из процедур Rewrite
или Reset.
Для обмена данными с файлами используют процедуры Read и Write. По оконча-
нии работы с файлом он должен быть закрыт процедурой Close(<файловая перемен-
ная>).
6.2. Процедуры и функции для работы с файлами всех видов
Assign(<файловая переменная>,<имя файла>) – процедура; связывает файловую
переменную с файлом.
Append(<файловая переменная>) – процедура; инициирует запись в ранее суще-
ствовавший текстовый файл для его расширения (при этом указатель файла устанавли-
вается в его конец).
     var
         f : text;
         data : File of real;
         Lit1, Lit2 : File of char;
         stf : st_f_45;
         fcar : file of car;
     При работе с нестандартными файлами имя файловой переменной (data, Lit1, Lit2,
stf, fchar) должно быть связано с реально существующим объектом (файлом на диске).
Для этого используется стандартная процедура Assign:


                               Assign(<файловая переменная>,<имя файла>);
Имя файла имеет тип string и может содержать описание пути к файлу, выполненное в
формате DOS.
         Например, после выполнения процедуры
                                              Assign(data,'massiv.dta');
данные из дискового файла massiv.dta (который находится в текущем каталоге) будут
доступны программе через файловую переменную data.
         При диалоговой обработке различных файлов внутри одной программы полезны
конструкции вида
         var
                f_name : string;
                f          : file of <тип>;
         . ..       ....           ...
                readln(f_mame);
         . ..       ....           ...
                Assign(f, f_name);
         Прежде, чем приступить к работе с файлом (после объявления файловой пере-
менной и выполнения процедуры Assign), необходимо провести его инициацию (от-
крыть файл, сделать его доступным). Для этого используют одну из процедур Rewrite
или Reset.
         Для обмена данными с файлами используют процедуры Read и Write. По оконча-
нии работы с файлом он должен быть закрыт процедурой Close(<файловая перемен-
ная>).


                      6.2. Процедуры и функции для работы с файлами всех видов
         Assign(<файловая переменная>,<имя файла>) – процедура; связывает файловую
переменную с файлом.
         Append(<файловая переменная>) – процедура; инициирует запись в ранее суще-
ствовавший текстовый файл для его расширения (при этом указатель файла устанавли-
вается в его конец).