Fórum Problemas com gravação de arquivo texto #334923

use o comando abaixo para gerar um arquivo texto.

AssignFile(FRec, ´Extrato.txt´);
Rewrite(FRec);
Write(FRec,Dm.TaempresaNome.value);
Writeln(FRec);
Write(FRec,Dm.TaempresaEndereco.value);
Writeln(FRec);
Write(FRec,Dm.TaempresaFone.value);
Writeln(FRec);
...
...
...
CloseFile(FRec);

Como o meu extrato é impresso por DLL, no sistema eu gero este arquivo texto Extrato.txt e depois chamo a DLL que abre ele novamente e imprimir o extrato..

Acontece que em alguns clientes, ele trabalha normalmente, mas derepende da um erro e nao gera mais o arquivo.... coloquei mensagens no sistema para ver em que parte do codigo esta o erro, e percebi que
ele executa os comandos

AssignFile(FRec, ´Extrato.txt´);
Rewrite(FRec);

normalmente, mas quando vai dar o primeiro Write da erro.... Ele não consegue gravar no arquivo..

Alguem sabe o que pode estar acontecendo.. Se o cara usa este recursos umas 20 vezes no dia.. O erro vai aparecer umas 2 vezes mais ou menos...