Ok, hvala ljudi.
Nakrpio sam ga nekako na silu.
Otvorim Explorer u pozadini pa ga nalepim na ScrollBox.
Nakrpio sam ga nekako na silu.
Otvorim Explorer u pozadini pa ga nalepim na ScrollBox.
WebBrowser ne učitava Goole translate stranu u Windowsu 10
Zaključano
Zakačeno
Malo se kasno javljam...
Probaj:
Ili bolje za probu, upisi rucno u registry pa poteraj exe. Onaj kod bi trebalo startovati pre nego sto se kreira komponenta TWebBrowser.
Probaj:
Code:
var reg:TRegistry;
begin
reg := TRegistry.Create;
try
reg.RootKey := HKEY_CURRENT_USER;
reg.OpenKey('Software\Microsoft\Internet Explorer\Main\FeatureControl\FEATURE_BROWSER_EMULATION', false);
reg.WriteInteger(ExtractFileName(Vcl.Forms.Application.ExeName), 11000);
finally
reg.Free;
end;
end;
var reg:TRegistry;
begin
reg := TRegistry.Create;
try
reg.RootKey := HKEY_CURRENT_USER;
reg.OpenKey('Software\Microsoft\Internet Explorer\Main\FeatureControl\FEATURE_BROWSER_EMULATION', false);
reg.WriteInteger(ExtractFileName(Vcl.Forms.Application.ExeName), 11000);
finally
reg.Free;
end;
end;
Ili bolje za probu, upisi rucno u registry pa poteraj exe. Onaj kod bi trebalo startovati pre nego sto se kreira komponenta TWebBrowser.
1Sviđa mi se :thumbsup: 1
Kod mene (na WIN7) radi.
_deran_ hvala puno radi i kod mene.
Kako je u pitanju FM aplikacija malo sam modifikovao kod za FireMonkey
Baš me zanima odakle ti rešenje?
Kako je u pitanju FM aplikacija malo sam modifikovao kod za FireMonkey
Code:
uses
...,Registry,Winapi.Windows;
...
procedure TForm_Prevodilac.FormCreate(Sender: TObject);
var
reg:TRegistry;
begin
reg := TRegistry.Create;
try
reg.RootKey := HKEY_CURRENT_USER;
reg.OpenKey('Software\Microsoft\Internet Explorer\Main\FeatureControl\FEATURE_BROWSER_EMULATION', false);
reg.WriteInteger(ExtractFileName(ParamStr(1)), 11000);
finally
reg.Free;
end;
Google:=true;
end;
uses
...,Registry,Winapi.Windows;
...
procedure TForm_Prevodilac.FormCreate(Sender: TObject);
var
reg:TRegistry;
begin
reg := TRegistry.Create;
try
reg.RootKey := HKEY_CURRENT_USER;
reg.OpenKey('Software\Microsoft\Internet Explorer\Main\FeatureControl\FEATURE_BROWSER_EMULATION', false);
reg.WriteInteger(ExtractFileName(ParamStr(1)), 11000);
finally
reg.Free;
end;
Google:=true;
end;
Baš me zanima odakle ti rešenje?
Pravio sam HTML editor koji u pozadini ima TinyMCE, pa sam ga prikazivao preko TWebBrowser-a. Imao sam isti problem... Negde sam izguglao da je to do stare verzije browser-a a kod mene bila najnovija, pa nasao kako da nateram IE11 da radi kao IE11 :)
Inace mi je katastrofa raditi sa TWebBrowserom ali alternativa mi je bilo ubaciti Chrome koji nosi sa sobom jos 100+ mb koje-čega... Radi ovo sad ovako :)
Inace mi je katastrofa raditi sa TWebBrowserom ali alternativa mi je bilo ubaciti Chrome koji nosi sa sobom jos 100+ mb koje-čega... Radi ovo sad ovako :)
Ja sam pravio uglavnom za licnu upotrbu HTML editor sa TWebBrowserom i danas ga koristim kad zatreba.
Na jednom sam (starom) sistemu koji ima kozolu za mejl i danas koristim svoj program kroz tu kozolu.
Mislim da samo ja tako saljem i primam mejlove i da je niko drugi vise ne koristi tako.
Tako da samo povremeno koristim HTML editor sa TWebBrowserom kad ne mogu sa kozolom da posaljem.
Nisam sa njime imao do sada ovakvih problema ali sam zapisao ovo predstavljane kao IE11 ako zatreba.
Na jednom sam (starom) sistemu koji ima kozolu za mejl i danas koristim svoj program kroz tu kozolu.
Mislim da samo ja tako saljem i primam mejlove i da je niko drugi vise ne koristi tako.
Tako da samo povremeno koristim HTML editor sa TWebBrowserom kad ne mogu sa kozolom da posaljem.
Nisam sa njime imao do sada ovakvih problema ali sam zapisao ovo predstavljane kao IE11 ako zatreba.
TWebBrowser je bruka koliko danas loše radi.
Trebalo bi ga malo osvežiti.
Trebalo bi ga malo osvežiti.