Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

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;


Наверх

Титульная страница Поиск, карта сайта Написать письмо