Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Каталог программы [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...


Наверх

Титульная страница Поиск, карта сайта Написать письмо