ActiveDelphi - Índice do Fórum ActiveDelphi
.: O site do programador Delphi! :.
 
 FAQFAQ   PesquisarPesquisar   MembrosMembros   GruposGrupos   RegistrarRegistrar 
 PerfilPerfil   Entrar e ver Mensagens ParticularesEntrar e ver Mensagens Particulares   EntrarEntrar 

Copiar pastas com subpastas

 
Novo Tópico   Responder Mensagem    ActiveDelphi - Índice do Fórum -> Delphi
Exibir mensagem anterior :: Exibir próxima mensagem  
Autor Mensagem
Luiz_Carlos
Profissional
Profissional


Registrado: Domingo, 20 de Agosto de 2006
Mensagens: 630

MensagemEnviada: Ter Jun 19, 2012 5:20 pm    Assunto: Copiar pastas com subpastas Responder com Citação

Olá,


Como copiar o conteudo de uma pasta (com todas as subpastas e arquivos) de um lugar para outro da maquina?

Grato

Luiz Carlos
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular
GustavoToyota
Profissional
Profissional


Registrado: Domingo, 9 de Outubro de 2011
Mensagens: 605
Localização: Sorocaba - SP

MensagemEnviada: Ter Jun 19, 2012 5:29 pm    Assunto: Responder com Citação

To sem o Delphi aqui mas acho que da pra fazer isso usando a unit ShellAPI.
Se não der, você vai precisar criar uma função para ir copiando utilizando as funções FindFirst e FindNext para navegar pelos arquivos e pastas e CopyFile para copiar os arquivos encontrados para a pasta destino.
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular Enviar E-mail MSN Messenger
joemil
Moderador
Moderador


Registrado: Quinta-Feira, 25 de Março de 2004
Mensagens: 9100
Localização: Sinop-MT

MensagemEnviada: Ter Jun 19, 2012 6:31 pm    Assunto: Responder com Citação

vc tem q usar uma funcao recursiva, usando findfirst e findnext, e toda vez q encontrar uma pasta, chama a funcao q copia os arquivos novamente, ou seja, ela mesmo.

pesquise sobre recursividade
_________________
<b>SEMPRE COLOQUE [RESOLVIDO] NO SEU POST</b>
Enviar imagens: http://tinypic.com/
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular
Mostrar os tópicos anteriores:   
Novo Tópico   Responder Mensagem    ActiveDelphi - Índice do Fórum -> Delphi Todos os horários são GMT - 3 Horas
Página 1 de 1

 
Ir para:  
Enviar Mensagens Novas: Proibido.
Responder Tópicos Proibido
Editar Mensagens: Proibido.
Excluir Mensagens: Proibido.
Votar em Enquetes: Proibido.


Powered by phpBB © 2001, 2005 phpBB Group
Traduzido por: Suporte phpBB