Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.07.18;
Скачать: CL | DM;

Вниз

Размещение папки "Быстрый запуск"   Найти похожие ветки 

 
arous ©   (2005-05-20 01:47) [0]

Как узнать размещение папки "Быстрый запуск", там где обычно бывает ярлычок "Свернуть все окна"?
Я делал вот так:


function GetSpecialFolder(Folder: Integer): String;
var
 FolderPath: array [0..max_path] of char;
begin
 SHGetSpecialFolderPath(0, FolderPath, Folder, False);
 Result := FolderPath
end;


Потом ShowMessage(GetSpecialFolder(CSIDL_CONTROLS));

А мне показывает пустую строку. Почему?

В реестре

HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Explorer\Shell Folders

нету этой папки...

Заранее благодарен за Ваш ответ.


 
Ученик   (2005-05-20 07:10) [1]

Удалено модератором
Примечание: AutoModerator


 
ssk ©   (2005-05-20 10:58) [2]

>Ученик  

а если вдруг попадется Win "98? ;-)


 
arous ©   (2005-05-20 12:43) [3]

Нравятся мне простые ответы.
Я, например, сейчас думаю вот так:
  для WinXP, Win2k

C:\Documents and Settings\UserName\Application Data\Microsoft\Internet Explorer\Quick Launch

  для всех остальных виндовсов в реестре смотреть

Software\Microsoft\Windows\CurrentVersion\GrpConv

Но, надо еще протестировать на разных винь. И, всё-таки, может у кого-то есть идейки получше, а?
P.S. У меня и у моих знакомых ни у кого нету ниже WinXP.


 
Anatoly Podgoretsky ©   (2005-05-20 15:33) [4]

Это даже и не идея, у меня например Виндоус стоит на D:, а Documents and Settings на G:


 
arous ©   (2005-05-20 16:17) [5]

Неужели этот примитивный и простой вопрос не разрешим? :-(
Правду говорят, что чаще всего легче решать сложные вопросы...


 
Просто Джо ©   (2005-05-20 16:34) [6]


>
> Потом ShowMessage(GetSpecialFolder(CSIDL_CONTROLS));
>
> А мне показывает пустую строку. Почему?


CSIDL_CONTROLS -
The virtual folder containing icons for the Control Panel applications.

1. Хде тут  "Быстрый запуск"?
2. A CSIDL that identifies the folder of interest. If a virtual folder is specified, this function will fail. Проверяем:
if SHGetSpecialFolderPath(0, FolderPath, Folder, False) then
  Result := FolderPath
else
 RaiseLastOSError;

Так и есть.


 
Ученик   (2005-05-21 08:12) [7]

>Anatoly Podgoretsky ©   (20.05.05 15:33) [4]
CSIDL_APPDATA или
CSIDL_LOCAL_APPDATA +
Microsoft\Internet Explorer\Quick Launch


 
arous ©   (2005-05-22 00:51) [8]

> CSIDL_APPDATA или
> CSIDL_LOCAL_APPDATA +
> Microsoft\Internet Explorer\Quick Launch


Я ниже Win2k и WinXP это тоже делаться будет?


 
Ученик   (2005-05-22 10:50) [9]

>arous ©   (22.05.05 00:51) [8]
http://www.vmware.com



Страницы: 1 вся ветка

Текущий архив: 2005.07.18;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.027 c
11-1103210800
boodilnik
2004-12-16 18:26
2005.07.18
иконки в Delphi7


4-1116854839
Dextor
2005-05-23 17:27
2005.07.18
Перехват всех сообщений программы


6-1113497854
woodoo
2005-04-14 20:57
2005.07.18
Из порта имя службы


14-1119506487
Ega23
2005-06-23 10:01
2005.07.18
С днем рождения! 23 июня


14-1118919283
0legat0r
2005-06-16 14:54
2005.07.18
Не могу просмотреть архивы форума