OnClick dlya webbrowser

← →
WebBrowser (2007-08-24 11:58) [0]

Kak napisat" obrabotchik sobytiya OnClick dlya komponenta WebBrowser

← →
@!!ex © (2007-08-24 12:14) [1]

Уважайте форум - пишите по русски.
Если у вас нет русского языка - в интернете есть специальные сервисы переводящие транслит на русский.

← →
WASM © (2007-08-24 13:07) [2]

> WebBrowser (24.08.07 11:58)

http://delphimaster.net/view/2-1186835096/

возможно сложновато, но работает и потомка классу создавать не надо:

заводим поле и метод
web: TWebBrowser;
oldWndProc:TWndMethod;
procedure NewWndProc(var Msg: TMessage);

следующий код должен выполнитсяя поместил его в сонструктор класса

oldWndProc:=web.WindowProc;
web.WindowProc:=NewWndProc;

ркализацияметода:

procedure Tmainn.NewWndProc(var Msg: TMessage);
begin
if (Msg.Msg=WM_LBUTTONDOWN)then
begin
// Ваш код реакция на клик
end;
oldWndProc(msg);
end;

OnClick dlya webbrowser Найти похожие ветки