Вопрос по компоненту WebBrowser [D6, Win2k]
RTZ © (2002-10-30 10:39:00)
Народ ну подскажите каким образом можно блокировать появления
меню при нажатии на правую кнопку мыши очень надо.
Давали ссылку где находится след. код:
Function TForm1.EmbeddedWB1ShowContextMenu(const dwID:
Cardinal;
const ppt: PPoint; const pcmdtReserved: IUnknown;
const pdispReserved: IDispatch): HRESULT;
begin
result := S_OK;
end;
Вставляю в прогу. Компилирую выдает ошибку. Может кто нибудь
другой вариант решения знает? Или я что, то не правильно
делаю?
Кулюкин Олег (2002-10-30 12:02:00) [1]
Я подменял WindowProc, и в своей процедуре показывал свое меню
var MousePos : TPoint;
begin
if (Message.LParamHi = 516 ) or (Message.LParam = 2) then
begin
GetCursorPos(MousePos);
PopupMenu1.Popup(MousePos.x, MousePos.y);
end
else
FOldWinProc(Message);
Наверх 
ЧАТ |
Орешник |
|
