Для получения адреса исполняемого файла программы в Delphi можно воспользоваться функцией ParamStr(0). Эта функция возвращает строку с путем к исполняемому файлу программы.

Пример использования:

var
executablePath: string;
begin
executablePath := ParamStr(0);
ShowMessage('Путь к исполняемому файлу: ' + executablePath);
end;

Таким образом, указанный код позволит получить путь к исполняемому файлу программы и вывести его на экран с помощью диалогового окна ShowMessage.

Надеюсь, это поможет вам! Если у вас есть дополнительные вопросы, не стесняйтесь задавать.