[[maeyanes]]

Hola...

Ya probaste cargarlo en un StringList?

Código Delphi [-]
var
  Fichero: TStringList;
  I: Integer;

begin
  Fichero := TStringList.Create;
  try
    Fichero.LoadFromFile('c:\mifich.txt');
    for I := 0 to Pred(Fichero.Count) do
      Procesar(Fichero[i]);
    // Si deseas guardar el fichero procesado:
    Fichero.SaveToFile('c:\mifichproc.txt')
  finally
    Free
  end
end;

Saludos...