use a Hitamp plugin on the UniMap

[Ario.Paxaz]

HI

How to use a Hitamp plugin on the UniMap?

 

(for example https://github.com/Leaflet/Leaflet.heat)

 

Regards.

[Marlon Nardi]

If interested:
https://store.falconsistemas.com.br 

Example of an application using the heatmap from the UniFSMap maps component (UniFalcon)

 

Code example for this application:

in the first block the polygons are created
in the second block the heatmap is created based on the points (Lat, Lng)

 

procedure TfrmModManejoPainel.CarregaHMEspecies(ID_FAZENDA, ID_SAFRA, ID_CULTURA,
  ID_TALHAO, ID_ESPECIE: Integer; DAT_INI, DAT_FIM: TDate);
var
  Polygon: TPolygon;
  PointHeatMap: TPointHeatMap;
  ListTalhaoPolygon: TObjectList<TTalhaoPolygon>;
  TalhaoPolygons: TTalhaoPolygons;

  PontoReferencias: TPontoReferencias;
  LstLatLng: TObjectList<TLatLng>;
  vI: Integer;
begin
  TalhaoPolygons := TTalhaoPolygons.Create(dmBanco.Conexao);
  ListTalhaoPolygon := TalhaoPolygons.GetListTalhao(ID_FAZENDA,0);
  try
    for vI := 0 to ListTalhaoPolygon.Count-1 do
    begin
      Polygon := TPolygon.Create;
      Polygon.Id := ListTalhaoPolygon[vI].ID_TALHAO_POLYGON;
      Polygon.Paths := ListTalhaoPolygon[vI].POLYGON;
      Polygon.StrokeColor := '#014FA1';
      Polygon.strokeOpacity := '0.5';
      Polygon.strokeWeight := 2;
      Polygon.fillColor := '#014FA1';
      Polygon.fillOpacity := '0.1';

      map.AddPolygon(Polygon);
    end;
  finally
    FreeAndNil(TalhaoPolygons);
    FreeAndNil(ListTalhaoPolygon);
  end;

  PontoReferencias := TPontoReferencias.Create(dmBanco.Conexao);
  LstLatLng := PontoReferencias.GetListPontosEspecietLng(ID_FAZENDA, ID_SAFRA, ID_CULTURA, ID_TALHAO, ID_ESPECIE, DAT_INI, DAT_FIM);
  try
    for vI := 0 to LstLatLng.Count -1 do
    begin
      PointHeatMap := TPointHeatMap.Create;
      PointHeatMap.Lat := LstLatLng.Items[vI].Lat;
      PointHeatMap.Lng := LstLatLng.Items[vI].Lng;

      map.AddPointHeatMap(PointHeatMap);
    end;

    map.ShowHeatMap;
    map.SetOpacityHeatMap(1);
  finally
    FreeAndNil(PontoReferencias);
    FreeAndNil(LstLatLng);
  end;
end;

 

 

 

[Ario.Paxaz]

Hi

 

Is it possible to use OpenStreet Map? (My project does not have access to Google Map Server)

 

Regards.

[Marlon Nardi]

On 2/20/2022 at 6:36 AM, A.Soltani said:

Is it possible to use OpenStreet Map? (My project does not have access to Google Map Server)

We currently do not support OpenStreet, only Google Maps, if you are interested we can be implementing