Obtenir le chemin de l'application


Le nom de l'application est stocké dans les 2 variables ParamStr(0) et Application.Exename avec leur chemin complet. Pour obtenir le chemin de l'application, il suffit donc d'extraire le chemin à l'aide de la fonction ExtractFilePath :

2 méthodes

Chemin := ExtractFilePath(ParamStr(0));

{ou bien}

Chemin := ExtractFilePath(Application.Exename);



Parfois, lorsque l'utilisateur créée un raccourci vers votre application, il modifie le répertoire de travail. Si vous travaillez avec des fichiers se trouvant dans le même répertoire que l'executable, ceci peut vous poser des problèmes.
Pour résoudre ceci, vous pouvez obtenir le répertoire physique de votre application, et définir le répertoire de travail de votre application:


forcage du répertoire de travail de l'application

uses
  SysUtils;

function GetExePath: string;
begin
  Result := ExtractFilePath(Application.Exename);
end;

begin
  SetCurrentDir(GetExePath);
end;




3 requête(s) SQL executée(s) en 0.001 Secs - Temps total de génération de la page : 0.007 Secs