Fmx WebBrowser Sayfa Yükleninceye kadar bekleme

FireMonkey ve Mobil uygulama (iOS, Android, Windows Phone) ile ilgili sorularınızı bu foruma sorabilirsiniz.
Cevapla
malitutuncu
Üye
Mesajlar: 18
Kayıt: 21 Şub 2017 04:27

Fmx WebBrowser Sayfa Yükleninceye kadar bekleme

Mesaj gönderen malitutuncu »

Merhaba,

Delphi Vcl tarafında webbrowser ile şu benzer şekilde bir yapıyla onDocumentComplete sayfasında gelenUrl ile beklenen URL eşit işe xTamam''ı true
çekip sayfayı daha sonra gösterme yapıyordum, forumda vardı.

Application.ProcessMessages ile yapıyım (fmx kütüphanesindede gördüm) aynı şekilde dedim finish e girince ye kadar bir while döngüsü kuruyum
dedim uygulama donuyor.

şimdi bunun android tarafında aşmaya çalışıyorum. finish metodunu kullanıyorum ama 2-3 kere giriyor bir sayfa yüklenirken
sayfanın tamamen yüklendiğini nasıl anlayabilirim?

Kod: Tümünü seç

webGoURL(wbBack, aBeklenenURL,agidilecekURL, xBeklenenURL, xTamam)
begin
  try
    xTamam := False;
    xBeklenenURL := aBeklenenURL;
    aWb.Navigate(agidilecekURL, $02, null, null);
    while NOT xTamam do
    begin
      Application.ProcessMessages;
      if xStop = 1 then
        begin
            aWb.Stop;
            Exit;
        end;
    end;
  Except
    begin
      aWb.Stop;
      Exit;
    end;
  end;
end;
Cevapla