На главную Наши проекты:
Журнал   ·   Discuz!ML   ·   Wiki   ·   DRKB   ·   Помощь проекту
ПРАВИЛА FAQ Помощь Участники Календарь Избранное RSS
msm.ru
Модераторы: SCINER, B.V.
  
    > Как отключить контекстное меню в Webbrowser
      У меня такой маленький, скромный вопрос:
      как ОТКЛЮЧИТЬ на броузере меню которое вылазит по правой кнопке мыши - "назад, вперед, сохранить фон как, и т.д.",
      а если нельзя его отключить, то хоть как деактивировать все эти функции?
      Пробовал
      .menubar = false
      .statusbar = f
      .toolbar = f
      не помогло...
        ExpandedWrap disabled
          Dim WithEvents Doc As HTMLDocument 'ПОДКЛЮЧИТЬ ЧЕРЕЗ REFERENSE
                                             'Microsoft HTML Object Library
           
          Private Function Doc_oncontextmenu() As Boolean
              Exit Function
              End Function
           
          Private Sub Form_Load()
              WebBrowser1.Navigate "C:\Dimon\vbToHTML.htm"
              End Sub
           
          Private Sub WebBrowser1_DocumentComplete(ByVal pDisp As Object, URL As Variant)
              Set Doc = WebBrowser1.Document
              End Sub


        Я тут набросал примерчик, то, что тебе надо!
        Прикреплённый файлПрикреплённый файлProject1.vbp (0.75 Кбайт, скачиваний: 544)
          Вот еще форма к файлу проекта:
          Прикреплённый файлПрикреплённый файлForm1.frm (1.63 Кбайт, скачиваний: 508)
            Цитата dokey @ 17.11.04, 11:41
            Не работает Ваш образец. Пробовал по всякому. И подключал через REFERENSE -'Microsoft HTML Object Library, переставлял и менял много чего. В чём дело, объясните пожалуйста.

            В References еще вот это должно быть подключено: Microsoft Internet Controls
            0 пользователей читают эту тему (0 гостей и 0 скрытых пользователей)
            0 пользователей:


            Рейтинг@Mail.ru
            [ Script execution time: 0,0194 ]   [ 16 queries used ]   [ Generated: 29.03.24, 15:13 GMT ]