[Delphi] ście?żka do pliku

jak w tedicie wyświetlić ścieżkę dostępu do jakiegoś pliku znajdującego się w tym samym katalogu co uruchomiony program? Np. w katalogu C:\Windows\Pulpit\cos\bleble mam program a.exe i chcę, aby po jego uruchomieniu w tedicie (takie okienko do wpisywania - na jedną linię - odpowiednik w HTMLu to input type=text :)) wyświetliło się C:\Windows\Pulpit\cos\bleble\moj_plik.txt

ścieżka programu = ExtractFilePath(Application.Exename)

to co napisałem wyżej to herezja

ścieżka do katalogu programu = ExtractFilePath(Application.Exename)

Teraz lepiej

co ty:

function getapppath:string;
begin
result:=extractfilepath(paramstr(0));
end;

potem

edit1.text:=getapppath+'a.exe';

: PPPPPPPPP

dzięki, działa [cya] [browar]