![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Каталог программы [D6, Win95/98, WinXP]
staratel © (2002-08-12 13:20:00)Люди, помогите кто может!
Как установить текщим каталог для работающей программы.
В этом же каталоге находятся два подкаталога из которых
нужно запустить дополнительные приложения так, чтобы не прописывать полный путь расположения приложений, т. е. сделать независимым от диска. В BASICE это делается просто, в Delphi?!
Если можно лучше привести простенький пример.
Leran2002 (2002-08-12 13:33:00) [1]ExtractFilePath(ParamStr(0)) – путь к твоей проге, с завершающим слэшем (например: c:\MyProga\)
ParamStr(0) – имя exe файла с полным путем к нему (например: c:\MyProga\MyExe.exe)
Вместо ParamStr(0), можно написать Application.ExeName, но ParamStr(0) короче.
Я не знаю но мне не нравиться использовать директории по умолчанию, сам не знаю почему, привык прописывать всегда точные пути, типа такого:
DataPath:= ExtractFilePath(ParamStr(0));
ShellExecute(Application.Handle,"open",
PChar(DataPath+"Testirov.exe"),"",nil,SW_SHOWNORMAL);
Слесарь Матерящийся (2002-08-12 13:30:00) [2]SetCurrentDirectory() Win32 API
Skier (2002-08-12 13:24:00) [3]>staratel
Пляши от Application.ExeName
А также ExtractFileDir или ExtractFilePath...