Verzeichnis rausbekommen ( der laufenden Anwendung )

[DGS]

moin an alle :)

Also beim programmieren einer Datenbank ist mir ein Problem unterlaufen.
Bei der Datenbank werde verschiedene Bilder geladen, je nach dem welchen Eintrag man aus der Tabelle auswählt.
Bis dahin funktionierte alles richtig.

Nun baue ich die Funktion um neue Einträge hinzuzufügen.
Dabei benutze ich OpenDialog um eine Bild-Datei auszuwählen.
Auch das funktioniert super. Der gibt mir den richtigen Pfad zurück.

Nun kommts aber.
Wenn ich zurückgehe, und irgendein Eintrag auswähle, kommt Delphi-Debug meldung.
Grund: Datei nicht gefunden.

Um ein Bild zu laden mach ich sowas wie image1.picture.loadfromfile('pfx1.jpg');
Tja, davor hat das alles gut geklappt.

Aber nachdem ich mit dem OpenDialog nach einer Datei gesucht habe, ändert sich das Verzeichnis und er kann nix finden.
Somit brauch ich eine function, mit der ich das Verzeichnis rausbekomme, wo grad die EXE ausgeführt wird.

Danke für Hilfe :)

Und... bitte nicht zu kompliziert, wenns geht.
Das Windows-Temp verzeichnis kann man ja mit zwei Zeilen bestimmen. ( evtl kann man auch in eine Zeile packen )

[Keldorn]

Hallo

Delphi-Quellcode:

image1.picture.loadfromfile(extractfilepath(application.exename)+'pfx1.jpg')

Mfg Frank

[DGS]

cool, danke, es funktioniert :)