Néha szükség lehet arra, hogy megállapítsuk, hogy a program EXE-je melyik 
könyvtárban található. (Például, ha az INI fájlt itt helyezzük el a windows könyvtár helyett.)

A feladat megoldásához az alábbi funkciót illetve tulajdonságot használhatjuk:
function ExtractFilePath(const FileName: string): string; - visszaadja a paraméterben 
megadott fájl elérési útjából a meghajtó jelét és a könytára(ka)t. 
Tehát lecsapja a végéről a fájl nevét és kiterjesztését.
TApplication.ExeName - visszaadja a futtatott program EXE teljes elérési útját,
fájlnévvel és kiterjesztéssel. 
Lássunk egy példát a fentiek használatára:

procedure TForm1.Button1Click(Sender: TObject);
begin
   MessageDlg('A program EXE könyvtára:' + #13+ ExtractFilePath( Application.ExeName),mtInformation, [mbOk], 0);
end;