или, если хочется именно в таймере, то так
вместо
написать
	Код:
	 
{$I-} // выключить Exception при ошибках ввода-вывода
  Append(outfile); // открыть файл для дописывания
  if IoResult <>0 then // если не получилось
   Rewrite(outfile); // то создать новый файл
{$I+} // включить обратно Exception при ошибках ввода-вывода