[Electronic_Arts]

Если рядом то так

Код:

var
path:string;
begin
Path := ExtractFilePath((Application.ExeName)); //просто далее укажи файл 
end;                                         //например +'123.exe'