Delphi: Ordner in dem sich eigenes Programm befindet auslesen

Delphi und Lazarus machen es uns einfach den Ordner zu ermitteln, in dem sich die eigene Anwendung befindet. Diese Programmzeile gibt uns den Pfad unseres Programms zurück:

// pfad ist ein String
pfad := ExtractFilePath(ParamStr(0));

ParamStr(0) enthält den Pfad und den Dateinamen unserer Anwendung. Mit ExtractFilePath() ermitteln wir nur den Pfad.

Alternativ kann man statt ParamStr(0) auch Application.Exename benutzen. Application.Exename enthält ebenfalls den kompletten Pfad und den Dateinamen der Anwendung.