Delphi Can
Webbrowser üzerinde Açılan Sayfanın Popup Sayfasındaki Linkler - Baskı Önizleme

+- Delphi Can (https://www.delphican.com)
+-- Forum: Delphi (https://www.delphican.com/forumdisplay.php?fid=3)
+--- Forum: Genel Programlama (https://www.delphican.com/forumdisplay.php?fid=6)
+--- Konu Başlığı: Webbrowser üzerinde Açılan Sayfanın Popup Sayfasındaki Linkler (/showthread.php?tid=6208)



Webbrowser üzerinde Açılan Sayfanın Popup Sayfasındaki Linkler - COMMANDX - 03-08-2021

Webbrowser ile bir Web Sayfasını açıyorum, Sayfa açılır açılmaz Asıl işlemlerin yapıldığı bir popup Web sayfası çıkıyor.
Bu Popup sayfasını nasıl WebBrowser içinde görüntüleyebilirim?
Popup Maalesef WebBrowser içinde değil, Harici olarak Explorerde açılıyor, yani Webbrowserden harici bir sayfa.
Asıl işlemlerin yapıldığı yer Popup sayfası, Bu popup Webbrowser ile dizginleyebilmenin imkanı varmıdır.

Daha önce böyle bir sorunla karşılaşmış olan varmıdır, Elinde örnek kod olursa paylaşırsa kendime uyarlayabilirim.


Cvp: Webbrowser üzerinde Açılan Sayfanın Popup Sayfasındaki Linkler - vkamadan - 03-08-2021

(03-08-2021, Saat: 16:08)COMMANDX Adlı Kullanıcıdan Alıntı: Webbrowser ile bir Web Sayfasını açıyorum, Sayfa açılır açılmaz Asıl işlemlerin yapıldığı bir popup Web sayfası çıkıyor.
Bu Popup sayfasını nasıl WebBrowser içinde görüntüleyebilirim?
Popup Maalesef WebBrowser içinde değil, Harici olarak Explorerde açılıyor, yani Webbrowserden harici bir sayfa.
Asıl işlemlerin yapıldığı yer Popup sayfası, Bu popup Webbrowser ile dizginleyebilmenin imkanı varmıdır.

Daha önce böyle bir sorunla karşılaşmış olan varmıdır, Elinde örnek kod olursa paylaşırsa kendime uyarlayabilirim.

Merhaba , 
TWebBrowser popup ile yeni bir browser ekranı açar ise ilgili TwebBrowser ın olayları içindeki OnNewWindow2 olayı tetiklenir, bu olayı kullanarak açılmaya çalışılan yeni browser ı yeni bir TWebBrowser da gösterebilir dolayısıyla da işleyebilirsiniz, 
popup ı göstermek için eklediğiniz TWebBrowser in adının wbPopup olduğunu varsayarsak  ana TWebBrowser ın OnNewWindow2 olayına aşağıdaki gibi bir kod yazmalısınız.
procedure TForm1.WebBrowser1NewWindow2(ASender: TObject; var ppDisp: IDispatch; var Cancel: WordBool);
begin
ppDisp := wbPopup.DefaultInterface;
end;



Webbrowser üzerinde Açılan Sayfanın Popup Sayfasındaki Linkler - COMMANDX - 03-08-2021

Böyle bir olayı yeni gördüm delphide
Hocam teşekkür ederim, sorun çözüldü.