Obtener la carpeta de la aplicación

5960 vistas

El objeto Application de una unit From contiene un atributo, el ExeName (de tipo string), que contiene el nombre del ejecutable de la aplicación y toda su ruta de acceso.

Para saber únicamente la carpeta del programa usaremos la función ExtractFilePath(const FileName: String): String; de la unidad SysUtils.



delphi
  1. carpeta:= ExtractFilePath(Application.ExeName);



Nota1: Application.ExeName contiene el mismo valor que ParamStr(0)
Nota2: podemos extraer la carpeta de cualquier aplicación con la función ExtractFilePath