![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
GetCurrentDir и его альтернатива... [D6, WinXP]
][рюн © (2002-11-27 20:53:00)GetCurrentDir выдает неправильный путь, если программа запущена с ярлыка (WorkDir="") или пользователь начиниет ходить "по папкам" между определением GetCurrentDir.
Как можно СТОПРОЦЕНТНО получить путь к текущей папке?
Юрий Зотов (2002-11-28 08:22:00) [1]ТЕКУЩУЮ папку дает именно GetCurrentDir. Причем именно стопроцентно.
yozhik (2002-11-27 20:55:00) [2]что подразумевается под текущей папкой??
если это директория откуда запускалаяь прога тогда моно так:
function GetFileDir(AFile:string=""):string;
begin
if AFile="" then AFile := Application.ExeName;
Result := ExtractFileDir(AFile);
if Length(Result)>3 then
Result := Result +"\";
end;