Erro ao gravar TXT num loop...
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);
//
//Grava Arquivo TXT
//
AssignFile(ArqDes, Fn);
Rewrite(ArqDes);
Writeln(ArqDes, ´Teste´);
CloseFile(ArqDes);
Wgm8
Curtidas 0
Respostas
Andremuller
25/10/2005
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)
GOSTEI 0