Vivendo&Aprendendo Postado Novembro 6, 2004 Denunciar Share Postado Novembro 6, 2004 Ola galerapreciso saber como faço para excluir diretórios e não só arquivos...Alexandre Link para o comentário Compartilhar em outros sites More sharing options...
0 Graymalkin Postado Novembro 6, 2004 Denunciar Share Postado Novembro 6, 2004 Dê uma olhada na função RemoveDir().Abraços,Graymalkin Link para o comentário Compartilhar em outros sites More sharing options...
0 Vivendo&Aprendendo Postado Novembro 6, 2004 Autor Denunciar Share Postado Novembro 6, 2004 cara esse não deu certo ele apaga somente os arquivos e não as pastas...tentei todos as function RemoveDir, RemoveDirectoryA, RemoveDirectoryW, etc...Como posso fazer para funcionar...O problema é o seguinte, tenho um sistema que tem que gerar um arquivo txt, mas antes de gerar ele deve apagar tudo que tem no disquete, pois é gerado no disquete...Veja ai se pode me ajudar...Alexandre Link para o comentário Compartilhar em outros sites More sharing options...
0 Graymalkin Postado Novembro 6, 2004 Denunciar Share Postado Novembro 6, 2004 Funciona sim, a questão é que o diretório tem que estar obrigatoriamente vazio. Trata-se de apenas um arquivo? Se for, você pode simplesmente removê-lo e depois remover a pasta.Abraços,Graymalkin Link para o comentário Compartilhar em outros sites More sharing options...
0 Vivendo&Aprendendo Postado Novembro 6, 2004 Autor Denunciar Share Postado Novembro 6, 2004 caraesse sistema irá ficar instalado em vários escritórios da cidade e o usuário deverá gerar esse disquete, vai que quando ele for gerar o disquete esta cheio de pastas e não caiba o arquivo e outra ele não pode mandar o disquete para o sindicato com outros arquivos dentro somente o arquivo gerado pelo sistema...Alexandre Link para o comentário Compartilhar em outros sites More sharing options...
0 Graymalkin Postado Novembro 6, 2004 Denunciar Share Postado Novembro 6, 2004 Ok, então vou colocar um exemplo aqui de como obter todos os arquivos e diretórios de uma determinada pasta (é claro que você pode especificar somente unidade [por exemplo, A:\] também):var s: TSearchRec; pasta : string; begin pasta := 'c:\teste\'; FindFirst(pasta+'*.*', faAnyFile, s); Repeat if s.Attr=faDirectory then showmessage('Diretório: ' + s.Name) else showmessage('Arquivo: ' + s.Name); Until FindNext(s) <> 0; FindClose(s); end;Você pode daí criar uma rotina recursiva para percorrer todos as subpastas apagando cada arquivo (e depois removê-las também).Abraços,Graymalkin Link para o comentário Compartilhar em outros sites More sharing options...
0 Vivendo&Aprendendo Postado Novembro 6, 2004 Autor Denunciar Share Postado Novembro 6, 2004 Vlw caraAbsAlexandre Link para o comentário Compartilhar em outros sites More sharing options...
Pergunta
Vivendo&Aprendendo
Ola galera
preciso saber como faço para excluir diretórios e não só arquivos...
Alexandre
Link para o comentário
Compartilhar em outros sites
6 respostass a esta questão
Posts Recomendados