Например выход может быть таким:
Запускаем пустой проект, кодом вроде этого(например прописав его в стартап) проверяем где находится проект
_homepath=av.GetProject.GetWorkDir.AsString
Затем пересобираем файл проекта (это просто текстовый файл), но путь (свой, исходный) заменяем в нем на этот..., Закрываем этот проект, открываем свой...
аv.GetProject.SetShutDown (\"Продолжение работы\")av.GetProject.Close
Project.Open ((_homepath+\"\\izuch.apr\").AsFileName)
После чего запускаем вновь собранный файл.. Проще и не придумаешь
Весь код приводить не буду, но суть проста: имея эталонный проект, в любой момент можем узнать папку в которой нахлдимся и пересобрать прект для нее...
мылом могу подробнее
Савенко Альберт