GARANTIR DESCONTO

Fórum Deletar Arquivos #164778

05/06/2003

0

Olá...

Desejo deletar um arquivo temporário que crio ao criar o form, no entanto ele não está sendo deletado.
-para criar estou usando:
s:= GetCurrentDir+´DB\Temp.txt´;
FileCreate(s);
-e para excluir:
DeleteFile(GetCurrentDir+´DB\Temp.txt´);

queria que o arquivo fosse deletado incondicionalmente(mesmo que estivesse aberto)

Espero que alguém possa me ajudar.
Desde já, Obrigado.


Joaomw

Joaomw

Responder

Post mais votado

05/06/2003

Joaomw,

Verifique o caminho,pois analizando verifiquei que falta a barra invertida ates da pasta db.

DeleteFile(GetCurrentDir+´\DB\Temp.txt´);


adicione a´\´ e faça um teste .




Dedi.


Dedi

Dedi
Responder

Gostei + 1

Mais Posts

05/06/2003

Joaomw

valeu dedi, mas não é isso não...
é como se quando eu criasse o pelo programa algo impedisse o deletefile de funcionar, o que não ocorre se eu criar o arquivo, executar o programa e colocar a instrução deletefile.

mesmo assim obrigado e se vc puder me ajudar eu ainda estou com essa dúvida.

Valeu...


Responder

Gostei + 0

05/06/2003

Cabelo

Você tem certeza que a pasta DB está nesse diretório corrente, pois o delphi pode não retornar erro ao criar ou excluir arquivos, quando ele está sendo utilizado em tempo mde execução, mesmo q ele não seja encontrado.

Sem mais

Cabelo


Responder

Gostei + 0

05/06/2003

Dedi

João, teria algum problema em usar AssignFile no lugar de FileCreate?
se não faça assim
var s:string;
arq: TextFile;
begin
  s:= GetCurrentDir+´\DB\Temp.txt´;
  AssignFile ( arq, s );
  Rewrite ( arq );
  CloseFile ( arq );
  DeleteFile(s);
end;


Dedi.


Responder

Gostei + 0

05/06/2003

Nildo

Da um showmessage do primeiro GetCurrentDir e um do segunto GetCurrentDir, pois aposto que eles vao ser diferentes !.

Caso sejam iguais, vc precisa dar um free no objeto q vc usa pra criar o arquivo, para ele liberar o acesso do arquivo previamente aberto


Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar