Cette procédure permet d'effectuer l'initialiser un fichier texte en mode d'ajout.
Procedure Append(varfich:Text);