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