Change the UniMap MapLayers by code

[ElCherchu]

Hi, in my application I'm starting using UniMap, the case is that I don't want to show the MapLayers in map, instead of that I want to do it by code, but I don't Know how to do it,

Anyone can help me?, in other case how can I show the compass in map and change the direction?

Thanks..

I'm using:

Delphi 10.2

Unigui: FMSoft_uniGUI_Complete_Professional_1.90.0.1555

TUniMap

 

 

[zhyhero]

I think you can setup a custom MapLayer , and use custom img as base background map;

procedure TMainForm.UniMapMapLayers0CustomLayerUrl(Sender: TObject; var TileLayerUrl: string);
begin
  TileLayerUrl := '/files/clear.png'; //custom  image
end;

Then darw you vectors and markers by code.

 

About compass and direction ? I dont know now.

 

[ElCherchu]

Hi zhyro, thank for response.

I really want it is to set the maptype by code.

Thanks.

[zhyhero]

Sorry for misunderstand.

It looks  no direct control code, but map.addlayer(), map.removelayer().

Or use leaflet extension or plugin  

        GitHub - gisarmory/Leaflet.ShowHideLayerGroup: Leaflet.ShowHideLayerGroup    

 

[ElCherchu]

Hello

Changing the property collapsed to true o false we got

 

For me is ok, but I'dont know how to add compass

 

[Hayri ASLAN]

Hello

Please explain clearly what are you trying to achieve.

[zhyhero]

he want hide the  "layers control"

[Hayri ASLAN]

To remove UniMap control

  with UniMap1, JSInterface do
  begin
    JSCallGlobal(JSName+'_uniControl.remove', []);
  end;

To add UniMap control

  with UniMap1, JSInterface do
  begin
    JSCall('uniMap.addControl', [JSStatement(JSName+'_uniControl')]);
  end;

To change position, 

with UniMap1, JSInterface do
  begin
    JSCallGlobal(JSName+'_uniControl.remove', []);
    JSCode(JSName+'_uniControl.options.position="'+UniMapControlPositionStr[mpTopLeft]+'";');
    JSCall('uniMap.addControl', [JSStatement(JSName+'_uniControl')]);
  end;

 

[ElCherchu]

Thank Hayri,

I'll tryit as soom as I can.

Trank again..

[ElCherchu]

On 11/29/2021 at 9:41 AM, Hayri ASLAN said:

To remove UniMap control

  with UniMap1, JSInterface do
  begin
    JSCallGlobal(JSName+'_uniControl.remove', []);
  end;

To add UniMap control

  with UniMap1, JSInterface do
  begin
    JSCall('uniMap.addControl', [JSStatement(JSName+'_uniControl')]);
  end;

To change position, 

with UniMap1, JSInterface do
  begin
    JSCallGlobal(JSName+'_uniControl.remove', []);
    JSCode(JSName+'_uniControl.options.position="'+UniMapControlPositionStr[mpTopLeft]+'";');
    JSCall('uniMap.addControl', [JSStatement(JSName+'_uniControl')]);
  end;

 

Thank Hayri

This realy work.

 

[FXSystems]

The above works great for the layer control.

But how to remove and add drawing buttons from code?

Can someone help me?

I mean, for example, to remove the "Rectangle" button from "MapDrawOptions"