Вниз
Скачать: CL | DM;

Получить директорий из которого запущен exe-файл   Найти похожие ветки 

← →
Евгений Т.   (2003-10-28 18:04) [0]

Здравствуйте !
Моя проблема такова: нужно в программе на Delphi получить директорий, из которого она будет запущена в виде exe-файла.
И еще один связанный вопрос: из exe-файла нужно вызывать файл помощи в формате CHM. Каталог, из которого будет запускаться exe файл заранее не известен. Решение помещать exe и chm файл в один
каталог и использовать конструкцию вида
if FileExists("Georef.chm") then
ShellExecute(Handle, "open", "Georef.chm",
nil, nil, SW_SHOWNORMAL);
не работает, если в ходе работы программы текущий системный каталог меняется.
С уважением, Евгений.


← →
Юрий Федоров ©   (2003-10-28 18:06) [1]

ExtractFileDir(paramStr(0)) - папка exe


← →
Ferr   (2003-10-28 18:49) [2]

или ExtractFilePath(Application.ExeName)+"Georef.chm"


← →
Vlad ©   (2003-10-28 18:52) [3]

ShellExecute(Handle, "open", ".\Georef.chm",nil, nil, SW_SHOWNORMAL);
Запустит файл из той же директории, где exe


← →
Palladin ©   (2003-10-28 19:09) [4]


> Vlad © (28.10.03 18:52) [3]

не обманывай народ


← →
Vlad ©   (2003-10-28 19:14) [5]

>Palladin © (28.10.03 19:09) [4]
ну да, PChar() забыл


← →
DVM ©   (2003-10-28 19:17) [6]


> Vlad © (28.10.03 18:52) [3]
> ShellExecute(Handle, "open", ".\Georef.chm",nil, nil, SW_SHOWNORMAL);
> Запустит файл из той же директории, где exe

Если программа не сменит теущую директорию до этого


← →
Palladin ©   (2003-10-28 19:18) [7]


> Vlad © (28.10.03 19:14) [5]

нет, косяк именно указанный DVM © (28.10.03 19:17) [6]

осбенно текущие директории любят менять TSave/TOpenDialog


← →
Anatoly Podgoretsky ©   (2003-10-28 19:21) [8]

Да и программа ни причем, можно запустить из ярлыка, со смененой рабочей папкой. А уж про возможности программы можно и не говорить.



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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.022 c
1-41535
vvvvvvv
2003-10-28 10:42
2003.11.13
Как в StringGrid определить номер первой видимой Col/Row?


3-40868
denmin
2003-10-21 11:00
2003.11.13
как сохранить запрос SP в таблицу.


14-41972
RoLeX
2003-10-17 14:28
2003.11.13
Как сделать сканер открытых портов???


14-42063
Rouse_
2003-10-23 12:40
2003.11.13
АТ - команды для Моторолы.


1-41577
Furkan
2003-10-27 13:35
2003.11.13
MDI и scroll




   Наверх