Delphi - Относительные адреса?

Внимание, важное сообщение: Дорогие Друзья!
В ноябре далекого 2001 года мы решили создать сайт и форум, которые смогут помочь как начинающим, так и продвинутым пользователям разобраться в операционных системах. В 2004-2006г наш проект был одним из самых крупных ИТ ресурсов в рунете, на пике нас посещало более 300 000 человек в день! Наша документация по службам Windows и автоматической установке помогла огромному количеству пользователей и сисадминов. Мы с уверенностью можем сказать, что внесли большой вклад в развитие ИТ сообщества рунета.

Но... время меняются, приоритеты тоже. И, к сожалению, пришло время сказать До встречи! После долгих дискуссий было принято решение закрыть наш проект. 1 августа форум переводится в режим Только чтение, а в начале сентября мы переведем рубильник в положение Выключен

Огромное спасибо за эти 24 года, это было незабываемое приключение. Сказать спасибо и поделиться своей историей можно в данной теме.

С уважением, ваш призрачный админ, BigMac...

Delphi - Относительные адреса?

D@n1k007

Старожил

Сообщения: 181
Благодарности: 5

Конфигурация

Профиль | Отправить PM | Цитировать

Всем привет! Поздравляю всю прекрасную половину форума с наступающим праздником!
Подскажите пожалуйста как использовать относительные адреса в Delphi (например Temp).
Нужно распаковать файл в Temp, но брать так же в расчет то что данная папка может находится не на диске С:\. Вариант типо %TMP% не работает в Delphi

Жду ваших советов! Заранее спасибо.

Отправлено: 20:12, 06-03-2010

BlackEric

Старожил

Сообщения: 435
Благодарности: 63

Профиль | Отправить PM | Цитировать

Здесь посмотрите

-------
black-eric.livejournal.com

Это сообщение посчитали полезным следующие участники:

D@n1k007

Отправлено: 23:50, 06-03-2010 | #2

Для отключения данного рекламного блока вам необходимо зарегистрироваться или войти с учетной записью социальной сети.

Если же вы забыли свой пароль на форуме, то воспользуйтесь данной ссылкой для восстановления пароля.

pva

Ветеран

Сообщения: 1180
Благодарности: 279

Профиль | Отправить PM | Цитировать

вот ещё http://www.cryer.co.uk/brian/delphi/howto_get_temp.htm

Код:

function GetTempDirectory: String;
var
  tempFolder: array[0..MAX_PATH] of Char;
begin
  GetTempPath(MAX_PATH, @tempFolder);
  result := StrPas(tempFolder);
end;

Код: