Renomear Diretorio

Delphi

20/02/2006

Ola a todos...


Gostaria de Saber como posso fazer para renomear um diretorio em tempo de execução.

Ja procurei e nao achei


Dart

Dart

Curtidas 0

Respostas

Martins

Martins

20/02/2006

Simples, vc pode renomear usando a função [b:53a8507d3d]RenameFile[/b:53a8507d3d] q faz parte da Unit [b:53a8507d3d]SysUtils[/b:53a8507d3d], essa função pode renomear arquivos e pastas também.

Segue em anexo um pequeno exemplo de como fazer.

Neste exemplo, estarei renomeando a Pasta [color=darkred:53a8507d3d][b:53a8507d3d]C:\Teste[/b:53a8507d3d][/color:53a8507d3d] para [color=darkred:53a8507d3d][b:53a8507d3d]C:\Teste02[/b:53a8507d3d][/color:53a8507d3d]
 if  RenameFile(´C:\Teste´, ´C:\Teste02´) then
     ShowMessage(´A pasta foi renomeada com sucesso!!´)
 else
     ShowMessage(´Não foi possível renomear a pasta!!´);


Boa sorte!!


GOSTEI 0
POSTAR