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

Вниз

GetCurrentDir и его альтернатива...   Найти похожие ветки 

 
][рюн   (2002-11-27 20:53) [0]

GetCurrentDir выдает неправильный путь, если программа запущена с ярлыка (WorkDir="") или пользователь начиниет ходить "по папкам" между определением GetCurrentDir.

Как можно СТОПРОЦЕНТНО получить путь к текущей папке?


 
yozhik ©   (2002-11-27 20:55) [1]

что подразумевается под текущей папкой??
если это директория откуда запускалаяь прога тогда моно так:

function GetFileDir(AFile:string=""):string;
begin
if AFile="" then AFile := Application.ExeName;
Result := ExtractFileDir(AFile);
if Length(Result)>3 then
Result := Result +"\";
end;


 
Юрий Зотов ©   (2002-11-28 08:22) [2]

ТЕКУЩУЮ папку дает именно GetCurrentDir. Причем именно стопроцентно.



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

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

Наверх




Память: 0.46 MB
Время: 0.023 c
3-27833
Sergey_Elf
2002-11-20 10:10
2002.12.09
добавить поле в таблицу dbf через delphi 5


14-28285
SPeller
2002-11-19 09:59
2002.12.09
Фильмы с дисками по 50 рублей


6-28177
AlexMain
2002-10-12 17:09
2002.12.09
Как получить МХ запись из DNS?


1-27985
Начинающий делфер
2002-11-29 17:19
2002.12.09
Как запустить?


1-27914
Alathorne
2002-11-28 17:34
2002.12.09
Architect & Enterprise