Erro I/O 103 Gerar Arquivo Texto

Delphi

28/04/2010

Estou com um problema: estou gerando um arquivo texto e quando chega no meio do arquivo +- aparece erro I/O 103, achei que eu estava fechando o arquivo em um determinado ponto mas não é isto que esta acontecendo, ja veririquei pra ver se tinha algum dado com problema também não é, alguem sabe me dizer pq q esta aparecendo este erro?



Valdelir Castanheiro

Valdelir Castanheiro

Curtidas 0

Respostas

Wilson Junior

Wilson Junior

28/04/2010

Você está criando ou editando? Verifique se o arquivo não está como somente leitura.
Você pode utilizar um TMemo e depois fazer um Memo.SaveToFile('c:\NomeDoArquivo.TXT').

Espero ter colaborado.
GOSTEI 0
Valdelir Castanheiro

Valdelir Castanheiro

28/04/2010

                       AssignFile(Imp,trim(dblookupcombobox1.text));
                       Rewrite(Imp);
                       Write(Imp,#27#50);       // Reseta Impressora
                       Write(Imp,#27#120#48);  // muda para draft
                       Write(Imp,#27#67#33);  // pagina de 33 linhas
                       Write(Imp,#27#15);    // compacta 17 cpp


Ele pode ser enviado para a impressora quanto para arquivo texto, o usuário escolhe a opção, alguns arquivos menores imprime sem problema, mas os arquivos que tem mais de uma página aparece o erro.


GOSTEI 0
POSTAR