Já fiz isso na segunda-feira, mas vai de novo.
O estranho é que eu carrego o conteúdo desse arquivo numa StringList, com
certeza quando abro o arquivo, depois carrego todo o conteúdo para uma
variável, eu fecho o arquivo com CloseFile(f) sem problemas.
Acredito que nesse processo de leitura do arquivo tenho que colocar o
Filemode = 0, pois atualmente é a única coisa que falta. Tenho o seguinte
código:
AssignFile(f, arquivo);
Reset(f);
texto := '';
while not Eof(f) do
begin
Read(f, Ch);
if (ord(ch) >= 31) or (ord(ch) in [10, 13]) then
texto := texto + ch;
end;
CloseFile(f);
stArquivo.text := texto;
Isso sempre funcionou só que nas ultimas semanas acredito que o servidor que
entrega os arquivos esteja carregando o arquivo quando eu tento utiliza-lo,
ocasionando o problema acima. Por isso que gostaria de saber se com FileMode
eu soluciono isso.
Att.
_____
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Rubem Nascimento da Rocha
Enviada em: terça-feira, 3 de janeiro de 2006 18:07
Para: delphi-br@yahoogrupos.com.br
Assunto: RE: [delphi-br] I/O error 32??
Prioridade: Alta
Companheiro, posta o código pra gente poder analisar o problema.
Sds.
>From: "Diogo" <[EMAIL PROTECTED]>
>Reply-To: delphi-br@yahoogrupos.com.br
>To: <delphi-br@yahoogrupos.com.br>
>Subject: [delphi-br] I/O error 32??
>Date: Mon, 2 Jan 2006 10:49:48 -0200
>
>Olá
>
>
>
>Estou com esse erro: I/O error 32, acredito que seja porque estou
>tentando
>fazer algo com um arquivo e alguma outra aplicação esteja tentando usar, ou
>concorrendo comigo, para fugir disso, posso setar a variável FileMode = 0
>para conseguir modo exclusivo?
>
>Geralmente o erro aparece na hora que tento copiar um arquivo de um
>diretório para o outro, como esses arquivos estão chegando via FTP acredito
>que seja nesse momento.
>
>Alguém teria alguma sugestão?
>
>Filemode = 0 funciona mesmo?
>
>
>
>Obrigado
>
>
>
>[As partes desta mensagem que não continham texto foram removidas]
>
_________________________________________________________________
MSN Messenger: converse com os seus amigos online.
http://messenger.msn.com.br
--
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
Yahoo! Grupos, um serviço oferecido por:
PUBLICIDADE
<http://br.rd.yahoo.com/SIG=12f2prfmu/M=387526.7663462.8550203.1588051/D=brc
lubs/S=2137111264:HM/Y=BR/EXP=1136326165/A=3215516/R=2/SIG=16e56adpd/*http:/
landingstrip.dell.com/landingstrip/ls.asp?CID=10029&LID=288321&DGC=BA&DGStor
=DHS&DGSite=Yahoo&Conum=BR&DURL=http://www1.la.dell.com/content/products/cat
egory.aspx/desktops?c%3Dbr%26l%3Dpt%26s%3Ddhs>
<http://br.i1.yimg.com/br.yimg.com/i/br/ads6/301205_y300x250dic29_dhs_produc
to.jpg>
_____
Links do Yahoo! Grupos
* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
<mailto:[EMAIL PROTECTED]>
* O uso que você faz do Yahoo! Grupos está sujeito aos Termos do
Serviço do <http://br.yahoo.com/info/utos.html> Yahoo!.
[As partes desta mensagem que não continham texto foram removidas]
--
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
<*> Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages
<*> Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
Links do Yahoo! Grupos
<*> Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
<*> Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
<*> O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html
