IPB

> Append (процедура)
Форум
Загрузка...
 
Час быка
Час быка
Карта Интернета
Internet Map
Яндекс.Метрика

Язык:
Русский
English

 Append  (процедура)


Открывает существующий файл для продолжения записи в файл.

Объявление

 Procedure Append(Var F : Text);

Где:

 F - переменная текстового файла.

Режим

Windows, Real, Protected

Замечания

Параметр F - переменная текстового файла, которая должна быть связана с внешним файлом при помощи вызова процедуры Assign.

Append открывает существующий внешний файл с именем, определенным в файловой переменной F. Если внешний файл с данным именем не существует, то происходит ошибка ввода/вывода. Если F уже открыт, то он закрывается и вновь открывается. Текущая позиция файла устанавливается на конец файла.

Если в последнем 128-байтовом блоке файла присутствует символ Ctrl+Z (символ, с кодом 26), то текущая позиция файла устанавливается, так чтобы перезаписать первый встретившийся Ctrl+Z в блоке. Таким образом, к файлу, который завершается символом Ctrl+Z может быть добавлен текст.

Если F было назначено, пустое имя, например Assign(F, ''), то после обращения к Append, F относится к стандартному устройству вывода (номер дескриптора = 1).

После обращения к Append, F становится файлом только для чтения, и указатель позиции файла устанавливается на его конец.

В режиме {$I-} функция IOResult вернет нуль, если операция была успешна, иначе, она вернет отличный от нуля код ошибки.

См. также

Пример

Язык:
Русский
English


 { Пример программы для процедуры Append }

uses Crt;

var
  F : Text;

begin
  Assign(F, 'TEST.TXT');
 ReWrite(F);   { Создаем новый файл }
 WriteLn(F, 'Немножко текста ;-)');
 Close(F);     { Закрываем файл }
 Append(F);    { Добавляем данные к концу файла }
 WriteLn(F, 'Ещё немножко текста !');
 Close(F);     { Закрываем файл }
end.
 
 К началу страницы 
Тэги: Append
 

Код для вставки: :: :: :: ГОСТ ::
Поделиться: //
 


-
Хостинг предоставлен компанией "Веб Сервис Центр" при поддержке компании "ДокЛаб"