Cambiar la carpeta activa
Artículo por cadetill · 27 abril 2006
2601 vistas
Después de cambiar la carpeta activa (mediante la selección de algún fichero en un OpenDialog) puede que nos interese volver a tener como carpeta activa la de nuestra aplicación. Será sencillo con el uso de SetCurrentDir
También nos puede servir para especificar una carpeta activa que no sea la de nuestra aplicación. Bastará con pasarle por parámetro la carpeta a la que "queremos ir"
La función devuelve un booleano siendo true si se ha podido hacer el cambio de directorio o false en caso contrario, por lo que podrÃa ser interesante ponerla en una sentencia if:
delphi
SetCurrentDir(ExtractFilePath(Application.ExeName));
También nos puede servir para especificar una carpeta activa que no sea la de nuestra aplicación. Bastará con pasarle por parámetro la carpeta a la que "queremos ir"
delphi
SetCurrentDir('c:\UnaCarpeta');
La función devuelve un booleano siendo true si se ha podido hacer el cambio de directorio o false en caso contrario, por lo que podrÃa ser interesante ponerla en una sentencia if:
delphi
if SetCurrentDir('c:\UnaCarpeta') then  // proceso normal else  // podemos levantar una excepción o mostrar un mensaje de error