Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Поиск папки "Program Files" 
:(
    Опции темы
Gordon
Дата 2.8.2006, 20:51 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 459
Регистрация: 9.7.2006

Репутация: нет
Всего: 6
Ребята, подскажите пожайлуста, как можно определить директорию где находится папка "Program Files" smile 


--------------------

  
     
PM MAIL WWW   Вверх
Damarus
Дата 2.8.2006, 21:11 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Awaiting Authorisation
Сообщений: 671
Регистрация: 6.5.2006

Репутация: 1
Всего: 29
ExpandEnvironmentStrings
SHGetSpecialFolderLocation
PM MAIL ICQ Jabber   Вверх
Gordon
Дата 2.8.2006, 21:32 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 459
Регистрация: 9.7.2006

Репутация: нет
Всего: 6
Damarus, не можешь пример подкинуть, пожайлуста...


--------------------

  
     
PM MAIL WWW   Вверх
586
Дата 2.8.2006, 22:05 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Завсегдатай
Сообщений: 2243
Регистрация: 8.5.2006

Репутация: 57
Всего: 146
Код
char buff[260];
ExpandEnvironmentStrings("%ProgramFiles%", buff, 260);
PM   Вверх
Link90
Дата 3.8.2006, 09:04 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


"Битый" пиксель
*


Профиль
Группа: Участник
Сообщений: 214
Регистрация: 25.11.2005
Где: Иркутск - середин а земли!

Репутация: 3
Всего: 7
А ещё путь к папке ProgramFiles можно получить из реестра! Например отсюда:
Ветвь: HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion
Ключ: ProgramFilesDir

Удачи!
PM MAIL ICQ   Вверх
Gordon
Дата 3.8.2006, 10:35 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 459
Регистрация: 9.7.2006

Репутация: нет
Всего: 6
Спасибо большое, ребята.

Добавлено @ 10:45 
Link90, вот так прокатит:
Код

TRegistry *Reg=new TRegistry;
Reg->RootKey=HKEY_LOCAL_MACHINE;
Reg->OpenKey("SOFTWARE\\Microsoft\\Windows\\CurrentVersion",false);
Edit1->Text=Reg->ReadString("ProgramFilesDir");
Reg->CloseKey();    
delete Reg;



--------------------

  
     
PM MAIL WWW   Вверх
Link90
Дата 3.8.2006, 12:15 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


"Битый" пиксель
*


Профиль
Группа: Участник
Сообщений: 214
Регистрация: 25.11.2005
Где: Иркутск - середин а земли!

Репутация: 3
Всего: 7
Gordon, Всё верно, именно так!
PM MAIL ICQ   Вверх
Damarus
Дата 3.8.2006, 12:37 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Awaiting Authorisation
Сообщений: 671
Регистрация: 6.5.2006

Репутация: 1
Всего: 29
Цитата(Gordon @  2.8.2006,  22:32 Найти цитируемый пост)
Damarus, не можешь пример подкинуть, пожайлуста...

1.
Код

TCHAR szBuffer[MAX_PATH];
LPITEMIDLIST ptrItemIdList = NULL;
SHGetSpecialFolderLocation(NULL, CSIDL_PROGRAM_FILES, &ptrItemIdList);
SHGetPathFromIDList(ptrItemIdList, szBuffer);
CoTaskMemFree(ptrItemIdList);


2.
Код

TCHAR szBuffer[MAX_PATH];
SHGetSpecialFolderPath(NULL, szBuffer, CSIDL_PROGRAM_FILES, FALSE);


3.
Код

TCHAR szBuffer[MAX_PATH];
LPITEMIDLIST ptrItemIdList = NULL;
SHGetFolderLocation(NULL, CSIDL_PROGRAM_FILES, NULL, 0, &ptrItemIdList);
SHGetPathFromIDList(ptrItemIdList, szBuffer);
CoTaskMemFree(ptrItemIdList);


4.
Код

TCHAR szBuffer[MAX_PATH];
SHGetFolderPath(NULL, CSIDL_PROGRAM_FILES, NULL, 0, szBuffer);


Добавлено @ 12:41 
Цитата(Gordon @  3.8.2006,  11:35 Найти цитируемый пост)
Link90, вот так прокатит:

Цитата(Link90 @  3.8.2006,  13:15 Найти цитируемый пост)
Gordon, Всё верно, именно так!

Это называется "изобретение велосипеда" smile 
PM MAIL ICQ Jabber   Вверх
Gordon
Дата 3.8.2006, 13:03 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 459
Регистрация: 9.7.2006

Репутация: нет
Всего: 6
Большое спасибо всем!!! smile 


--------------------

  
     
PM MAIL WWW   Вверх
  
 Ответ в темуСоздание новой темы Создание опроса
Правила форума "С++ Builder"
Rrader

Запрещается!

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами

  • Литературу по С++ Builder обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Настоятельно рекомендуем заглянуть в DRKB (Delphi Russian Knowledge Base) - крупнейший в рунете сборник материалов по Дельфи

Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Rrader.
 
1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | C++ Builder | Следующая тема »

Подписаться на тему | Подписка на этот форум | Скачать/Распечатать тему


 




[ Время генерации скрипта: 0.0495 ]   [ Использовано запросов: 21 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
 По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.