Popup Blocken bei TWebBrowser

[RealSurfer]

Ich öffne über

Delphi-Quellcode:

Webbrowser.navigate('www. .... .com');

bei dieser öffnet sich nun ein Popup.
Ich habe diese Prozedur im Forum schon gefunden weis aber nun nichts mit ihr anzufangen.

Delphi-Quellcode:

procedure TForm1.WebBrowser1NewWindow2(Sender: TObject;
  var ppDisp: IDispatch; var Cancel: WordBool);
begin
  Cancel:=true;
end;

Hab sie in mein programm eingebunden aber muss ich sie extra aufrufen oder geschieht das automatisch?
Oder benötigt man etwas wichtiges in der Uses liste (kommt aber ja keine Fehlermeldung...)

[s-off]

Hallo,

:gruebel:


der Aufruf geschieht automatisch, aber nur dann, wenn Dein Webbrowser1 auch weiss, dass er genau das in diesem Fall machen soll; er weiss es aber anscheinend nicht.

Einfachster Weg, wenn die Methode bereits implementiert ist:

Deinen Webbrowser anwählen -> Objektinspektor -> Ereignisse -> bei 'OnNewWindow2' das entsprechende auswählen.

Ansonsten Doppelklick bei (siehe vorherige Zeile). Dabei wird automatisch der Methodenrumpf im Quelltext erzeugt, und die Methode deklariert. Dann nur noch den Inhalt reinkopieren.

[RealSurfer]

Danke !!! ;-) ich stand glaub ich echt auf dem Schlauch ;-)