Im gleichen Ordner Exe öffnen

[Treffnix]

Das ist ein String. Damit kannste alles machen, was du mit nem String machen kannst.

Label1.caption := ExtractFilePath(Application.ExeName);