Конференция VBStreets

**_Мика_** » 26.11.2004 (Пт) 14:30

Добовлять в меню пункты, это ерунда, а вот как добавить к надписи иконку? :lol:

**hCORe** » 26.11.2004 (Пт) 14:48

См. раздел реестра
HKEY_CLASSES_ROOT\*\shellex\ContextMenuHandlers
Только для того, чтобы создать этот самый "контекст-хендлер

" на VB нужно изощряться. Поищи на RSDN (как написать на C++)

**_Мика_** » 26.11.2004 (Пт) 19:15

А это только через нативы, подругому ни как :cry:

**tyomitch** » 26.11.2004 (Пт) 19:20

Да едва ли... Там же CLSID афаик пишется ;-)

Поищи на сайте edanmo, там была огромная подборка примеров "Shell Extensions"

**klop086** » 26.11.2004 (Пт) 19:38

а как в контекстное меню пункты свои добавлять?

**hCORe** » 26.11.2004 (Пт) 19:54

В коде класса Handler,

Код: Выделить всё: Friend Function QueryContextMenu(ByVal hMenu As Long, ByVal indexMenu As Long, ByVal idCmdFirst As Long, ByVal idCmdLast As Long, ByVal uFlags As Long) As Long Dim hSubMenu As Long, lIdx As Long ... 'Добавление пунктов меню InsertMenu hMenu, indexMenu, MF_BYPOSITION Or MF_SEPARATOR, 0, ByVal 0& InsertMenu hMenu, indexMenu, MF_BYPOSITION Or MF_POPUP, hSubMenu, ByVal "Selected Files" InsertMenu hMenu, 0, MF_BYPOSITION, idCmdFirst, ByVal m_Items(0).Caption InsertMenu hMenu, indexMenu, MF_BYPOSITION Or MF_SEPARATOR, 0, ByVal 0& ... End Function

Полагаю, это исчерпывающий ответ на вопрос.

Контекстное меню Explorer'а