[sur-se]

Hola.
Tengo un fichero de texto bastante grande (con cientos de megas) y quiero ejecutarle un procesado para eliminar una serie de caractares por debajo del ascii 32 que se han colado. El problema es que si utilizo el código siguiente:

  var
   f:textfile;
  ...
    AssignFile(F, 'c:\mifich.txt');  
    Reset(F);
   while not eof(f) do
   begin
       Readln(F, S);                                 
       procesar(s);
   end;
    CloseFile(F);

El fichero no se procesa completamente, ya que llega un momento en que uno de esos caracteres ascii que se han colado debe ser el fin de fichero y se para.
Si abro el fichero con el editor del delphi, por ejemplo, se lee completamente todo el fichero sin problemas, pero si lo abro con el wordpad, entonces sólo llega hasta donde está ese caracter.
Lo que quiero es procesarlo entero para eliminar esos caracteres por debajo del ascii 32, pero sin eliminar los saltos de línea para que siga como estaba.

¿alguna recomendación?