Контекстное меню???

[Alex_new_2030]

Подскажите пожалуйста как можно создать контекстное меню, что бы оно появлялось рядом с курсором при нажатии например на Label.
Спасибо

[GSerg]

Пока не пришёл RayShade и не сказал RTFM, по быстрому объясняем...

В MenuEditor создаём алкаемое меню. Начальному его пункту снимаем галку Visible. Запоминаем его имя, пункта этого.
Объявляем процедуру, к примеру, Label1_Click(). В ней пишем: Me.PopupMenu MyMenuName. Собственно и всё

[Cyrax]

RTFM

ну ладно, раскажу, так уж и быть

меню ,я надеюсь, у тебя в программе есть...
если нет, то бегом в Menu Editor и создавай...

потом в событии _MouseUp твоего любимого (или не любимого ) lable'а пишеш такой

Код: Выделить всё

PopupMenu <имя_меню>

все

[Tarik]

Да, вот только в этих меню есть одна БОООООООЛЬШАЯ проблема: если кликнуть за пределами меню, то оно не исчезает! То есть если я раздумал что-нибудь там нажимать, то мне всё-таки придётся это сделать Как бы это исправить?

[Cyrax]

Да, вот только в этих меню есть одна БОООООООЛЬШАЯ проблема: если кликнуть за пределами меню, то оно не исчезает! То есть если я раздумал что-нибудь там нажимать, то мне всё-таки придётся это сделать Как бы это исправить?

делайте со мно что хотите, но у меня лично ни разу никаких проблем с PopupMenu небыло. и на форме вызывал, и на кнопке, и даже на иконке в трее (естественно иконка моей программы).

а вобще-то, решение этой проблему неоднократно проскакивало на этом формуме. воспользуйтесь поиском.
а ладно, сам нашел, special for you:
http://bbs.vbstreets.ru/viewtopic.php?t ... =popupmenu

[GSerg]

Я, может, особенный какой-то, или комп у меня сильно рулезный, что ли, но меню эти прекрасно исчезают и исчезали всегда и будут исчезать ещё долго.
Так что

[alibek]

Укажи флаг vbPopupMenuRightButton. А вообще, читай хэлп, там черным по белому, на понятном английском языке все разжевано.

[Alex_new_2030]

Спасибо работает