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>
Para: delphi-br@yahoogrupos.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
>
> .
>
>
____________________________________________________________________________________
Veja quais são os assuntos do momento no Yahoo! +Buscados
http://br.maisbuscados.yahoo.com
[As partes desta mensagem que não continham texto foram removidas]
