Главная страница
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.042 c
1-1120045416
KorD
2005-06-29 15:43
2005.07.18
Как получить сокращенный путь к каталогу?


4-1116584355
aleshap
2005-05-20 14:19
2005.07.18
WIN <-> DOS


1-1119851637
Vad74
2005-06-27 09:53
2005.07.18
Не работает Application.OnHelp в Delphi 6


3-1117799125
Iova
2005-06-03 15:45
2005.07.18
Как получить список реквизитов справочника


14-1119364741
NW
2005-06-21 18:39
2005.07.18
Info Setup