пятница, 12 октября 2012 г.

Назначение файла и вывод в файл в языке Delphi


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

Задать имя файла позволит процедура AssignFile, которая связывает файловую переменную с определенным файлом. Общий вид инструкции процедуры AssignFile представляется так:
AssignFile(var fail, name: string);
Имя файла нужно задавать с учетом всех принятых в системе Windows правил. Имя файла может являться полным, то есть включать не только непосредственно имя файла, но и путь у этому файлу (наименование диска, каких-либо каталогов, либо же подкаталогов).

Примеры (вызов процедуры AssignFiie)
AssignFile(fail, 'D:\Program Files\summa.txt');AssignFile(fail, '\shkola\ucheniki\sydorov.txt');
namefile:=('buhuchet.txt'); AssignFiie(failik, namefile);

Вывод в файл в языке Delphi
Для того, чтобы вывести в файл, например, в текстовый файл необходимые данные, пользуются инструкциями write или writeln. Общий вид инструкции write и writeln выглядит следующим образом:
write (fileperemenaya, spisokvyvoda) ;
writeln (fileperemenaya, spisokvyvoda);
откуда
  • fileperemenaya обозначает переменную, идентифицирующую конкретный файл, в который будет осуществляться вывод;
  • spisokvyvoda представляет собой перечень разделенных запятыми имен переменных, значения которых необходимо вывести в указанный файл. Список вывода может содержать не только имена переменных, но и включать константы строкового типа.
Например, в случае, если файловая переменная fail есть переменная с типом TextFile, то инструкцию для вывода полученных значений переменных y1 и y2 в текстовый файл можно записать в следующем виде:
write(fail, 'Корни квадратного уравнения = ', y1, y2);
Инструкции write или writeln различаются только тем, что после того, как будут выведены все значения, входящие в состав списка вывода, инструкция writeln добавляет в файл еще и символ 'новая строка'.



Комментариев нет:

Отправить комментарий