11 Voto

Delphi: Cambiar el Nombre de una Carpeta

Tutorial de Delphieño | 12/05/2021 a las 13:05

En este tutorial, me gustaría mostrarle cómo puede cambiar el nombre de un directorio con Delphi.

Estamos usando el ShellApi de Windows para esto, así que tenemos que escribir la unit ShellApi en nuestra cláusula uses:

uses
   ShellApi;

Después de eso, definimos un procedimiento llamado RenombrarCarpeta, con el cual podemos renombrar la carpeta "CarpetaAntigua" a "CarpetaNueva":

procedure RenombrarCarpeta(CarpetaAntigua, CarpetaNueva: string);
var
   ShellInfo: TSHFileOpStruct;
begin
   ShellInfo.Wnd   := 0;
   ShellInfo.wFunc := FO_RENAME;
   ShellInfo.pFrom := PChar(CarpetaAntigua);
   ShellInfo.pTo   := PChar(CarpetaNueva);
 
   SHFileOperation(ShellInfo);
end;

Finalmente, aquí hay una posible llamada de nuestro procedimiento. Aquí estamos cambiando el nombre de la carpeta "Carpeta" a "NuevoNombre":

procedure TForm1.Button1Click(Sender: TObject);
begin
   RenombrarCarpeta('C:\Carpeta', 'C:\NuevoNombre');
end;

¡Diviértete con los renombrados!

ResponderPositivoNegativo

Sobre el Autor

AvatarEl autor aún no ha agregado una breve descripción del perfil.
Ver Perfil

 

Temas Relacionados

Delphi: Iniciar otra Aplicación

Consejo | 0 Comentarios

Delphi: Cambiar los Atributos de Archivos

Información | 0 Comentarios

Aviso Importante

Por favor tenga en cuenta: Las contribuciones publicadas en askingbox.com son contribuciones de los usuarios y no deben reemplazar el asesoramiento profesional. No son verificados por independientes y no reflejan necesariamente la opinión de askingbox.com. Aprende más.

Participar

Haga su propia pregunta o escriba su propio artículo en askingbox.com. He aquí cómo.