TWebBrowser disablen

[Balu der Bär]

Hallo,

ich benutze die Komponenten TWebBrowser um eine Webseitenvorschau anzuzeigen. Jetzt soll es aber nur eine Vorschau sein, d.h. man soll nicht auf Links in diesem Browser klicken können bzw. auf andere Webseiten surfen können. Eine Eigenschaft a'la Webbrowser1.Enabled oder Vergleichbare gibt es leider nicht. Hat jemand ne Ahnung wie man den TWebBrowser "disablen" kann?

Danke euch,

[mkinzler]

Du müßtest dich ins DOM einklinken und auf die Klicks reagieren.

[Balu der Bär]

Hallo mkinzler,

mit dem DOM kenne ich mich leider überhaupt nicht aus, hast du da vielleicht mal ein kleines Beispiel für mich? Danke dir.

[marabu]

Hallo Pierre,

genügt dir das?

Delphi-Quellcode:

procedure TWebForm.WebBrowserBeforeNavigate2(Sender: TObject;
  const pDisp: IDispatch; var URL, Flags, TargetFrameName, PostData,
  Headers: OleVariant; var Cancel: WordBool);
begin
  Cancel := True;
end;

Grüße vom marabu

[Balu der Bär]

Moin marabu,

stimmt, dass geht tatsächlich.

So simpel kann man manchmal gar nicht denken wie es geht, thx. *g*