Текущий архив: 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.013 c
