Map
Description
Le composant permet de placer une carte géographique interactive Google Maps sur le formulaire, avec la possibilité d'appliquer des marqueurs. Vous pouvez mapper un ou plusieurs marqueurs, puis enregistrer leur emplacement dans la base de données.
Class: TdbMap
Propriétés
|
Propriété |
Type |
Description |
|
APIKey |
String |
Permet de définir la clé API reçue de l'API Google. Vous pouvez obtenir cette clé ici. Pas nécessaire. |
|
APIChannel |
String |
Permet de définir un identifiant pour l'utilisation de l'API Google Maps Premium. Ce paramètre sera ignoré s'il est spécifié dans la propriété APIKey. |
|
APIClientID |
String |
Permet de définir l'ID client pour l'utilisation de l'API Google Maps Premium. Ce paramètre sera ignoré si une valeur est spécifiée dans la propriété APIKey. |
|
APISignature |
String |
Permet de définir une signature API pour utiliser l'API Google Maps Premium. |
|
APIClientAuthURL |
String |
Permet de définir l'URL d'utilisation de la console Google Maps Premium. Ce paramètre sera ignoré s'il est spécifié dans la propriété APIKey. |
|
CurrentLocation |
TLocation |
Contient les coordonnées de l'emplacement de l'utilisateur du programme. Pour que ces coordonnées soient disponibles, vous devez d'abord appeler la méthode GetCurrentLocation. Ne fonctionne pas temporairement. |
|
dbTable |
String |
Détermine à quelle table de la base de données appartient un composant. |
|
dbFieldLatitude |
String |
Détermine à quel champ de la table de la base de données la valeur de latitude du marqueur sera stockée. |
|
dbFieldLongitude |
String |
Détermine dans quel champ de la table de base de données la valeur de longitude du marqueur sera stockée. |
|
DisableMenu |
Boolean |
Permet de verrouiller le menu contextuel de la carte. |
|
Elevations |
TElevations |
Contient le résultat de l'appel des méthodes GetElevation et GetElevation2. Permet de connaître la hauteur de la surface de la terre selon les coordonnées spécifiées. |
|
FormMarkerName |
String |
Définit le nom de la form qui sera utilisée lors de la création / modification d'un marqueur. |
|
LastAddedMarker |
TMarker |
Contient un lien vers le dernier marqueur ajouté à l'aide de la méthode TMarkers.Add (Form1.Map1.Markers.Add) |
|
LastAddedPolyline |
TPolylineItem |
Contient un lien vers le dernier chemin ajouté à l'aide de la méthode TPolylines.Add (Form1.Map1.Polylines.Add) |
|
LastAddedPolygon |
TPolygonItem |
Contient un lien vers le dernier polygone ajouté à l'aide de la méthode TPolygons.Add (Form1.Map1.Polygons.Add) |
|
TMarkers |
Propriété permettant de travailler avec des marqueurs sur la carte. Plus d'infos. |
|
|
TMarker |
Propriété pour accéder aux marqueurs existants sur la carte. Plus d'infos. |
|
|
TMapOptions |
Réglage du composant. Plus d'infos. |
|
|
TPolylines |
Propriété permettant de travailler avec des polylignes sur la carte.Plus d'infos. |
|
|
TPolylineItem |
Propriété pour accéder aux polylignes existantes sur la carte. Plus d'infos. |
|
|
TPolygons |
Propriété pour travailler avec des polygones sur la carte. Plus d'infos. |
|
|
TPolygonItem |
Propriété pour accéder aux polygones existants sur la carte. Plus d'infos. |
|
|
Enabled |
Boolean |
Contrôle si le composant répond aux événements de la souris, du clavier et du minuteur. |
|
Name |
String |
Le nom du composant. |
|
Visible |
Boolean |
Spécifie si le composant apparaît à l'écran. |
|
Left |
Integer |
Spécifie le coordonnée horizontal du bord gauche d'un composant par rapport à son parent. |
|
Top |
Integer |
Spécifie la coordonnée vertical de la partie supérieure gauche d'un composant par rapport à son parent. |
|
Width |
Integer |
Spécifie la taille horizontale du composant en pixels. |
|
Height |
Integer |
Spécifie la taille verticale du composant en pixels. |
|
Tag |
Integer |
Permet d'attribuer un numéro à un composant pour vos propres besoins. |
|
TagString |
String |
Permet d'attribuer une chaîne à un composant pour vos propres besoins. |
Méthodes
|
Méthode |
Description |
|
function AddGeoImage (FileName: string; Title: string = ''; Width: Integer = -1; Height: Integer = -1; ZoomWidth: Integer = -1; ZoomHeight: Integer = -1): TMarker |
Ajoute une image à la carte en fonction des données EXIF de l'image donnée. |
|
function AddMapKMLLayer (Url: string; ZoomToBounds: Boolean): Boolean |
Ajoute une couche KML à la carte. |
|
function ClearPolygons: Boolean |
Supprime tous les polygones de la carte et efface la collection de polygones dans la propriété Polygons. |
|
function ClearPolylines: Boolean |
Supprime toutes les polylignes de la carte et efface la collection de polylignes dans la propriété Polylines. |
|
function CloseMarkerInfoWindowHtml (Id: Integer): Boolean |
Ferme la fenêtre d'informations pour le marqueur spécifié. Plus d'infos.. |
|
procedure CloseAllMarkersInfoWindow |
Ferme les fenêtres avec des informations sur tous les marqueurs. |
|
function CreateMapPolygon (Polygon: TMapPolygon): Boolean |
Dessine le polygone spécifié sur la carte. |
|
function CreateMapPolyline (Polyline: TPolyline): Boolean |
Dessine la polyligne spécifiée sur la carte. |
|
function DegreesToLonLat (StrLon, StrLat: String; var Lon,Lat: Double): Boolean |
Convertit la représentation textuelle des coordonnées géographiques en latitude et longitude. Plus d'infos. |
|
function DeleteAllMapKMLLayer: Boolean |
Supprime toutes les couches KML de la carte. |
|
function DeleteMapKMLLayer (Id: Integer): Boolean |
Supprime la couche KML spécifiée de la carte. |
|
function DeleteMapMarker (Id: Integer): Boolean |
Supprime le marqueur spécifié de la carte. Dans ce cas, le marqueur n'est pas supprimé de la collection. TMarkers |
|
function DeleteMapPolyline (Id: Integer): Boolean |
Supprime la polyligne spécifiée de la carte. Cela ne supprime pas la polyligne de la collection TPolylines. |
|
function DeleteMapPolygon (Id: Integer): Boolean |
Supprime le polygone spécifié de la carte. Dans ce cas, le polygone n'est pas retiré de la collection TPolygons. |
|
function Distance (la1, lo1, la2, lo2: Double): Double |
Calcule la distance entre deux coordonnées. Résultat en kilomètres. |
|
function Focused: Boolean |
Vérifie si le composant a le focus d'entrée. |
|
function GetCurrentLocation: Boolean |
Place les coordonnées de l'emplacement actuel dans la propriété CurrentLocation. Ne fonctionne pas temporairement. |
|
function GetMapBounds: Boolean |
La fonction renvoie les coordonnées de la carte affichée. Ne fonctionne pas dans la version actuelle. |
|
function GetElevation (Latitude, Longitude: Double): Boolean |
La fonction renvoie la hauteur de la surface de la terre pour les coordonnés spécifiés. Le résultat de la fonction est contenu dans la propriété Elevations. Nécessite l'activation de l'API Maps Elevation. Plus d'infos |
|
function GetElevation2 (Path: TPath; ResultCount: Integer = 2): Boolean |
La fonction renvoie la hauteur de la surface terrestre pour le chemin spécifié. Le résultat de la fonction est contenu dans la propriété Elevations. Nécessite l'activation de l'API Maps Elevation. Plus d'infos |
|
function GetModifiedMapPolyline (Polyline: TPolyline):Boolean |
La fonction récupère les coordonnées de la polyligne sur la carte et met à jour les valeurs dans Polyline.Path avec elles. Généralement utilisé lorsque пользователь модифицирует линии на карте с помощью мышки и результат этих изменений необходимо применить. |
|
function GetModifiedMapPolygon (Polygon: TMapPolygon):Boolean |
La fonction obtient les coordonnées des polygones sur la carte et met à jour les valeurs de la propriété Polygon avec elles. En règle générale, elle est utilisée lorsque l'utilisateur modifie des polygones sur la carte avec la souris et que le résultat de ces modifications doit être appliqué. |
|
function GetPolygonAreaSqMeters (APolygonId: Integer): string |
Renvoie la surface en mètres carrés du polygone spécifié. |
|
function LoadGeoJSONPolyline (AFilename: string; AColor: TColor = clBlue; Opacity: Integer = 255; AWidth: Integer = 2; Zoom: Boolean = True; HoverColor: TColor = clBlue): string |
Crée des polylignes sur la carte en fonction des données d'un fichier GeoJSONйла. Plus d'infos. |
|
function LoadGeoJSONPolygon (AFilename: string; BorderColor: TColor = clBlue; Opacity: Integer = 255; BackgroundColor: TColor = clBlue; BackgroundOpacity: Integer = 100; AWidth: Integer = 2; Zoom: Boolean = True; HoverBorderColor: TColor = clBlue; HoverBackgroundColor: TColor = clBlue): string |
Crée des polygones sur la carte en fonction des données d'un fichier GeoJSON. Plus d'infos. |
|
function LoadGPSRoute (AFilename: string; AColor: TColor = clRed; AWidth: integer = 2; ZoomToRoute: Boolean = False): string |
Charge un chemin GPS à partir d'un fichier GPX et le mappe sous forme de polylignes. Plus d'infos sur le fichier GPX. |
|
procedure LoadMarkersFromPoi (PoiFile: string; MarkerColor: TMarkerIconColor = icDefault) |
Charge les coordonnées d'un fichier POI et les marque sur la carte comme marqueurs. |
|
function LonLatToXY (Lon, Lat: Double; var X, Y: Integer): Boolean |
La fonction convertit les coordonnées géographiques en coordonnées X et Y sur la carte en pixels. |
|
function MapPanTo (Latitude,Longitude:Double): Boolean |
Déplace la carte vers les coordonnées spécifiées. |
|
function MapZoomTo (Bounds: TBounds): Boolean |
La fonction affiche la zone de carte spécifiée dans le paramètre Bounds. Plus d'infos. |
|
function MapPanBy (X,Y: Integer): Boolean |
Déplace la carte horizontalement et verticalement du nombre de pixels spécifié. |
|
function OpenMarkerInfoWindowHtml (Id: Integer; HtmlText:String): Boolean |
Affiche l'étiquette du marqueur spécifié sur la carte. La mise en forme de texte HTML est prise en charge. Plus d'infos |
|
procedure SaveMarkersToPoi (PoiFile: string) |
Enregistre les marqueurs sur la carte dans un fichier POI. |
|
function ScreenShot (ImgType: TImgType): TGraphic |
Permet d'obtenir un instantané de la carte. Plus d'infos. |
|
procedure SetFocus |
Définit le focus d'entrée pour le composant. |
|
procedure SwitchToStreetView |
Bascule la carte en vue panoramique sur la rue. |
|
procedure SwitchToMap |
Quitte le mode Panoramic Street View. |
|
function UpdateMapMarkers: Boolean |
Met à jour tous les marqueurs sur la carte. |
|
function UpdateMapMarker (Marker: TMarker):Boolean |
Met à jour le marqueur spécifié sur la carte. |
|
function UpdateMapPolygon (Polygon: TMapPolygon): Boolean |
Met à jour le polygone spécifié sur la carte. Elle doit être appelée, par exemple, lorsque vous avez mis à jour les coordonnées de la polyligne à l'aide d'un script. |
|
function UpdateMapPolyline (Polyline: TPolyline): Boolean |
Met à jour la polyligne spécifiée sur la carte. IlElle doit être appelée par exemple, lorsque vous avez mis à jour les coordonnées de la polyligne à l'aide d'un script. |
|
function XYToLonLat (X, Y: integer; var Lon, Lat: double): Boolean |
Convertit les coordonnées X Y de la carte en coordonnées géographiques. Le résultat est renvoyé aux variables Lon et Lat. |
Evènements
|
Evènement |
Description |
|
OnMapClick (Sender: TObject; Latitude, Longitude: Double; X, Y: Integer; MouseLeft, MouseRight, MouseMiddle: Boolean) |
Se produit lorsque l'utilisateur clique sur le composant. |
|
OnMapDblClick (Sender: TObject; Latitude, Longitude: Double; X, Y: Integer) |
Se produit lorsque l'utilisateur double-clique sur le bouton gauche de la souris lorsque le pointeur se trouve sur le composant. |
|
OnMapMouseEnter (Sender: TObject; Latitude, Longitude: Double; X, Y: Integer) |
Se produit lorsque l'utilisateur déplace la souris sur un composant. |
|
OnMapMouseExit (Sender: TObject; Latitude, Longitude: Double; X, Y: Integer) |
Se produit lorsque l'utilisateur déplace la souris en dehors d'un composant. |
|
OnMapMouseMove (Sender: TObject; Latitude, Longitude: Double; X, Y: Integer) |
Se produit lorsque l'utilisateur déplace le pointeur de la souris alors que le pointeur se trouve sur un composant. |
|
OnMapMove (Sender: TObject; Latitude, Longitude: Double; X, Y: Integer) |
Se déclenche lorsque l'utilisateur déplace la carte. |
|
OnMapMoveEnd (Sender: TObject; Latitude, Longitude: Double; X, Y: Integer) |
Se déclenche lorsque l'utilisateur a terminé de déplacer la carte. |
|
OnMapMoveStart (Sender: TObject; Latitude, Longitude: Double; X, Y: Integer) |
Se déclenche lorsque l'utilisateur commence à déplacer la carte. |
|
OnMapTypeChange (Sender: TObject; NewMapType: TMapType) |
Se déclenche lorsque le type de carte est modifié. . Plus d'infos. |
|
OnMapZoomChange (Sender: TObject; NewLevel: Integer) |
Se déclenche lorsque l'échelle de la carte est modifiée. |
|
OnMarkerClick (Sender: TObject; MarkerTitle: string; IdMarker: Integer; Latitude, Longitude: Double; MouseLeft, MouseRight, MouseMiddle: Boolean) |
Se déclenche lorsqu'un marqueur est cliqué. |
|
OnMarkerDblClick (Sender: TObject; MarkerTitle: string; IdMarker: Integer; Latitude, Longitude: Double) |
Se déclenche lorsqu'on double-clique sur un marqueur. |
|
OnMarkerDrag (Sender: TObject; MarkerTitle: string; IdMarker: Integer; Latitude, Longitude: Double) |
Se déclenche lorsqu'on déplace un marqueur sur la carte. |
|
OnMarkerDragEnd (Sender: TObject; MarkerTitle: string; IdMarker: Integer; Latitude, Longitude: Double) |
Se déclenche lorsque le marqueur a fini de se déplacer sur la carte. |
|
OnMarkerDragStart (Sender: TObject; MarkerTitle: string; IdMarker: Integer; Latitude, Longitude: Double) |
Se déclenche au début du mouvement du marqueur sur la carte. |
|
OnMarkerInfoWindowCloseClick (Sender: TObject; IdMarker: Integer) |
Se déclenche lorsque la légende d'information d'un marqueur est fermée. |
|
OnMarkerMouseDown (Sender: TObject; MarkerTitle: string; IdMarker: Integer; Latitude, Longitude: Double) |
Se déclenche lorsqu'un bouton de la souris est enfoncé sur un marqueur. |
|
OnMarkerMouseEnter (Sender: TObject; MarkerTitle: string; IdMarker: Integer; Latitude, Longitude: Double) |
Se déclenche lorsque le curseur de la souris entre sur le marqueur. |
|
OnMarkerMouseExit (Sender: TObject; MarkerTitle: string; IdMarker: Integer; Latitude, Longitude: Double) |
Se déclenche lorsque le curseur de la souris sort du marqueur. |
|
OnMarkerMouseUp (Sender: TObject; MarkerTitle: string; IdMarker: Integer; Latitude, Longitude: Double) |
Se déclenche lorsque le bouton de la souris est relâché sur le marqueur. |
|
OnAfterAddMarker (Sender: TObject; IdMarker: Integer) |
Se déclenche après l'ajout d'un marqueur. L'événement ne se déclenchera pas si le marqueur a été ajouté à l'aide d'un script. |
|
OnBeforeDeleteMarker (Sender: TObject; IdMarker: Integer; var Cancel: Boolean) |
Se déclenche avant la suppression d'un marqueur, avec la possibilité d'annuler la suppression. L'événement ne se déclenchera pas si le marqueur est supprimé à l'aide d'un script. |
|
OnPolygonClick (Sender: TObject; IdPolygon: Integer; MouseLeft, MouseRight, MouseMiddle: Boolean) |
Se déclenche lorsqu'un polygone est cliqué. |
|
OnPolygonDblClick (Sender: TObject; IdPolygon: Integer) |
Se déclenche lorsqu'on double-clique sur un polygone. |
|
OnPolygonMouseDown (Sender: TObject; IdPolygon: Integer) |
Se déclenche lorsque le bouton de la souris est enfoncé sur un polygone. |
|
OnPolygonMouseEnter (Sender: TObject; IdPolygon: Integer) |
Se déclenche lorsque le curseur de la souris entre dans le polygone. |
|
OnPolygonMouseExit (Sender: TObject; IdPolygon: Integer) |
Se déclenche lorsque le curseur de la souris sort du polygone. |
|
OnPolygonMouseUp (Sender: TObject; IdPolygon: Integer) |
Se déclenche lorsque le bouton de la souris est relâché sur le polygone. |
|
OnPolygonChanged (Sender: TObject; IdPolygon: Integer) |
Se déclenche lorsqu'un polygone de la carte a été modifié. |
|
OnPolylineClick (Sender: TObject; IdPolyline: Integer; MouseLeft, MouseRight, MouseMiddle: Boolean) |
Se déclenche lorsque l'utilisateur clique sur une ligne. |
|
OnPolylineDblClick (Sender: TObject; IdPolyline: Integer) |
Se déclenche lorsqu'on double-clique sur une ligne. |
|
OnPolylineMouseDown (Sender: TObject; IdPolyline: Integer) |
Se déclenche lorsque le bouton de la souris est enfoncé le long de la ligne. |
|
OnPolylineMouseEnter (Sender: TObject; IdPolyline: Integer) |
Se déclenche lorsque le curseur de la souris entre dans la ligne. |
|
OnPolylineMouseExit (Sender: TObject; IdPolyline: Integer) |
Se déclenche lorsque le curseur de la souris quitte la ligne. |
|
OnPolylineMouseUp (Sender: TObject; IdPolyline: Integer) |
Se déclenche lorsque le bouton de la souris est relâché le long de la ligne. |
|
OnPolylineChanged (Sender: TObject; IdPolyline: Integer) |
Se déclenche lorsqu'une ligne sur la carte a été modifiée. |
|
OnStreetViewChange (Sender: TObject; Heading, Pitch, Zoom: Integer) |
Se déclenche lorsque la position change dans Google Street View. Paramètres : Cap - cap, Pitch - tilt, Zoom - scale. |
|
OnStreetViewMove (Sender: TObject; Latitude, Longitude: Double; X, Y: Integer) |
Se déclenche lors de la navigation vers Google Street View. |
|
OnWebGMapsError (Sender: TObject; ErrorType: TErrorType) |
Se déclenche en cas d'erreurs dans le fonctionnement du composant. |