Hallo,
ich möchte im TWebBrowser einige Tasten, z.b. den rechten Mausklick
für andere Methodenaufrufe nutzen, ich hab dazu mal ein wenig im Forum gesucht
und folgenden Code-Schnipsel gefunden:
Delphi-Quellcode:
procedure TfrmMyBrowser.ApplicationEvents1Message(var Msg: tagMSG;
var Handled: Boolean);
begin
if (Msg.Message = WM_RBUTTONDOWN) or (Msg.Message = WM_RBUTTONDBLCLK) then
begin
if IsChild(Webbrowser1.Handle, Msg.hwnd) then
begin
Handled := True;
end;
end;
end;
Ich hab den Code so übernommen, eigentlich sollte der Mausklick in diesem
Fall komplett verhindert werden. Leider ohne Erfolg. Hab ich irgendwas vergessen?
Mfg