Блокировка пунктов меню

[Gigahard]

Когда в окне ввода текста жмешь правой кнопкой мыши, то всплывает меню редактирования. Так вот такой вопрос: Можно ли вообще удалить из меню пункты копировать, вырезать, вставить. А если нельзя, то как их заблокировать?

[RayShade]

Ну во первых есть целая пачка API функций по работе с меню.

А потом опять же можно обрабатывать сообщения от мыши и блокировать появление меню

[Amed]

ИМХО такой пример был на каком-то сайте... Посмотрите на http://www.vbnet.ru.

[Gigahard]

Ну во первых есть целая пачка API функций по работе с меню.
А потом опять же можно обрабатывать сообщения от мыши и блокировать появление меню

Ну то что такие функции есть я и сам подозревал . Ну а насчет обработчика событий мыши, че то не блокируется меню то. И вообще хочется не абстрактное высказывание, дескать "есть целая пачка", а конкретный пример.

[Amed]

Ну, можно вот так...:
Данный пример покажет, как можно заблокировать стандартное контекстное меню элемента TextBox. Расположите на форме TextBox, а также создайте невидимое меню mnuText и как минимум одно подменю. Запустите проект, нажмите правой клавишей мыши на TextBox'е...

Private Declare Function LockWindowUpdate Lib "User32" (ByVal hwndLock As Long) As Long

Private Sub Text1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Button = vbRightButton Then
LockWindowUpdate Text1.hWnd
Text1.Enabled = False
DoEvents
PopupMenu mnuText
Text1.Enabled = True
LockWindowUpdate 0&
End If
End Sub

Могли бы и сами найти...

[Gigahard]

Могли бы и сами найти...

Ну не нашел вот Форум то для этого и существует собственно


А как насчет дисейбла, отдельных пунктов меню?

[Amed]

Amed писал(а):

Могли бы и сами найти...

Ну я же сайт сказал даже

А с блоком отдельных можно предложить вот что:

Создаёте своё точно такое же меню, и уже в нём пишете обработку событий...
P.S. используется объект Clipboard (clipboard.settext и т.д.)

То есть, сначала блокируете основное меню, а потом показываете своё (popupmenu MyMenu)...

Надеюсь, я понятно объяснил?