![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Установка рабочей папки приложения [D6, Win95/98, Win2k]
Vlash © (2005-01-13 10:53:00)Доброго дня.
Как установить при запуске рабочую папку программы???
Дело в том, что запускается программа иногда через COM (автоматизацию), а при запуске из файлов подгружаются настройки различные.
AssignFile(OptionsFile,'.\Ini\Options.ini');
Так вот: при запуске через COM рабочая оказывается видимо Windows\System, а нужна папка, полученная через ExtractFilePath(Application.ExeName).
Заранее спасибо
Vlash (2005-01-13 12:56:00) [1]Спасибо за ответы!!! Особенно за SetCurrentDir ;)
Anatoly Podgoretsky (2005-01-13 12:34:00) [2]SetCurrentDir
ЮЮ (2005-01-13 10:57:00) [3]>а нужна папка, полученная через ExtractFilePath(Application.ExeName).
Если нужна, так и пиши:
AssignFile(OptionsFile,ExtractFilePath(ExtractFileDir (Application.ExeName)) + 'Ini\Options.ini');