Модераторы: Poseidon, Snowy, bems, MetalFan
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Почему я немогу найти спецпапку? 
:(
    Опции темы
Егор (к сожалению, не Летов)
Дата 27.8.2002, 22:28 (ссылка) | (голосов: 0) Загрузка ... Загрузка ... Быстрая цитата Цитата


Unregistered
Добрый день. В файле справки сказано, что с помощью функции SHGetSpecialFolderLocation можно найти следующие папки:

Код
{
CSIDL_BITBUCKET
CSIDL_CONTROLS
CSIDL_DESKTOP
CSIDL_DESKTOPDIRECTORY
CSIDL_DRIVES
CSIDL_FONTS
CSIDL_NETHOOD
CSIDL_NETWORK
CSIDL_PERSONAL
CSIDL_PRINTERS
CSIDL_PROGRAMS
CSIDL_RECENT
CSIDL_SENDTO
CSIDL_STARTMENU
CSIDL_STARTUP
CSIDL_TEMPLATES
}

function GetSystemPath(Folder: Integer): string;
var
 PIDL: PItemIDList;
 Path: LPSTR;
 AMalloc: IMalloc;
begin
 Path := StrAlloc(MAX_PATH);
 SHGetSpecialFolderLocation(Application.Handle, Folder, PIDL);
 if SHGetPathFromIDList(PIDL, Path) then
   Result := Path;
 SHGetMalloc(AMalloc);
 AMalloc.Free(PIDL);
 StrDispose(Path);
end;

Label1.Caption := GetSystemPath(CSIDL_BITBUCKET);


Пытаясь найти папку Recycle bin (CSIDL_BITBUCKET) ничего не получаю и с некоторыми другими таkже .... Что неправильно?
  Вверх
Vit
Дата 27.8.2002, 23:25 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Vitaly Nevzorov
****


Профиль
Группа: Экс. модератор
Сообщений: 10964
Регистрация: 25.3.2002
Где: Chicago

Репутация: 48
Всего: 207
Посмотри сюда: http://www.forum.vingrad.ru/cgi-bin....2;t=780


--------------------
With the best wishes, Vit
I have done so much with so little for so long that I am now qualified to do anything with nothing
Самый большой Delphi FAQ на русском языке здесь: www.drkb.ru
PM MAIL WWW ICQ   Вверх
Егор (к сожалению, не Летов)
Дата 31.8.2002, 22:36 (ссылка) | (голосов: 0) Загрузка ... Загрузка ... Быстрая цитата Цитата


Unregistered
Ну-ну.
Вит, ты внимательно читал:

Цитата
Пытаясь найти папку Recycle bin (CSIDL_BITBUCKET) ничего не получаю и с некоторыми другими таkже .... Что неправильно?


Может, у тебя в реестре и есть среди спецпапок "Корзина", но у меня нет.
  Вверх
Mikel
Дата 1.9.2002, 05:21 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник Клуба
Сообщений: 882
Регистрация: 30.3.2002
Где: Саратов

Репутация: 1
Всего: 2
Уже обсуждалось
http://www.forum.vingrad.ru/cgi-bin....;t=2363


--------------------
...so remember, it's better to burn out than to fade away
PM MAIL ICQ   Вверх
  
 Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: Общие вопросы"
SnowyMetalFan
bemsPoseidon
Rrader

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

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

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

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

Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Snowy, MetalFan, bems, Poseidon, Rrader.
 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Delphi: Общие вопросы | Следующая тема »

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


 




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


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

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