Visual Basic, .NET, ASP, VBScript
 

   
   
     

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

Страница: 1 |

 

  Вопрос: Новое сообщение без темы Добавлено: 21.06.02 07:42  

Автор вопроса:  Smith | Web-сайт: Не хочу ломать голову, если её уже сломал кто-то другой. | ICQ: ненавижу 

 1)Делаешь обычное меню.

2) Делаешь его невидимым

3) Вставляешь следующий код:

Private Sub Form_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Button = vbRightButton Then
 Form1.PopupMenu MnuMenu
 End If
End Sub

Ответить

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

Номер ответа: 1
Автор ответа:
 vbcode



Вопросов: 0
Ответов: 2
 Профиль | | #1 Добавлено: 21.06.02 01:47
Тебе надо в своей программе сделать? Тогда смотри раздел http://vbnet.ru/faq/showfaqgroup.asp?id=4

Ответить

Номер ответа: 2
Автор ответа:
 root



Вопросов: 12
Ответов: 147
 Web-сайт: www.vbnet.ru
 Профиль | | #2
Добавлено: 21.06.02 07:04
Или пример: www.octal.narod.ru/popmenu.rar

Ответить

Номер ответа: 3
Автор ответа:
 Smith



ICQ: ненавижу 

Вопросов: 28
Ответов: 317
 Web-сайт: Не хочу ломать голову, если её уже сломал кто-то другой.
 Профиль | | #3
Добавлено: 21.06.02 07:42

 1)Делаешь обычное меню.

2) Делаешь его невидимым

3) Вставляешь следующий код:

Private Sub Form_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Button = vbRightButton Then
 Form1.PopupMenu MnuMenu
 End If
End Sub

Ответить

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



ICQ: 308-534-060 

Вопросов: 20
Ответов: 1860
 Web-сайт: mc-black.narod.ru/dzp.htm
 Профиль | | #4
Добавлено: 19.05.03 16:40
Господа! А может кто-то знает, как обхитрить VB6: когда у формы borderstyle = 0 'none, то при создании даже невидимого меню эта синяя (у меня) полоса снова вылезает. Она мне не нужна (у меня окно нестрандартной формы), но надо PopupMenu. И еще сопутствующий вопрос: может ли стандартное меню, в т.ч. всплывающее, показывать значки. Если может, то как этого добиться. Спасибо.

Ответить

Номер ответа: 5
Автор ответа:
 Matrix



Вопросов: 34
Ответов: 62
 Web-сайт: delta-net.narod.ru
 Профиль | | #5
Добавлено: 19.05.03 17:23

В свойствах формы выставляешь ControlBox=False, Caption=""(нету). Может вроде... Где-то в библиотеке кодов видел

Ответить

Номер ответа: 6
Автор ответа:
 Диман



ICQ: 224590251 

Вопросов: 29
Ответов: 64
 Web-сайт: www.dimon1int.narod.ru
 Профиль | | #6
Добавлено: 19.05.03 22:11
Используйте АПИ: создание контекстного меню. Так и невидимое меню не надо делать. CreatePopupMenu по моему.

Ответить

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



ICQ: 308-534-060 

Вопросов: 20
Ответов: 1860
 Web-сайт: mc-black.narod.ru/dzp.htm
 Профиль | | #7
Добавлено: 21.05.03 13:41
Спасибо, Matrix, спасибо Диман! Все работает. С картинками сейчас попробую.

Ответить

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



ICQ: 308-534-060 

Вопросов: 20
Ответов: 1860
 Web-сайт: mc-black.narod.ru/dzp.htm
 Профиль | | #8
Добавлено: 21.05.03 14:09
http://www.vbnet.ru/faq/showtopic.asp?id=40 - картинки в меню в библиотеке кодов. Тоже все работает без вопросов! Если кому кроме меня нужно...

Ответить

Страница: 1 |

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



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