Процедуры и функции для работы с файлами
Append
Синтаксис:
procedure Append(var F: text);
Действие:
Открывает существующий файл, связанный с файловой переменной f в режиме добавления в конец файла. При попытке открыть несуществующий файл появляется ошибка времени выполнения программы.
Assign
Синтаксис:
procedure Assign(var F; ИмяФайла: string);
Действие:
Связывает файловую переменную г с конкретным файлом.
Close
Синтаксис:
procedure Close(var F);
Действие:
Закрывает файл, связанный с файловой переменной f.
EOF
Синтаксис:
function EOF(var F): boolean;
Действие:
Проверяет, не достигнут ли конец файла (end of file) при чтении из файла, связанного с файловой переменной f. Если указатель чтения достиг конца файла, то функция eof возвращает значение true, в противном случае – false.
Erasre
Синтаксис:
procedure Erase(var F);
Действие:
Уничтожает файл, имя которого связано с файловой переменной F.
IOResult
Синтаксис:
function IOResult: integer;
Действие:
Возвращает код результата последней выполненной операции файлового ввода-вывода (в том числе открытия и закрытия файла). Если операция ввода-вывода выполнена успешно, функция возвращает ноль.
Примечание
Чтобы программа могла использовать функцию lOResult, надо перед инструкциями, в результате которых может возникнуть ошибка ввода-вывода, поместить директиву {$1-}, а после этих инструкций – директиву {$1+}.
Reset
Синтаксис:
procedure Reset(var F [:file; RecSize: word]);
Действие:
Открывает существующий файл. Тип файла может быть любым. Если элементы файла не относятся к одному из стандартных типов, то параметр RecSize задает длину записи (в байтах). При попытке открыть несуществующий файл возникает ошибка времени выполнения.
Rewrite
Синтаксис:
procetfbure Rewrite(var F [:file; RecSize: word]);
Действие:
Создает и открывает файл, имя которого связано с файловой переменной f. Если файл с таким именем уже существует то процедура Rewrite его уничтожает и создает новый.