Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 26.01.2009, 09:28   #1
Котовский
Пользователь
 
Аватар для Котовский
 
Регистрация: 24.12.2008
Сообщений: 19
По умолчанию Меню Пуск->Программы

Не могу добавить пункт в Меню Пуск->Программы, хотя в каталоге ProgramFiles, директория создается. Есть мнение, что где-то в регистре надо прописывать, а где не извесно. Кто знает, помагите, куда рыть.
Пока жирафы думают, кролики делают!
Котовский вне форума Ответить с цитированием
Старый 26.01.2009, 10:00   #2
ОлеХ
Пользователь
 
Аватар для ОлеХ
 
Регистрация: 16.10.2008
Сообщений: 20
По умолчанию

а можно по потробнее...
Если просто создать меню, то нужно просто создать например папку либо фаил в
"C:\Documents and Settings\$учетная запись пользователя$\Главное меню\Программы\" ...
ОлеХ вне форума Ответить с цитированием
Старый 26.01.2009, 10:05   #3
goblinyara
Форумчанин
 
Аватар для goblinyara
 
Регистрация: 02.01.2009
Сообщений: 340
По умолчанию

либо вместо $учётная запись пользователя$ ставить AllUsers, тогда этот каталог появится в меню Пуск для всех учётных записей.
DelphiWorld 6. Скачай, поставь, и будет тебе счастье=)
Программирование, как и любовь -- одно слово, за которым скрывается бесконечное множество занятий.
goblinyara вне форума Ответить с цитированием
Старый 26.01.2009, 10:28   #4
Arigato
Высокая репутация
СуперМодератор
 
Аватар для Arigato
 
Регистрация: 27.07.2008
Сообщений: 15,547
По умолчанию

Путь к Меню Пуск->Программы можно найти в реестре:
HKCU\Software\Microsoft\Windows\Cur rentVersion\Explorer\Shell Folders
Читаем параметр Programs
Arigato вне форума Ответить с цитированием
Старый 26.01.2009, 10:39   #5
ViktorXP
Форумчанин
 
Аватар для ViktorXP
 
Регистрация: 24.11.2006
Сообщений: 108
По умолчанию

Код:
uses
  ShlObj;

var
  Path: Array[0..255] of Char;
begin
  SHGetSpecialFolderPath(0, pchar(@Path),CSIDL_PROGRAMS, false);
  ShowMessage(Path);
end;
Хотя есил по правилам то нужно еще получить размер буфера под переменную, но насколько я знаю то у фата и нтфса лимит пути в 255 символов
ViktorXP вне форума Ответить с цитированием
Старый 26.01.2009, 12:52   #6
Котовский
Пользователь
 
Аватар для Котовский
 
Регистрация: 24.12.2008
Сообщений: 19
Хорошо

Спасиба всем, особенно ОлеХ. оказываится я просто ни там папку создавал.
Пока жирафы думают, кролики делают!
Котовский вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Caption кнопки ПУСК (START) - изменить надпись на кнопке Пуск в Windows XP Altera Win Api 19 29.12.2011 15:49
Блокировка меню пуск и панели задач !!!! Elektro Безопасность, Шифрование 6 21.04.2009 13:06
Получить список автозагрузки, из меню ПУСК Alter Общие вопросы Delphi 5 03.05.2008 17:45
Отсутствует вкладка "Выполнить" в меню пуск Ronni10 Windows 11 13.02.2008 22:06
аналог меню пуск RammFan Общие вопросы Delphi 14 27.02.2007 08:49