T3DTerrain

Opis

Komponent niewidoczny na palecie „Maps”. Upuść go na formę z T3DMapVCL lub T3DMapFMX – AutoLinkComponents łączy właściwości Map (i opcjonalnie EditMap), a teren włącza się sam. Mapa 3D wznosi się według numerycznego modelu terenu (DEM, MapLibre raster-dem + setTerrain), a „Pokaż wysokości” (ShowElevation) pokazuje wysokość n.p.m. pod kursorem, zgłasza ją po kliknięciu w OnElevation i pozwala opisać szczyty etykietami (ShowElevationSpots). Dane: Mapterhorn planet.pmtiles (cały świat, zoom 0–12, kodowanie Terrarium) z serwera https://mapa.imetroll.com/terrain/planet.pmtiles. Ustawienia trafiają do zagnieżdżonej właściwości Map.Terrain, która działa też bez komponentu.

Moduł: MapCommon.Terrain · Klasa bazowa: TComponent · Platformy: VCL + FMX

Demo na żywo

Interaktywna strona mapy komponentu: teren z planet.pmtiles, przełączniki Exaggeration / etykiety / poziomnice / hillshade / wysokości obiektów / „Pokaż wysokości”, przeloty Tatry–Alpy–Himalaje, klik = OnElevation / OnObjectElevation.

▶ Otwórz demo HTML

Funkcje

• Prawdziwa rzeźba terenu dla całego świata – Mapterhorn planet.pmtiles (zoom 0–12), domyślne źródło MAP_DEM_DEFAULT_URL.
• Auto-link: Map (T3DMapVCL/FMX albo T3DTerrainVCL/FMX) i EditMap z formy; po powiązaniu teren włącza się automatycznie.
• Widok samodzielny: T3DTerrainVCL / T3DTerrainFMX – mapa 3D z terenem bez osobnego T3DMap*; EditMap może się do niej podłączyć.
• Etykiety wysokości (ShowElevationLabels) i poziomnice (ShowContourLines) niezależnie: tylko etykiety, tylko linie, obie albo żadna; ShowHillshade wyróżnia stoki.
• Budynki i POI na DEM: ShowObjectElevation + OnObjectElevation → teren / wysokość obiektu / dach m n.p.m.
• „Pokaż wysokości” (ShowElevation): dymek pod kursorem, klik → OnElevation; ShowElevationSpots / QueryElevation.
• Jedno TEditMap na formie: EditSubject = warstwy mapy lub teren; SetTerrainContourLines / SetTerrainElevationLabels / …
• PMTiles JS doklejane automatycznie dla pmtiles://; też XYZ (PNG/WebP), mteTerrarium / mteMapbox.
• Działa z m3sVector, m3sSatelliteHybrid, stylem terenu i stylami z serwera – VCL i FMX.

Właściwości

Zdarzenia

Metody

Przykłady

T3DTerrain na formie

// T3DTerrain1 upuszczony na formę z T3DMapVCL / T3DMapFMX:
// AutoLinkComponents łączy Map (i EditMap), teren włącza się sam.
procedure TForm1.FormCreate(Sender: TObject);
begin
  Terrain1.Map := Map3D;                 // albo zostaw puste - auto-link z formy
  Terrain1.Exaggeration := 1.5;          // 1 = rzeczywista wysokość
  Terrain1.ShowElevation := True;        // „Pokaż wysokości”
  Terrain1.TileBuffer := 0;              // pmtiles:// - bez wstępnego pobierania kafli
  Terrain1.OnElevation := Terrain1Elevation;
  // SourceURL domyślnie = MAP_DEM_DEFAULT_URL:
  //   pmtiles://https://mapa.imetroll.com/terrain/planet.pmtiles
  Map3D.Mode := mm3D;
  Map3D.Pitch3D := 70;
end;

Wysokość po kliknięciu (OnElevation)

procedure TForm1.Terrain1Elevation(Sender: TObject; const Lat, Lon, Meters: Double; Valid: Boolean);
begin
  if Valid then
    Label1.Caption := Format('%.5f, %.5f: %.0f m n.p.m.', [Lat, Lon, Meters])
  else
    Label1.Caption := 'Brak danych DEM w tym miejscu (kafel jeszcze się wczytuje)';
end;

Etykiety szczytów i odczyt z kodu

// etykiety szczytów z wysokością odczytaną z DEM
Terrain1.ShowElevationSpots([49.1795, 49.2319, 49.2510], [20.0881, 19.9817, 19.9338],
  ['Rysy', 'Kasprowy Wierch', 'Giewont']);
// wysokość z kodu - odpowiedź JSON {"meters": ...}
Terrain1.QueryElevation(49.2319, 19.9817,
  procedure(Ok: Boolean; const DataJSON, ErrorText: string)
  begin
    if Ok then Memo1.Lines.Add('Kasprowy Wierch: ' + DataJSON);
  end);
Terrain1.ClearElevationSpots;

Bez komponentu: Map3D.Terrain

// bez komponentu: zagnieżdżona właściwość mapy (TMapTerrainSettings)
Map3D.Terrain.SourceURL := MAP_DEM_DEFAULT_URL;   // pmtiles://.../planet.pmtiles, bez /{z}/{x}/{y}
Map3D.Terrain.Encoding := mteTerrarium;
Map3D.Terrain.Exaggeration := 1.5;
Map3D.Terrain.TileBuffer := 0;
Map3D.Terrain.ShowElevation := True;
Map3D.Terrain.Enabled := True;

Pełna lista API

Generowana z deklaracji w kodzie (Source/*.pas): wszystkie opublikowane właściwości i zdarzenia T3DTerrain (także dziedziczone), właściwości publiczne i metody publiczne.

Właściwości opublikowane (17)

Zdarzenia (2)

Właściwości publiczne – tylko w kodzie (1)

Metody publiczne (7)

Pełny opis wszystkich właściwości: dokumentacja komponentów map.

Zobacz też

VCLkontrolka

T3DMapVCL

Mapa wektorowa 2D/3D z budynkami, motywem dziennym/nocnym i własnymi kaflami z mapa.imetroll.com.

▶ Demo na żywo

FMXkontrolka

T3DMapFMX

Mapa wektorowa 2D/3D z budynkami, motywem dziennym/nocnym i własnymi kaflami z mapa.imetroll.com.

▶ Demo na żywo

VCLFMXniewidoczny

TEditMap

Edycja wyglądu mapy 3D i opcji terenu: kolory warstw, EditSubject (mapa / teren), cofanie, zapis JSON.

▶ Demo na żywo