Скачать: 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 вся ветка

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



Память: 0.45 MB
Время: 0.012 c