Deletar diretório e copiar com subpastas

Preciso copiar todo o conteúdo de um diretório inclusive subpastas
caso tenha dentro do diretório.
També preciso num único comando remover diretórios.
Eu faço assim:RemoveDirectory(´C:\MeuDir´); mas não remove nada, caso tenha
algo dentro dele(MeuDir não está vazio). Como deletar e copiar tudo?
Obs: Não é copiar arquivos somente, pois isto faço com copyfile, mas copiar
tudo, inclusive pastas caso haja e arquivos.