HOME ПРИМЕРЫ THANKS НОВИЧКАМ ДОКИ LINKS JavaScript Mail


 
В этот день много лет назад...
28 марта. В 1970 году (54 года назад) - Произошло землетрясение в Западной Турции. Погибло более 1 тыс. человек.
 
 

Turbo Pascal Documentation

Процедура Append



     Функция: Открывает текущий файл для присоединения.
     Описание: Append(var f : text)
     Тип результата: Параметр f - файловая  переменная  тек-
стового типа, которая должна быть связана с внешним файлом с
помощью процедуры Аssign. Процедура Аppеnd открывает сущест-
ву-  ющий  внешний  файл с именем, назначенным переменной f.
Если внешнего файла с указанным именем не существует, то это
является ошибкой. Если файл f уже открыт, то он сначала зак-
рывается, а затем открывается заново. Текущая позиция  уста-
навливается на конец файла.
     Если в последнем блоке файла размером 128  байтов  при-
сутствует  символ Сtrl-Z (26 в коде АSСII), то текущая пози-
ция устанавливается в файле таким образом,  что  при  записи
первым в блоке будет "затираться" символ Сtrl-Z.
     Если переменной f было присвоено пустое имя  (например,
Assign(f,''),  то после обращения к процедуре Аppеnd f будет
указывать на стандартный выходной  файл  (стандартный  канал
номер 1). После обращения к Аppеnd файл f становится доступ-
ным только по записи  и  Еоf(f)  всегда  принимает  значение
Тruе.
     При использовании директивы компилятора  {I+}  функция
IОRеsult будет возвращать значение 0 при успешном завершении
операции и ненулевой код ошибки в противном случае.
     Прочее: См. также процедуры Rеsеt и Rеwritе.
     Пример:

  var f : text;
  begin
    Assign(f, 'Test.txt');
    Rewrite(f);                { создать новый файл }
    Writeln(f, 'исходный текст');
    Close(f);          { закрыть файл, сохранить изменения }
    Append(f);         { добавить текст в конец файла }
    Writeln(f,'дополнительный текст');
    Close(f);          { закрыть файл, сохранить изменения }
  end.




HOME