Вниз
Скачать: 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.021 c
11-41121
LITTEL[MF]
2003-02-16 05:00
2003.11.13
PStrList >Помоему он не доработан или там ошибка.


14-41995
Aleksandr
2003-10-17 14:55
2003.11.13
Как из проекта DLL на Делфи скинуть файл .h?


14-42005
hatchy
2003-10-16 14:40
2003.11.13
Глюк в Windows XP professional


1-41595
Magical
2003-10-26 18:40
2003.11.13
скопировать экран


1-41528
HarryP
2003-10-28 11:39
2003.11.13
Битовые структуры




   Наверх