Google Maps for uniGUI

[lema]

Hello,

I uploaded a new version which include desktop and mobile versions.
 

I had no time to test it thoroughly, but I made some tests and it seems to working.

So , If you want, you can test it and post here your results.

 

 

2016-09-06  v1.4.2

--Added   Mobile version

 

 

[Harry Rogers]

Hi

What's required to install in XE8 ?

Many thanks

[epos4u]

Hi

What's required to install in XE8 ?

Many thanks

 

Hi, just install with latest UniGui edition, works perfect with XE8

[lema]

Hi

What's required to install in XE8 ?

Many thanks

 

 

 

Hi,

save the following as UniGMapDXE8.dpk 

Open it with your XE8, compile and install.

package UniGMapDXE8;

{$R *.res}
{$ALIGN 8}
{$ASSERTIONS ON}
{$BOOLEVAL OFF}
{$DEBUGINFO ON}
{$EXTENDEDSYNTAX ON}
{$IMPORTEDDATA ON}
{$IOCHECKS ON}
{$LOCALSYMBOLS ON}
{$LONGSTRINGS ON}
{$OPENSTRINGS ON}
{$OPTIMIZATION ON}
{$OVERFLOWCHECKS OFF}
{$RANGECHECKS OFF}
{$REFERENCEINFO ON}
{$SAFEDIVIDE OFF}
{$STACKFRAMES OFF}
{$TYPEDADDRESS OFF}
{$VARSTRINGCHECKS ON}
{$WRITEABLECONST OFF}
{$MINENUMSIZE 1}
{$IMAGEBASE $400000}
{$IMPLICITBUILD ON}

requires
  rtl,
  vcl,
  vclimg,
  dbrtl,
  vcldb,
  uniGUI22,
  uIndy22,
  uniTools22;

contains
  UniGMap in 'UniGMap.pas';

end.

[Harry Rogers]

That's lovely - thank you !

[golabi2000]

hi

how install  "GoogleMap.v1.4.2" in berlin ?

please help me....

[lema]

hi

how install  "GoogleMap.v1.4.2" in berlin ?

please help me....

 

 

Hello,

try to save the following as UniGMapBerlin.dpk 

Open it with your Berlin, compile and install.

package UniGMapBerlin;

{$R *.res}
{$ALIGN 8}
{$ASSERTIONS ON}
{$BOOLEVAL OFF}
{$DEBUGINFO ON}
{$EXTENDEDSYNTAX ON}
{$IMPORTEDDATA ON}
{$IOCHECKS ON}
{$LOCALSYMBOLS ON}
{$LONGSTRINGS ON}
{$OPENSTRINGS ON}
{$OPTIMIZATION ON}
{$OVERFLOWCHECKS OFF}
{$RANGECHECKS OFF}
{$REFERENCEINFO ON}
{$SAFEDIVIDE OFF}
{$STACKFRAMES OFF}
{$TYPEDADDRESS OFF}
{$VARSTRINGCHECKS ON}
{$WRITEABLECONST OFF}
{$MINENUMSIZE 1}
{$IMAGEBASE $400000}
{$IMPLICITBUILD ON}

requires
  rtl,
  vcl,
  vclimg,
  dbrtl,
  vcldb,
  uniGUI24,
  uIndy24,
  uniTools24;

contains
  UniGMap in 'UniGMap.pas';

end.

[andy1144252000]

Hi Mr. Lema,

 

I am using this great component in my project. But i have a problem.

When i try running my project using localhost, map showing. But when i use mydomain.com, map not showing.

 

I've tried attaching API key i got as a parameter in my project. But i still can't get the map to show.

 

Is there something wrong with my project?

 

FYI, i'm using latest version of uniGMap, 1.4.2.

 

Thank you in advance.

[lema]

 

I've tried attaching API key i got as a parameter in my project. But i still can't get the map to show.

 

 

Hello,

set your own key at the corresponding constant (MyGoogleAPIKey) in the component and rebuild the package.

[andy1144252000]

It works!

Thank you very much. You helped me a lot.

[isam]

 

 

Very good job

but can we load the marker from local path?

[isam]

Very good job

but can we use local images for markers ?

 

please!

[lema]

Very good job

 

but can we use local images for markers ?

 

please!

 

 

Hi,

the uniGmap has implemented the loadGeoJSON() method.

It can load and display a GeoJSON file.

https://developers.google.com/maps/documentation/javascript/datalayer

procedure TUniGMap.loadGeoJson(thepath: string);

[Luis Ribeiro]

Hi lema,

 

Congratulations, this is a great component!

 

But, something's wrong with the mobile demo; the following error appears at browser startup: "O1C.update is not a function"

 

Any ideia what that might be?

 

Thank you,

LR

[herculanojs]

I'm having problems with my project. I have already specified the urls of the files, they are in the files folder, and the error "google is not defined"

 

What is missing ?

 

The demos work perfectly, but in my project it does not. I can not identify the cause

[herculanojs]

I discovered, it lacked the definition of the api url

[valramosr]

It exists for berlin?

[epos4u]

It exists for berlin?

Yes it works in berlin

[lema]

Hello,

I uploaded a new version which adds some of Google Places API functionality.
 
 

2017-01-08  v1.4.3

--Added   Places API functionality

 

 

 

Tested with uniGUI ver.0.99.96.1335

 

Online demo:

http://79.143.178.31...uniGMapDemo.dll

 

 

[Sherzod]

Hi,

 

Thanks for updated

[billyChou]

Thanks

[cristianotestai]

 Hello Lema!

 

 Thanks for your great and fast work.

 

 Best Regards,

 

 Cristiano

[Mauri]

Awesome component, any plans of including the drawing library in the near future?

 

Thank you for your great work.

[Mauri]

Is it possible to include multiple routes? Using latitude and longitude, like

 

Point 1 > Point 2 > Point 3 > Point 4

 

??

 

Thank you.

[LordDelphi]

I'm trying to add a function to heatmap, but I can only put them and do not pull them. Anybody have any suggestions?

 

procedure TUniGMap.AddHeatMap(aHeatMap: array of THeatMap);
var
  i: Integer;
  lat, lng: string;
  Script: string;
begin
  Script :=
    'HeatMap = new google.maps.visualization.HeatmapLayer({' +
    'radius: ' + StringReplace(Format('%2.2f', [aHeatMap[0].Radius]), ',', '.', [rfReplaceAll]) + ',' +
    'data: getPoints(),' +
    'map: @googleMap@' +
    '});' +
    'function getPoints() {' +
    'return [';

    for i := 0 to Length(aHeatMap) -1 do
      if i <> Length(aHeatMap) -1 then
      begin
        lat := StringReplace(Format('%2.6f', [aHeatMap.Latitude]), ',', '.', [rfReplaceAll]);
        lng := StringReplace(Format('%2.6f', [aHeatMap.Longitude]), ',', '.', [rfReplaceAll]);

        Script := Script + 'new google.maps.LatLng(' + lat + ', ' + lng + '),'
      end
      else
      begin
        lat := StringReplace(Format('%2.6f', [aHeatMap.Latitude]), ',', '.', [rfReplaceAll]);
        lng := StringReplace(Format('%2.6f', [aHeatMap.Longitude]), ',', '.', [rfReplaceAll]);

        Script := Script + 'new google.maps.LatLng(' + lat + ', ' + lng + ')' +
        '];' +
        '}';
      end;

  ExecJScript(Script);
end;

 

procedure TUniGMap.RemoveHeatmap;
begin
    ExecJScript(
    'google.maps.event.clearInstanceListeners(HeatMap);' +
    'HeatMap.setMap(null);');
end;