Конференция VBStreets

**Watts[]n!** » 11.02.2007 (Вс) 1:24

Здравствуйте!
У меня такой вопрос: Можно ли как нибудь отрубить контекстное меню для WebBrowser'a?
Как я понял, на MouseDown он не реагирует.

**Antonariy** » 11.02.2007 (Вс) 10:55

В обработчике события oncontextmenu поставить window.event.returnValue=false.

**JohnK** » 11.02.2007 (Вс) 18:09

http://bbs.vbstreets.ru/viewtopic.php?t=30743&postdays=0&postorder=asc&start=0

**Sergeant Pepper** » 11.02.2007 (Вс) 18:21

Код: Выделить всё: Private Function Document_oncontextmenu() As Boolean Document_oncontextmenu = False End Function

где Document:

Код: Выделить всё: Private WithEvents Document As MSHTML.HTMLDocument

Можно показать и свое меню.

**Watts[]n!** » 13.02.2007 (Вт) 0:15

С функцией вроде всё стало понятно. Теперь ругается на "неопределённый пользовательский тип" в строке
"Private WithEvents Document As MSHTML.HTMLDocument"

**Sergeant Pepper** » 13.02.2007 (Вт) 0:27

Watts[]n! писал(а):Теперь ругается на "неопределённый пользовательский тип" в строке
"Private WithEvents Document As MSHTML.HTMLDocument"

Необходима ссылка на Microsoft HTML Object Library

**Watts[]n!** » 13.02.2007 (Вт) 0:41

Значит, нужны не только MS Internet Controls?

**dr.MIG** » 13.02.2007 (Вт) 10:23

Да. Для работы с DOM необходимо добавить ссылку (Project->References) на библиотеку, которую указал Sergeant Pepper.

**Tin** » 27.02.2007 (Вт) 8:20

Извините, не могли бы подсказать в чем моя загвозка - вставил выше указанный код для отключения выпадающего меню. А как связать его с существующим WB в проекте?

**Antonariy** » 27.02.2007 (Вт) 10:00

Код: Выделить всё: Dim WithEvents Document As MSHTML.HTMLDocument WebBrowser1.navigate strKudaNado While WebBrowser1.readyState <> READYSTATE_COMPLETE DoEvents Wend Set Document = WebBrowser1.document

Пора бы уже это в FAQ повесить.

**Tin** » 27.02.2007 (Вт) 10:39

Спаибо, разобрался. Ещё один вопрос - когда станицу в WB пишешь через document.write как можно в неё вставить картинку, точнее какой путь нужна указать картинке чтобы она отобразилась нормально?

**Antonariy** » 27.02.2007 (Вт) 12:19

При использовании такого метода во все относительные ссылки будет добавлено в начало about:blank в 6м IE или about: в 7м. Поэтому нужно писать абсолютные ссылки или придется пробегать по картинкам и заменять им в src "about:blank" и "about:" на "".

**Tin** » 27.02.2007 (Вт) 12:36

Спасибо ещё раз...

И если можно, то последний вопрос - как отключить звук стандартного клика при открытии страницы или её рефреше.
На форуме МСДН советовали отключать звук через апи в ДоунлоадБегин и включать его в ДоунлоадКомплит... Есть более разумные решения?

**GSerg** » 27.02.2007 (Вт) 12:42

А есть такой звук? :roll:

**tyomitch** » 27.02.2007 (Вт) 12:52

Есть.

**Antonariy** » 27.02.2007 (Вт) 12:53

GSerg, есть

Tin сомневаюсь, можно только то, что есть в объектных моделях IE и MSHTML.

**GSerg** » 27.02.2007 (Вт) 13:05

Если имеется в виду звук "начать обзор/закончить обзор", то это на уровне системы, а не IE, и это вообще не нужно трогать, раз пользователю приятно его слышать :roll:

**Antonariy** » 27.02.2007 (Вт) 13:36

Ну можно еще посмотреть, где оно в реестре, и при DownloadBegin/Complete стирать/писать значение.

**dr.MIG** » 27.02.2007 (Вт) 14:38

Antonariy писал(а):Поэтому нужно писать абсолютные ссылки или придется пробегать по картинкам и заменять им в src "about:blank" и "about:" на "".

Ещё можно писать относительные пути к файлам, если в HTML-документе предварительно был указан тег <base href="">, значение href будет явным образом указывать базовый URI документа. :wink:

**Tin** » 27.02.2007 (Вт) 15:02

Спасибо за вариант :wink:

Конференция VBStreets

Меню Web Browser'а

Меню Web Browser'а

Кто сейчас на конференции