Страница: 1 |
Страница: 1 |
Вопрос: Меню с иконками
Добавлено: 19.01.06 16:29
Автор вопроса: Tamplier | ICQ: 298742928
Нашел гигантское количество примеров, но то, что мне надо нет!
Мне надо просто добавить иконку к пункту меню. Как это сделать?
Я пробовал разобраться с ModifyMenu, но не получилось...
И еще: ч/з апи-функцию можно изменить цвет меню?
Ответы
Всего ответов: 10
Номер ответа: 1
Автор ответа:
mc-black
ICQ: 308-534-060
Вопросов: 20
Ответов: 1860
Web-сайт:
Профиль | | #1
Добавлено: 19.01.06 16:40
1. SetMenuBitmap или Owerdrawned Menus
2. Сабклассинг меню, сноваа перерисовка.
Номер ответа: 2
Автор ответа:
GeorgeGA
Вопросов: 1
Ответов: 101
Профиль | | #2
Добавлено: 19.01.06 16:53
если в vb.net,то щелкай на самом меню и добавляй сколько влезет
Номер ответа: 3
Автор ответа:
mc-black
ICQ: 308-534-060
Вопросов: 20
Ответов: 1860
Web-сайт:
Профиль | | #3
Добавлено: 19.01.06 17:01
1. и 2. используй чужие глючные контролы меню
Номер ответа: 4
Автор ответа:
[root]
Вопросов: 45
Ответов: 1212
Web-сайт:
Профиль | | #4
Добавлено: 19.01.06 17:05
Че то те на мыло кинул, какой то пример
Номер ответа: 5
Автор ответа:
HACKER
Разработчик Offline Client
Вопросов: 236
Ответов: 8362
Профиль | | #5
Добавлено: 19.01.06 19:29
Tamplier, через ModifyMenu, сабклассить меню надо, mc-black в правельную сторону подсказует, но там довольно сложно для тебя будет... Разве что кто-то за тебя, но у всех щас сессия, некогда, влом итп...
Номер ответа: 6
Автор ответа:
Tamplier
ICQ: 298742928
Вопросов: 58
Ответов: 340
Профиль | | #6
Добавлено: 20.01.06 11:19
HACKER, а лекцию провести? Или ссылочку дать, где это есть? А?
Рут, спасибо, но немного не то, что надо было. Мне надо именно иконку, а не бмп. Возиться с ними еще, переделывать... Времени мало.
mc-black, последняя идея не очень хорошая. Я переворошил более 20-контролов, но ни один не делает того, что мне надо. А на перерисовку я нашел библиотеку, но библиотеку за собой таскать... Вломно как-то. И место она кушает...
Номер ответа: 7
Автор ответа:
LamerOnLine
ICQ: 334781088
Вопросов: 108
Ответов: 2822
Профиль | | #7
Добавлено: 20.01.06 11:29
Быть может http://www.vb.kiev.ua/code/gui/Office_menus.zip ?
А вообще есть поиск по форуму.
http://www.vbnet.ru/forum/show.aspx?id=52339
http://www.vbnet.ru/forum/show.aspx?id=44781
http://www.vbnet.ru/forum/show.aspx?id=40863
http://www.vbnet.ru/forum/show.aspx?id=22820
http://www.vbnet.ru/forum/show.aspx?id=15239
http://www.vbnet.ru/forum/show.aspx?id=10575
http://www.vbnet.ru/forum/show.aspx?id=6572
http://www.vbnet.ru/forum/show.aspx?id=4796
Тему обсосали со всех сторон.
Номер ответа: 8
Автор ответа:
Tamplier
ICQ: 298742928
Вопросов: 58
Ответов: 340
Профиль | | #8
Добавлено: 23.01.06 16:16
Спасибо. Если будут вопросы - спрошу.
Номер ответа: 9
Автор ответа:
[root]
Вопросов: 45
Ответов: 1212
Web-сайт:
Профиль | | #9
Добавлено: 23.01.06 16:23
Я тебе послал пример - где можно и картинку и иконку в меню запихнуть!
Номер ответа: 10
Автор ответа:
Alexandrus
ICQ: 496782368
Вопросов: 18
Ответов: 312
Web-сайт:
Профиль | | #10
Добавлено: 24.01.06 23:54
Tamplier:
Изменение цвета основного меню:
Private Declare Function DrawMenuBar Lib "user32.dll" (ByVal hWnd As Long) As Long
Private Declare Function GetMenu Lib "user32.dll" (ByVal hWnd As Long) As Long
Private Declare Function SetMenuInfo Lib "user32.dll" (ByVal hMenu As Long, ByRef MENUINFO As MENUINFO) As Long
Private Declare Function CreateSolidBrush Lib "gdi32.dll" (ByVal crColor As Long) As Long
Private Type MENUINFO
cbSize As Long
fMask As Long
dwStyle As Long
cyMax As Long
hbrBack As Long
dwContextHelpID As Long
dwMenuData As Long
End Type
Private Const MIM_BACKGROUND = &H2
Private sub Form_Load
 im mi As MENUINFO
mi.cbSize = Len(mi)
mi.fMask = MIM_BACKGROUND
mi.hbrBack = CreateSolidBrush(vbRed)
SetMenuInfo GetMenu(hWnd), mi
 rawMenuBar hWnd
end sub
С ув.Alex