WebBrowserNewWindow URL kapatmadan URL almak

Delphi'de kod yazma ile ilgili sorularınızı bu foruma yazabilirsiniz.
Cevapla
CHack
Üye
Mesajlar: 14
Kayıt: 21 Ağu 2015 12:35

WebBrowserNewWindow URL kapatmadan URL almak

Mesaj gönderen CHack »

Merhaba değerli delphi Türkiye ailesi lütfen yardımınıza ihtiyacım var bir proje yapmıyorum herşeyi tamamladım karşıma bir sorun çıktı tüm interneti araştırdım işe yaramadı hiçbirşey gelelim soruna şimdi ben webbrowserde bir linke tıklıyorum ve popup bir pencere çıkıyo şimdi bu pencerede hiçbir tıklama yapamadığımdan url adresini alıp kapatmadan ikinci webbrowserde açmak ve işlemi yaptıktan sonra popup kapatmalıyım bu kodu buldum fakat hata verdi olmadı

Kod: Tümünü seç

procedure TForm1.WebBrowser1NewWindow2(ASender: TObject;
  var ppDisp: IDispatch; var Cancel: WordBool);
var url: WideString;
begin
url := ((TWebBrowser(ASender).document as IHTMLDocument2).activeElement as IHTMLElement).getAttribute('href', 0);
Webbrowser2.Navigate(url);
end;
Lütfen abilerim arkadaşlarım yardım ede bilecek varsa buyursun çok lazım bana.
Kullanıcı avatarı
mrmarman
Üye
Mesajlar: 4741
Kayıt: 09 Ara 2003 08:13
Konum: İstanbul
İletişim:

Re: WebBrowserNewWindow URL kapatmadan URL almak

Mesaj gönderen mrmarman »

Cevaplanmamış mesajlara bakarken gördüm, uzun zaman olmuş ama şu linkte ilgilendiğin konu açıklandı...

Senin durumunda Array içinde tutmaya gerek kalmıyor, direkt bahsettiğin ikinci WebBrowser'i ppdisp ile transfer ediyorsun.
Resim
Resim ....Resim
Cevapla