Erro ao gravar TXT num loop...

Question

Estou dentro de um loop tentando gravar linhas num TXT, s� que ao passar pela 10 vez ele d� pau. Algu�m pode me ajudar.

//
//Grava Arquivo TXT
//
AssignFile(ArqDes, Fn);
Rewrite(ArqDes);
Writeln(ArqDes, �Teste�);
CloseFile(ArqDes);

Andremuller · Answer

N�o sei propriamente qual o problema. Mas normalmente quando tenho que fazer esse tipo de opera��o carrego o arquivo para um TStrings, altero e salvo (se o arquivo n�o for monstruosamente grande)

F�rum Erro ao gravar TXT num loop... #300697