Форум: "Основная";
Текущий архив: 2005.01.23;
Скачать: [xml.tar.bz2];

Вниз

Установка рабочей папки приложения   Найти похожие ветки 

← →
Vlash   (2005-01-13 10:53) [0]

Доброго дня.
Как установить при запуске рабочую папку программы???
Дело в том, что запускается программа иногда через COM (автоматизацию), а при запуске из файлов подгружаются настройки различные.
 AssignFile(OptionsFile,".\Ini\Options.ini");

Так вот: при запуске через COM рабочая оказывается видимо Windows\System, а нужна папка, полученная через ExtractFilePath(Application.ExeName).

Заранее спасибо

---

← →
ЮЮ ©   (2005-01-13 10:57) [1]

>а нужна папка, полученная через ExtractFilePath(Application.ExeName).

Если нужна, так и пиши:
 AssignFile(OptionsFile,ExtractFilePath(ExtractFileDir  (Application.ExeName)) + "Ini\Options.ini");

---

← →
Anatoly Podgoretsky ©   (2005-01-13 12:34) [2]

SetCurrentDir

---

← →
Vlash   (2005-01-13 12:56) [3]

Спасибо за ответы!!! Особенно за SetCurrentDir ;)

---

Страницы: 1 вся ветка

Форум: "Основная";
Текущий архив: 2005.01.23;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.44 MB
Время: 0.034 c