WebBrowser ne učitava Goole translate stranu u Windowsu 10

Imam projekat koji je lepo radio pod Windows 7.
Od nedavno sam prešao na Windows 10 i primetio sam da prozor sada ne učitava stranu googl prevodioca kako treba.
Ima li neko rešenje jer nisam uspeo da nađem na internetu.

TWebBrowser? Radi li iz InternetExplorera?

Potpis

Do not be a help vampire (http://slash7.com/pages/vampires), use the google.

How to ask questions the smart way:
http://www.catb.org/~esr/faqs/smart-questions.html
http://solair.eunet.rs/~fangor...stions/smart-questions.sr.html

Ne znam, kako da proverim?
Moguće je, jer je na sedmici radilo odlično, a sad neće.
Na sedmici je verovatnije starija verzija InternetExplorera.

Ja radim na WIN 7 i koristim svoj pretrazivac sa TWebBrowser u kojem iskljucim skript i pregledam samo ono sto se moze videti bez skripta.
Jedino sam guglov prevod koristio sa skriptom. Sada nece vise da radi. Koliko vidim nece zato sto su izmenili stranu...

Inace i ovu poruku kucan ES pretrazivac sa TWebBrowser bez skripta i nadam se da nece nikad menjati ovaj foruma tako da mora da se koristi skrip...

Znači ipak je do Googla.
Razmišljam da InternetExplorer ubacim kao komponentu pa da njega stavim na Formu umesto TWebBrowser ako nema neko drugo rešenje.

TWebBrowser je zapravo samo wrapper oko IEa, s tim sto po defaultu to nije poslednja verzija vec nesto tipa IE7.
Ima nacin da se forsira poslednja verzija kao i upotreba JS, ali ne mogu da nadjem u kodu kako se to radi.
Ima i third party komponenta (isto wrapper oko IE) koja je znacajno naprednija i ima sve te stvari podrzane.

Potpis

Do not be a help vampire (http://slash7.com/pages/vampires), use the google.

How to ask questions the smart way:
http://www.catb.org/~esr/faqs/smart-questions.html
http://solair.eunet.rs/~fangor...stions/smart-questions.sr.html

Nasao, EmbeddedWB, https://bitbucket.org/wpostma/tembeddedwb/src.

Potpis

Do not be a help vampire (http://slash7.com/pages/vampires), use the google.

How to ask questions the smart way:
http://www.catb.org/~esr/faqs/smart-questions.html
http://solair.eunet.rs/~fangor...stions/smart-questions.sr.html

Hvala Savkic
Skino sam i prepravio EmbeddedWB za poslednju verziju Delphija 10.3
Radi užasno sporo, ali što je naj interesantnije vraća potpuno isto kao i TWebBrowser.

Ja sam skript pomenuo smo uvexi toga kako ja koristim.

Izgleda da su uradili izmene tako da proverava da li je IE ili nije.

Vidim da radi iz samostalnog IEa, proveri da li je dozvoljen rad sa java scriptom, i probaj da promenis user agent na Firefox/Chrome.

Potpis

Do not be a help vampire (http://slash7.com/pages/vampires), use the google.

How to ask questions the smart way:
http://www.catb.org/~esr/faqs/smart-questions.html
http://solair.eunet.rs/~fangor...stions/smart-questions.sr.html

Promenio sam isto se ponaša.
Izgleda da je u pitanju nešto sa podrškom za JavaScript.
Moguće da ove komponente nemaju podršku za novije verzije JavaScript.

Verovatno iz JS pokusava da procita neku vrednost koju ima IE i na tom mestu puca.

U svakom slucaju ja WebBrower vise necu koristiti za gulg prevod.

Da tkaranovic, ali koja je alternativa?

Ima InternetExplorer komponenta. Davno sam je probao.
Koliko se secam moze se pronaci otvoren IE i/ili se startovati sa linkom za pretragu.

Znam. lako se to postiže sa SellExecute funkcijom.
Potrebno je samo obezbediti da IE ostane top prozor.

Ta komponenta radi ovako nesto (ovo sam izguglao):

type
TMainForm = class(TForm)
ShowBrowser: TButton;
procedure FormCreate(Sender: TObject);
procedure ShowBrowserClick(Sender: TObject);
private
FBrowser: Variant;
end;

procedure TMainForm.FormCreate(Sender: TObject);
begin
FBrowser := CreateOleObject('InternetExplorer.Application');
end;

procedure TMainForm.ShowBrowserClick(Sender: TObject);
begin
FBrowser.Navigate('http://stackoverflow.com');
ShowWindow(FBrowser.HWND, SW_SHOWMAXIMIZED);
FBrowser.Visible := True;
end;

tkaranovic radi

Evo jednostavnije varijante koja radi isto

Pa sto pitas onda (kad znas)? :)

Pa pitam za komponentu WebBrowser jer mi sve montirano i radilo lepo.
Sad moram da prepravljam stvari.

Naravno, kad mora nije tesko... stavio sam smajli upokusaju da budem vedar i ako nema osnova...