Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2002.08.22;
Скачать: [xml.tar.bz2];

Вниз

Каталог программы   Найти похожие ветки 

 
staratel   (2002-08-12 13:20) [0]

Люди, помогите кто может!
Как установить текщим каталог для работающей программы.
В этом же каталоге находятся два подкаталога из которых
нужно запустить дополнительные приложения так, чтобы не прописывать полный путь расположения приложений, т. е. сделать независимым от диска. В BASICE это делается просто, в Delphi?!
Если можно лучше привести простенький пример.


 
Skier   (2002-08-12 13:24) [1]

>staratel
Пляши от Application.ExeName

А также ExtractFileDir или ExtractFilePath...


 
Слесарь Матерящийся   (2002-08-12 13:30) [2]

SetCurrentDirectory() Win32 API


 
Leran2002   (2002-08-12 13:33) [3]

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);



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

Форум: "Основная";
Текущий архив: 2002.08.22;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.44 MB
Время: 0.006 c
1-71182
Mars
2002-08-09 16:58
2002.08.22
Как сделать ComboBox - ReadOnly?


6-71290
Monak
2002-05-21 22:26
2002.08.22
Клавиатура и мыши


1-71189
harismatik
2002-08-09 18:11
2002.08.22
Не помещается вся сторка в ComboBox


1-71232
maxim2
2002-08-08 10:15
2002.08.22
Работа с таймером


1-71097
Aleksandr
2002-08-12 16:45
2002.08.22
Как свернуть программу, чтобы в ТаскБаре не светилась?





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский