Главная страница
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.008 c
1-30897
ilysha
2002-05-23 16:27
2002.06.10
Передача параметров запущенному приложению ...


6-30960
Apus
2002-03-28 09:04
2002.06.10
Сети и сетевые приложения


1-30845
Striker
2002-05-29 09:37
2002.06.10
Путь к файлу


1-30847
dzmitry
2002-05-29 11:21
2002.06.10
TListView 2


8-30920
saviola
2002-01-04 11:00
2002.06.10
Кто встречал файлы *.img