Главная страница
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
1-28124
Ser_Kham1
2002-11-28 14:53
2002.12.09
Crypto


1-27941
sammy
2002-11-29 07:28
2002.12.09
certifiation


1-28062
skirdov
2002-11-27 23:49
2002.12.09
Редактирование данных в Edit, Combobox, StringGrid и пр.


3-27882
DmitryMN
2002-11-21 14:41
2002.12.09
Сжатие InterBase


3-27801
Serg_zxcvbnm
2002-11-22 11:46
2002.12.09
синхронизация данных у пользователей