Модераторы: MetalFan
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Своё popup меню для браузера 
:(
    Опции темы
raid
Дата 18.6.2005, 00:27 (ссылка)    |    (голосов: 0) Загрузка ... Загрузка ... Быстрая цитата Цитата


Unregistered











Здарова ! Подскажите плиз как сделать своё popup меню для браузера(TWebBrowser), хотя я установил для него своё попАп меню, но после первой загрузки любой страницы оно меняется на стандартное (от IE).
  Вверх
December
Дата 18.6.2005, 18:06 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Antitheorist
****


Профиль
Группа: Участник
Сообщений: 4423
Регистрация: 14.8.2002
Где: Харьков

Репутация: 12
Всего: 57



На эту тему есть куча статей в Сети, а также в DRKB. В Королевстве Дельфи есть несколько подробных топиков на эту тему. Ссылку дать не могу, потому что сайт сейчас лежит.
Из собственного опыта считаю, что лучше всего ловить компонентом TApplicationEvents мессагу WM_RBUTTONUP и вызывать своё PopupMenu.Popup(x,y). Часто встречается пример, где мышь перехватывается в отдельном модуле под девизом "подключи к проекту и оно заработает" - у меня этот модуль глючил, причины я или не выяснил, или забыл smile


--------------------
Для друзей с винграда - скидки на разработку сайтов
PM MAIL WWW ICQ   Вверх
raid
Дата 19.6.2005, 23:24 (ссылка)    |    (голосов: 0) Загрузка ... Загрузка ... Быстрая цитата Цитата


Unregistered











Можешь обьяснить по подробней, как именно ловить сообщение WM_RBUTTONUP компонентом
TApplicationEvents ?
  Вверх
December
Дата 19.6.2005, 23:41 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Antitheorist
****


Профиль
Группа: Участник
Сообщений: 4423
Регистрация: 14.8.2002
Где: Харьков

Репутация: 12
Всего: 57



В событии
Код

TMainForm.ApplicationEvents1Message(var Msg: tagMSG;
  var Handled: Boolean);

проверяешь
Код

if msg.message=WM_RBUTTONUP then
begin
1. определить координаты мыши (MainForm.ScreenToClient(msg.pt);)
2. сформировать состав меню
3. собственно показать меню
Handled:=true;
end;

По-моему, нужно ещё говорить Handled:=true; и на WM_RBUTTONDOWN а то будет и стандартное показываться.


--------------------
Для друзей с винграда - скидки на разработку сайтов
PM MAIL WWW ICQ   Вверх
raid
Дата 20.6.2005, 00:11 (ссылка)    |    (голосов: 0) Загрузка ... Загрузка ... Быстрая цитата Цитата


Unregistered











Спасибо большое ! У меня появился ещё одни вопрос, каким образом можно узанть что клик
был по линку (<a href>) ?
  Вверх
December
Дата 20.6.2005, 09:33 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Antitheorist
****


Профиль
Группа: Участник
Сообщений: 4423
Регистрация: 14.8.2002
Где: Харьков

Репутация: 12
Всего: 57



raid,
1) один топик - один вопрос
2) Кажется, этот вопрос уже поднимался - поищи по форуму
3) (Раз уж задал smile) Используй метод ElementFromPoint. Более подробно в - MSDN.


--------------------
Для друзей с винграда - скидки на разработку сайтов
PM MAIL WWW ICQ   Вверх
RaIDeR
Дата 20.6.2005, 23:52 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 116
Регистрация: 20.6.2005

Репутация: 2
Всего: 4



Цитата(December @ 20.6.2005, 09:33)
raid,
1) один топик - один вопрос
2) Кажется, этот вопрос уже поднимался - поищи по форуму
3) (Раз уж задал smile) Используй метод ElementFromPoint. Более подробно в - MSDN.

1) Впредь буду знать =)
2) Обязательно поищю.
3) А вто за это, отдельное спасибо =)
PM MAIL   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: ActiveX/СОМ/CORBA"

Rrader
Girder

Запрещено:

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами


  • Литературу по Delphi обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • 90% ответов на свои вопросы можно найти в DRKB (Delphi Russian Knowledge Base) - крупнейшем в рунете сборнике материалов по Delphi
  • Вопросы по SQL и вопросы по базам данных, не связанные с Delphi, задавать здесь

Если Вам помогли, и атмосфера форума Вам понравилась, то заходите к нам чаще! С уважением, Rrader, Girder.

 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Delphi: ActiveX/СОМ/CORBA | Следующая тема »


 




[ Время генерации скрипта: 0.0444 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.