VPF::Снова WebBrowser :) - Форум программистов

codexby

Дата 2.12.2008, 12:47 (ссылка)

(нет голосов)

Загрузка ...

Новичок

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

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

приветствую!
как в TWebBrowser или EWB повесить своё контекстное меню? Стандартное меню WebBrowser я вырубил через перехват сообщений, в EWB выключается в опциях, а как добавить своё? (вызов своего меню в свойстве popupmenu работает до тех пор, пока не загружена какая-либо страница)
спасиб!

December

Дата 2.12.2008, 14:31 (ссылка)

(нет голосов)

Загрузка ...

Antitheorist

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

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

ни гугл, ни DRKB не признаются?

--------------------

Для друзей с винграда - скидки на разработку сайтов

codexby

Дата 2.12.2008, 17:42 (ссылка)

(нет голосов)

Загрузка ...

Новичок

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

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

нашел на форуме ewb:

Код


function TForm1.EmbeddedWB1ShowContextMenu(const dwID: Cardinal;
const ppt: PPoint; const pcmdtReserved: IUnknown;
const pdispReserved: IDispatch): HRESULT;
begin
  PopupMenu1.Popup(ppt.x, ppt.y); //show our own contextmenu
  result := S_OK;    // Don't show default menu
end;
end;

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