Delphi-PRAXiS - TWebBrowser Google Maps

Zitat:

Zitat von theoneand (Beitrag 1314539)

Hallo,

ich möchte in meiner Anwendung(FMX) GoogleMaps in einer Webbrowser Komponente anzeigen.
bei starten auf dem desktop PC (Windows 7) geht alles einwandfrei.

Beim starten auf dem Notebook (windows 10) kommt eine Meldung von Google:
Sie verwenden offenbar einen nicht untersützen Browser.
Ältere Browser können ein Sicherheitsrisiko darstellen.....

Könnte das daran liegen, dass auf Windows 10 der neue Browser "Microsoft Edge" läuft und nicht mehr der
IE? Da die TWebbrowser Komponente meines Wissens auf den IE zugreift.

Hat jemand eine Idee an was das liegen kann? Alle anderen URLS wie Youtube, google kann ich ganz
normal aufrufen, nur bei google-Maps kommt der Fehler

Danke schon mal

Das ActiveX-Teil vom IE meldet sich, wenn man mit dem TWebBrowser arbeitet, mit einer ziemlich alten IE-Version, dem kann man abhelfen:

Delphi-Quellcode:

			procedure IERegFake(sProgName : String; dwVersion :DWord);

var

          reg : TRegistry;

begin

  // 10001 = Version 10.0

  // 8000  = Version  8.0 Build = 86001

  // 7000  = Version  7.0

  reg := TRegistry.Create;

  reg.RootKey := HKEY_CURRENT_USER;

  reg.OpenKey('Software\Microsoft\Internet Explorer\Main\FeatureControl\FEATURE_BROWSER_EMULATION',true);

  reg.WriteInteger(sProgName,dwVersion);

  reg.Free;

end;

Aufruf z. B.:

Delphi-Quellcode:

IERegFake(ExtractFileName(Application.ExeName),8000);

Hab' das inzwischen im Initialisierungsteil einer Unit, die ich in jedes Programm einbinde, das den TWebBrowser nutzt. Bisher hat damit jedes Programm mit Google keine Probleme mehr. Hab' auf dem Rechner "nur" Delphi 7, XP und IE 8.