DELPHI> ŁADOWANIE GRAFIKI

Witam

mam jeden problem z moim programem, gdy zrobie do niego skrót to po odpaleniu, nie ładuja mi sie grafiki, gdy uruchomie program w jego folderze wszystko jest ok.
cała grafike z programu mam w folderze 'gfx' i z programie laduje grafike za pomoca
"loadfromfile('gfx\nazwa_pliku.bmp');" oczywiscie przed tym load jest odpowiedni komponent, wpadlem na pomysl ze jakbym mogl jakos pobrac sciezke folderu w jakim znajduje sie program to bym rozwiazal problem, ale nie mam pomyslu jak mozna to zrobic.

Z góry dzięki za pomoc

var
sciezka := string;
begin
sciezka:=ExtractFilePath(Application.ExeName);
Timage1.loadfromfile(sciezka+'gfx\nazwa_pliku.bmp')
end;

nie jestem pewien czy dobrze zrobilem to z tym sciezka+ ale to wiadomo xD

dzieki za szybka i trafna odpowiedz