Pfad wo die exe liegt aus lesen

[heiopei]

abend,
also so dürfte es gehen, is aber umständlich(des mit dem paramstr... muss gehen, da es bei mir mit delphi 6 personal auch geht!)

var
temp: string;
...
temp := extractfilepath(application.exename);
delete(temp, length(temp) - 1, length(temp));
labelx.caption := temp;
...

tschüss,
heiopei

[Edit] wahr wohl jemand schnell als ich (zumindest mit der ersten behauptung) [/Edit]