zur Startseite Infos für Behinderte Behindertensoftware Forum Programmierarchiv
Webguide Markus privat Kontakt Download Gästebuch
Online Games Entstehungsgeschichte

Verzeichnis ermitteln, aus dem die Anwendung gestartet wurde

Manchmal ist es sinnvol zu wissen, aus welchem Verzeichnis die eigene Anwendung gestartet wurde. Hierzu gibt es zwei Varianten:

procedure TForm1.FormShow(Sender: TObject);
var
Pfad: String;
begin
Pfad := ExtractFilePath(Application.ExeName);
end;

oder

procedure TForm1.FormShow(Sender: TObject);
var
Pfad: String;
begin
Pfad := ExtractFilePath(ParamStr(0));
end;

Die beiden Varianten unterscheiden sich nicht großartig. Im 1. Fall wird Application.ExeName und im 2. Fall ParamStr(0) benutzt. Beide geben den Pfad plus den Dateienamen der Anwendung an. ExtractFilePath holt aus einer Verzeichnisangabe nur das Verzeichnis, also ohne Datei. Z. B. aus "C:\Test\Start.exe" wird "C:\Test\".

zurück zum Stichwortverzeichnis