Вниз
Скачать: CL | DM;

Как определить папку работ-го приложения?   Найти похожие ветки 

← →
maxXP ©   (2003-09-15 22:25) [0]

Как определить ПАПКУ раб-го приложения?

Как опред-ся путь раб-го приложения я знаю "Application.exename"


← →
8ung ©   (2003-09-15 22:49) [1]

function Getpath(path:string):string;
var
i : integer;
begin
Result := "";
for i := 1 to Length(path) do
begin
if pos("\",path)> 0 then
begin
Result := Result + copy(path,1,pos("\",path));
Delete(path,1,pos("\",path));
end;
end;
end;


← →
Guerrillero ©   (2003-09-16 00:39) [2]

ExtractFilePath


← →
AGGRESSOR ©   (2003-09-16 10:29) [3]

GetCurrentDir
(по умолчанию текущая директория и есть директория .exe файла)


← →
Плохиш_   (2003-09-16 10:38) [4]

>AGGRESSOR © (16.09.03 10:29) [3]

По чьему умолчанию?


← →
Vovchik_A ©   (2003-09-16 10:44) [5]

ParamStr(0)


← →
AGGRESSOR ©   (2003-09-16 10:46) [6]

>Плохиш_ (16.09.03 10:38) [4]

По умолчанию дяди Билли. После запуска приложения его местоположение становится его текущей (рабочей) директорией, если другое не указано, допустим, в свойствах ярлыка.


← →
ZEE ©   (2003-09-16 10:47) [7]

ExtractFilePath(Application.ExeName)
или
ExtractFilePath(ParamStr(0))

а GetCurrentDir - текущая директория, кот. может отличаться от той где лежит exe-шник


← →
ZEE ©   (2003-09-16 10:48) [8]

поправка
ExtractFilePath - на самом деле путь
а директория определяется
ExtractFileDir


← →
Плохиш_   (2003-09-16 10:50) [9]

>AGGRESSOR © (16.09.03 10:46) [6]

c:\tmp> d:\nnn\prog.exe
Ну-ка, раскажи какой директорий будет/станет рабочей?

И про дядю Билли то же не надо.


← →
AGGRESSOR ©   (2003-09-16 11:11) [10]

> c:\tmp> d:\nnn\prog.exe
Это все верно, но вопрос был "Как определить ПАПКУ раб-го приложения", а это немного другое. А вообще лучше сделать как сказал ZEE ©



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

Скачать: CL | DM;



Память: 0.47 MB
Время: 0.02 c
1-96217
APTEMKA
2003-09-18 02:25
2003.09.29
Как избежать ошибки (2 вопроса)


1-96234
Viking
2003-09-18 10:10
2003.09.29
Как получить список открытых форм в Delphi?


14-96349
Сатир
2003-09-09 17:55
2003.09.29
Помогите найти файлик


14-96379
Mr@MsGuns
2003-09-11 11:35
2003.09.29
Все. Бросаем заниматься сексом. Прямо сейчас. Ни одной девочки.


14-96415
Nikolay M.
2003-09-11 10:21
2003.09.29
Тюнинг копейки :)




   Наверх