Deletar Arquivos

Delphi

05/06/2003

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

Curtidas 0

Melhor post

Dedi

Dedi

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.


GOSTEI 1

Mais Respostas

Joaomw

Joaomw

05/06/2003

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...


GOSTEI 0
Cabelo

Cabelo

05/06/2003

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


GOSTEI 0
Dedi

Dedi

05/06/2003

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.


GOSTEI 0
Nildo

Nildo

05/06/2003

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


GOSTEI 0
POSTAR