Rechtsklick im TWebBrowser deaktivieren

[smax]

Hallo,

kann ich irgendwie den Rechtsklick innerhalb des TWebBrowser-Fensters deaktivieren?

[Daniel B]

Hallo,

wenn der Browser so gross ist wie das Formular, dann wäre es am einfachsten die rechte Maustaste auf dem Formular an sich zu verbieten.
Nicht vergessen, im OI, bei Form1 -> KeyPreview auf True zu stellen.
Anschliessend in der OnKeyDown-Prozedur von Form1 folgenden Code:

Delphi-Quellcode:

procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
  if Key = VK_RBUTTON then
    Key := 0;
end;

Grüsse, Daniel

[toms]

@Daniel B: Das wird nicht funktionieren!
Eine Möglichkeit habe ich mal in den SDC Tipps gepostet.

[smax]

Jupp das geht auch leider nicht! Hat jemand eine andere Variante?

[Christian Seehase]

Moin smax,

prinzipiell ginge das über eine Policy (Registry Eintrag).
(ich find' im Moment nur den Eintrag nicht wieder , ggf. mal im MSDN suchen)

Nachteil:
Da TWebbrowser ja eigentlich nur ein IE ist wirkt sich das auf jeden IE aus.

[smax]

Na dann währe es besser wenn man den Rechtklick auf den ganzen Formular deaktivieren kann!

Weisst du zufällig wie? Bei google.de habe ich leider kein Tutorial oder so dazu gefunden...

[Christian Seehase]

Moin smax,

dafür könntest Du im OnContextPopup Handled := true; setzen, aber sonst nichts machen.
Hilft Dir nur beim IE nicht weiter.

[Phoenix]

Es gibt eine unschöne Variante, die als Workaround aber funktionieren dürfte:

Du analyisierst die Seite die gerade im TWebBrowser angezeigt wirst und fügst dort ein JavaScript ein, welches den Mausklick abfängt und z.B. eine Messagebox anzeigt, daß dies nicht erlaubt ist.

Da Du über den Webbrowser vollen Zugriff auf das Dokument hast sollte das eigentlich recht einfach sein.

[smax]

@ Phoenix:

Nein die Variante ist zu unsicher!

Mhh mist weiss noch jemand wo ich soetwas her bekommen kann?

[flomei]

Hast du so etwas wie hier vor?

MfG Florian