Change NavigateToURL(LFileName) to NavigateToString(HTMLString)

Since the html code is writen to a file, the google API Key is exposed in that file. Think when you deploy the exe to all customers, your API Key made public.

The prupose is navigate the HTMLString to keep the ApiKey Safe.

Author: chaupero

Source/Vcl.GoogleMap.pas

@@ -872,7 +872,7 @@ function TEdgeGoogleMapViewer.GetHTMLScript : string;
 procedure TEdgeGoogleMapViewer.ShowMap(AMapCenter: TLatLng; const AAddress: string = '');
 var
   HTMLString  : String;
-  LAddress, MyAddress, LFileName: string;
+  LAddress, MyAddress: string;
   MyCenter: TLatLng;
 begin
   if csDesigning in ComponentState then Exit;
@@ -923,12 +923,11 @@ procedure TEdgeGoogleMapViewer.ShowMap(AMapCenter: TLatLng; const AAddress: stri
       B2S(FTraffic), //Traffic
       B2S(FBicycling) //Bicycling
     ]);
-  LFileName := TPath.GetTempFileName+'.html';
-  TFile.AppendAllText(LFileName, HTMLString, TEncoding.UTF8);
-  LFileName := StringReplace(LFileName, '\', '/', [rfReplaceAll]);
   MapIsBusy := True;
   try
-    NavigateToURL('file:///'+LFileName);
+      Sleep(1000);
+      application.ProcessMessages;
+      NavigateToString(HTMLString);
   finally
     MapIsBusy := False;
   end;