Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.06.10;
Скачать: CL | DM;

Вниз

Путь к файлу   Найти похожие ветки 

 
Striker ©   (2002-05-29 09:37) [0]

Мастера подскажите как получить полный путь директории где запустилось моя прога.


 
Ally ©   (2002-05-29 09:40) [1]

GetCurrentDirectory() - The GetCurrentDirectory function retrieves the current directory for the current process.


 
Lord Warlock ©   (2002-05-29 09:44) [2]

ParamStr(0)


 
Dimka Maslov ©   (2002-05-29 09:47) [3]

ExtractFilePath(Application.ExeName);
ExtractFilePath(ParamStr(0));


 
Anatoly Podgoretsky ©   (2002-05-29 09:52) [4]

Эпидемию FindFirst вроде как побороли, теперь идет эпидемия своего пути


 
Кулюкин Олег ©   (2002-05-29 10:54) [5]

Пора в ФАК добавить


 
antonyo   (2002-05-29 11:08) [6]

Помнится и мне такое!!!
var s:string;
s:=application.exename;
while s[length(s)]<>"\" do
begin
setlength(s,length(s)-1);
end;
После всего этого бреда s будет содержать директорию типа
s:="c:\programfiles\example\"


 
yozhik   (2002-05-29 11:20) [7]

используй ExtractFileDir(Application.ExeName)


 
yozhik   (2002-05-29 11:26) [8]

для более корректного получения дирректории, я использую такую ф-цию.

function GetPath(sFileName:string):string;
begin
Result := ExtractFileDir(sFileName);
if Length(Result)>3 then
Result := Result +"\";
end;


 
Anatoly Podgoretsky ©   (2002-05-29 11:27) [9]

Кулюкин Олег © (29.05.02 10:54)
Так тогда придется все функции добавлять, а такой фак уже есть, называется Дельфи хелп, речь видимо идет о переводе справовочной системы на русский язык



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

Текущий архив: 2002.06.10;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.014 c
14-30993
arbiter
2002-05-03 19:27
2002.06.10
Наши или не наши?


14-30984
Erlan
2002-05-07 08:58
2002.06.10
насчет FAT32 и NTFS


14-30994
mifi
2002-05-06 19:50
2002.06.10
пошарив DLL выдала все функции


3-30684
Malyatko
2002-05-17 17:28
2002.06.10
DBGrid <--> Excel.


6-30957
viol-2
2002-03-06 14:58
2002.06.10
WebBrowser