Главная страница
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.025 c
1-27983
Ag2002
2002-11-29 16:04
2002.12.09
списки


4-28331
Me2
2002-10-24 12:28
2002.12.09
Иконка EXE файла


1-27929
Пиноккио
2002-11-28 21:49
2002.12.09
Программный скролл DrawGrid


3-27904
Игорь, г.Алапаевск
2002-11-21 17:06
2002.12.09
Упаковать таблицу


3-27802
stoper
2002-11-19 21:15
2002.12.09
Первые шаги в SQL. HELP!!! HELP!!!HELP!!!