Até aí está certo, em outra parte do código deve estar com problemas.
Veja:
http://www.delphibasics.co.uk/RTL.asp?Name=CloseFile
http://www.delphibasics.co.uk/RTL.asp?Name=DeleteFile
http://www.delphibasics.co.uk/RTL.asp?Name=AssignFile
Deve ter algo na memória, quem sabe você abriu o NotePad (ou outro
programa) para ver o texto e ele ficou aberto!
Raphae Fonseca escreveu:
>
>
> faço da seguinte forma:
> AssignFile ( arq, cdsArquivosExt.FieldByName('Path').AsString);
> Reset (arq);
> ReadLn (arq, linha);
> Codigo := copy(linha,7,5);
> Mesano := copy(linha,12,8);
> CloseFile (arq);
>
> ________________________________
> De: EmbarcaDelphi <embarcadel...@yahoo.com.br
> <mailto:embarcadelphi%40yahoo.com.br>>
> Para: delphi-br@yahoogrupos.com.br <mailto:delphi-br%40yahoogrupos.com.br>
> Enviadas: Quinta-feira, 23 de Julho de 2009 16:59:08
> Assunto: Re: [delphi-br] Como liberar um arquivo da memória
>
> Como você está abrindo os arquivos? está abrindo para usar no TMemo por
> exemplo ou diretamente no Banco de Dados e exibindo em algum
> componente DB?
>
> Raphae Fonseca escreveu:
> >
> >
> > Boa tarde amigos da lista,
> >
> > estou precisando de uma ajudinha de vcs.
> >
> > Tenho um programa que extrai um arquivo zipado que está gravado num
> > campo blob da tabela e descompacta o arquivo txt numa determinada pasta.
> >
> > Isso está funcionando perfeitamente. Depois de descompactado eu abro o
> > arquivo txt
> > leio alguns dados e passo como parãmetro para ser executado por
> > storeds no banco.
> >
> > O problema é o seguinte:
> > Ao ser descompactado, ele gera as seguintes pastas:
> > c:\Arquivos\ Codigo0512\ 102030.txt
> > c:\Arquivos\ Codigo0512\ 112030.txt
> > c:\Arquivos\ Codigo0512\ 122030.txt
> > c:\Arquivos\ Codigo0512\ 132030.txt
> >
> > são n arquivos, ao final do processamento gostaria de excluir os
> > mesmos pq senão corre o risco de que eu fique sem espaço em disco.
> > Quando tento excluir dá uma mensagem de erro dizendo que o arquivo
> > está sendo usado por um outro programa.
> >
> > Como eu faço para liberar o arquivo da memória?
> >
> > Alguém já fez algo parecido ou já passou pelo mesmo problema?
> >
> > Att
> > Raphael
> >
> > .
> >
> >
>
> .
>
>
