2 unitées pour pouvoir effacer des octets
n'importe où dans un fichier binaire.

C'est une fonction qui n'existe pas dans TfileStream


Les methodes avec TFileStream et TmemoryStream sont utilisées.