Visual Basic, .NET, ASP, VBScript
 

   
   
     

Форум - Общий форум

Страница: 1 |

 

  Вопрос: Меню с иконками Добавлено: 19.01.06 16:29  

Автор вопроса:  Tamplier | ICQ: 298742928 
Нашел гигантское количество примеров, но то, что мне надо нет!
Мне надо просто добавить иконку к пункту меню. Как это сделать?
Я пробовал разобраться с ModifyMenu, но не получилось...
И еще: ч/з апи-функцию можно изменить цвет меню?

Ответить

  Ответы Всего ответов: 10  

Номер ответа: 1
Автор ответа:
 mc-black



ICQ: 308-534-060 

Вопросов: 20
Ответов: 1860
 Web-сайт: mc-black.narod.ru/dzp.htm
 Профиль | | #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-сайт: mc-black.narod.ru/dzp.htm
 Профиль | | #3
Добавлено: 19.01.06 17:01
1. и 2. используй чужие глючные контролы меню :)

Ответить

Номер ответа: 4
Автор ответа:
 [root]



Вопросов: 45
Ответов: 1212
 Web-сайт: bit.pirit.info
 Профиль | | #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-сайт: bit.pirit.info
 Профиль | | #9
Добавлено: 23.01.06 16:23
Я тебе послал пример - где можно и картинку и иконку в меню запихнуть!

Ответить

Номер ответа: 10
Автор ответа:
 Alexandrus



ICQ: 496782368 

Вопросов: 18
Ответов: 312
 Web-сайт: starsorion.com
 Профиль | | #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
 ;Dim mi As MENUINFO
 mi.cbSize = Len(mi)
 mi.fMask = MIM_BACKGROUND
 mi.hbrBack = CreateSolidBrush(vbRed)
 SetMenuInfo GetMenu(hWnd), mi
 ;DrawMenuBar hWnd
end sub

С ув.Alex

Ответить

Страница: 1 |

Поиск по форуму



© Copyright 2002-2011 VBNet.RU | Пишите нам