Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Netzwerke (https://www.delphipraxis.net/14-netzwerke/)
-   -   Delphi TWebBrowser ... PopUps trotz PopUpblocker (https://www.delphipraxis.net/86936-twebbrowser-popups-trotz-popupblocker.html)

gallstone 21. Feb 2007 11:57


TWebBrowser ... PopUps trotz PopUpblocker
 
Liste der Anhänge anzeigen (Anzahl: 1)
Hallo Leute!

ich habe mir einen WebBrowser gebastelt. Habe auch einen "PopUpblocker" (er fängt PopUps ab und läd sie in den Browser)

Delphi-Quellcode:
PopUps werden abgefangen und in den Browser geladen.
{procedure TForm1.WebBrowser1NewWindow2(Sender: TObject;
  var ppDisp: IDispatch; var Cancel: WordBool);
  var NewWindow : TForm1;
begin
  pause:=0;
  NewWindow := TForm1.Create(self);
  with NewWindow do begin
  ppDisp := WebBrowser1.Application;
  show;
  end;

end;
das klappt auch prima aber hier zum Bsp nicht--->
http://www.rhoen.de/cgi-bin/WebObjec....1.0.1.1.1.1.0

und dann mal auf bild vergrößern klicken!
mein browser im anhang.
er fängt es wie gewohnt ab. macht aber dann trotzdem ein neues "fenster" hier ist die browserkomponente nur so groß wie das bild selbst.

was fehlt mir, das alles, wirklich alles in ein und dem selben fenster angezeigt wird???

mfg


edit: hinzu kommt das er auch werbung is sollch einem "häßlichen" neuen fenster darstellt.
wenn ich vorm navigieren die url abgfange und dann vorm öffnen eines fensters vergleiche, müßte der dann doch nur noch meine gewünschten fenster öffnen und alle anderen "blocken"


Alle Zeitangaben in WEZ +1. Es ist jetzt 09:48 Uhr.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz