Delphi-PRAXiS - Delphi NewWindow2 in selben TWebBrowser oeffnen?

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)

- Netzwerke (https://www.delphipraxis.net/14-netzwerke/)

- - Delphi NewWindow2 in selben TWebBrowser oeffnen? (https://www.delphipraxis.net/137260-newwindow2-selben-twebbrowser-oeffnen.html)

tg39	17. Jul 2009 08:14

NewWindow2 in selben TWebBrowser oeffnen?

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

17. Jul 2009 08:27

Re: NewWindow2 in selben TWebBrowser oeffnen?

in OnNewWindow2 Cancel auf False setzen

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

tg39	17. Jul 2009 08:49

Re: NewWindow2 in selben TWebBrowser oeffnen?

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.

Alle Zeitangaben in WEZ +1. Es ist jetzt 15:56 Uhr.