NewWindow2 in selben TWebBrowser oeffnen?

[tg39]

Hallo,

weiß jemand warum es nicht funktioniert ein Popup auf seine oeffnende Instanz umzuleiten?

Delphi-Quellcode:

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

Der Browser oeffnet einfach gar nichts, sehr seltsam.
Kann mir da jemand weiterhelfen?

Danke im Voraus,

Grüße

[himitsu]

in OnNewWindow2 Cancel auf False setzen

in OnBeforeNavigate2 die URL auslesen und "von Hand" im TWebBrowser laden

[tg39]

Zitat:

Zitat von himitsu

in OnNewWindow2 Cancel auf False setzen

in OnBeforeNavigate2 die URL auslesen und "von Hand" im TWebBrowser laden

Das waere die Variante ueber eine zweite WebBrowser-Instanz die zwar gundlegend funktioniert, mir jedoch im spezifischen Fall nicht weiterhilft da bei dem letztlichen Navigate-Aufruf der Document.Referrer verloren geht. Wenn man das Popup jedoch direkt im gleichen TWebBrowser oeffnet funktioniert die Beibehaltung des Referrers.