Append                   Opens File for Appending to End

 Append(var OutFile : <file type>);                                      [TP]

    Used to open a file for appending; in other words, when you want to
    add data onto the end of a file, open it with this procedure instead
    of with Rewrite.

         OutFile    Any type of file: text, data, or untyped.

           Note:    You must call Assign before calling Append, and the
                    file must already exist and not be empty.

  -------------------------------- Example ---------------------------------

           Assign(TFile,'DOCUMENT.TXT');
           Append(TFile);
           Writeln(TFile,'This gets slapped on the end');