DeleteFile(..)

[flavioavilela 0]

boa noite galera... algo estranho está ocorrendo aqui... estou utilizando, para deletar um arquivo a seguinte forma:

 

  DeleteFile(ArqTemp);

onde ArqTemp é 'C:\Windows\System32\Arquivo_Teste.txt'...

 

se eu utilizo, colocando o ArqTemp entre ( ), ele não deleta o arquivo... se eu coloco entre ( ) o caminho completo, ele deleta... :huh: ...

 

alguem sabe oq é isso???

 

desde já, obrigado a todos...

[Mário Monteiro 179]

Tem certeza que o ArqTemp está levando o caminho correto?

 

O arquivo em questão não está com permissões de somente leitura

 

Tem como por um pouco mais do código onde faz pelo menos esta atribuição do caminho a variável

 

Pelo que vi não teria erro mas vamos tentar contornar isso

[wllf 2]

Se você atribuir à variável somente o nome do arquivo sem a extenção também não funciona.

 

Outa coisa esses pontinhos no final da string tem algum significado?

 

'C:\Windows\System32\Arquivo_Teste'...

[flavioavilela 0]

nao, é só para exemplificar... e no arqTemp estou colocando tudo certinho...

 

  if FileExists(ArqTemp) then
  begin
    AssignFile(cArquivo,ArqTemp);
    Result := true;
    cConteudo := '000-000 = NCN' + #13 + #10;
    Reset(cArquivo);
    while not System.EOF(cArquivo) do
    begin
       ReadLn(cArquivo,cLinhaArquivo);
       cCampoArquivo := copy( cLinhaArquivo, 1, 3 );
       case StrToInt( cCampoArquivo ) of
          0: pTransacao := copy( cLinhaArquivo, 11, Length( cLinhaArquivo ) - 10 );
          1: cConteudo := cConteudo + cLinhaArquivo + #13 + #10;
          3: pValor := copy( cLinhaArquivo, 11, Length( cLinhaArquivo ) - 10 );
          10: begin
             cConteudo := cConteudo + cLinhaArquivo + #13 + #10;
             pNomeRede := copy( cLinhaArquivo, 11, Length( cLinhaArquivo ) - 10 );
          end;
          12: begin
               cConteudo := cConteudo + cLinhaArquivo + #13 + #10;
               pNSU := copy( cLinhaArquivo, 11, Length( cLinhaArquivo ) - 10 );
              end;
          27:  cConteudo := cConteudo + cLinhaArquivo + #13 + #10;
          999: cConteudo := cConteudo + cLinhaArquivo;
       end;
    end;
    CloseFile(cArquivo);
    DeleteFile(cArquivo);

ai está o pedaço de um código que estou fazendo.... ele nao deleta... ai eu vou tentar deletar ele "na mão" mesmo, indo na pasta e deletando, ele fala que está aberto :( ...

[Mário Monteiro 179]

imprime o valor de cArquivo só para ver se depois de todo este tratamento esta trazendo o que deveria

[flavioavilela 0]

ok, vou testar e volto com a resposta

[Mr.Positive 0]

bom amigo , tente esse codico aqui oh

 

DeleteFile('C:\WINDOWS\system32\teste.txt');

 

onde ta de vermelho voce coloca o local do arquivo a se deletado + a extensão.

espero que ajude , abraço.