Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

Путь к папке Program files [D6, Win2k]

Mesha © (2004-04-26 16:11:00)
Подскажите функцию, которая определяет путь к папке Program files для сохранения файлов конфигурации своего приложения. Есть функция GetWindowsDirectory, которая позволяет определить каталог Windows для сохранения конфигураций. Но администратор закрыл это каталог на запись

Игорь Шевченко (2004-04-28 10:25:00) [1]

> А почему в Delphi не работают такие вещи как:

Работают. Их надо правильно использовать. Например, читать про функцию ExpandEnvironmentStrings

Sanek_metaller (2004-04-28 00:19:00) [2]
А почему в Delphi не работают такие вещи как:
%systemroot%
%userprofile%
%windir%
и т.д.

Anatoly Podgoretsky (2004-04-26 16:42:00) [3]
Mesha (26.04.04 16:30) [3]
Ну и что, будет UNC имя, и зачем тогда тебе папка Program files, в которой не будет твоей программы и также будет закрыть доступу, для хранения настроек пользователя выделена специальная папка, это не виндоус и не программые файлы.

Тимохов (2004-04-26 16:35:00) [4]

> Mesha (26.04.04 16:30) [3]

У вас MSDN есть?
Нет? Очень плохо - обязательно купите и установите, в крайнем случае можете залезть на msdn.microsoft.com далее сслыка libriary.

> Нет, программа может запускаться с сервера.

Забудте про programm files - пишите в реестр.
Используйте класс делфи tregistry из модуля registry

Тимохов (2004-04-26 16:35:00) [5]

> Нет? Очень плохо - обязательно купите и установите, в крайнем
> случае можете залезть на msdn.microsoft.com далее сслыка
> libriary.

далее поиском по строке SHGetSpecialFolderLocation...

Mesha (2004-04-26 16:30:00) [6]
> [1] han_malign © (26.04.04 16:14)
> может, все таки, лучше ExtractFilePath(ParamStr(0))?

Нет, программа может запускаться с сервера.

> [2] Тимохов © (26.04.04 16:19)

А что такое SHGetSpecialFolderLocation ?

Тимохов (2004-04-26 16:19:00) [7]
вот так получается my documents.
гляньте доку к SHGetSpecialFolderLocation - там будет, то что вам нужно.
VAR
kBuf: array [0..MAX_PATH] of Char;
kPIDL: PItemIDList;
BEGIN
SHGetSpecialFolderLocation(0, CSIDL_PERSONAL, kPIDL);
SHGetPathFromIDList(kPIDL,@kBuf[0]);
Result := PChar(@kBuf[0]);
END;

ЗЫ. Настройки можно хранить в реестре.

han_malign (2004-04-26 16:14:00) [8]
может, все таки, лучше ExtractFilePath(ParamStr(0))?

Наверх

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