从我的Delphi应用程序中使用Googlemap？

unit Unit1;

interface

uses
  Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics,
  Vcl.Controls, Vcl.Forms, Vcl.Dialogs, TMSMap, TMSMapLayers,
  TMSMapControls, TMSMapHTML, TMSMapQuickSearch, TMSMapGeocoding,
  TMSMapDirections, TMSMapViewer, TMSMapTypes, TMSMapEvents,
  TMSMapDrawing, TMSMapMarkers, TMSMapPolylines, TMSMapPolygons,
  TMSMapCircles, TMSMapRectangles, TMSMapOverlays, TMSMapKml,
  TMSMapTrafficLayer, TMSMapStreetView, TMSMapStreetViewEvents,
  TMSMapStreetViewLayer, TMSMapStreetViewMarker, TMSMapStreetViewPanorama,
  TMSMapStreetViewService, TMSMapStreetViewEvents, TMSMapStreetViewLayerOptions,
  TMSMapStreetViewPov, TMSMapStreetViewPosition;

type
  TForm1 = class(TForm)
    TMSMap1: TTMSMap;
    TMSMapPolyline1: TTMSMapPolyline;
    TMSMapMarker1: TTMSMapMarker;
    TMSMapPolygon1: TTMSMapPolygon;
    TMSMapRectangle1: TTMSMapRectangle;
    TMSMapCircle1: TTMSMapCircle;
    TMSMapDirections1: TTMSMapDirections;
    TMSMapGeocoding1: TTMSMapGeocoding;
    TMSMapQuickSearch1: TTMSMapQuickSearch;
    TMSMapTrafficLayer1: TTMSMapTrafficLayer;
    TMSMapStreetView1: TTMSMapStreetView;
    TMSMapStreetViewLayer1: TTMSMapStreetViewLayer;
    TMSMapStreetViewMarker1: TTMSMapStreetViewMarker;
    TMSMapStreetViewPanorama1: TTMSMapStreetViewPanorama;
    TMSMapStreetViewService1: TTMSMapStreetViewService;
    TMSMapStreetViewLayerOptions1: TTMSMapStreetViewLayerOptions;
    TMSMapStreetViewPov1: TTMSMapStreetViewPov;
    TMSMapStreetViewPosition1: TTMSMapStreetViewPosition;
    procedure FormCreate(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.FormCreate(Sender: TObject);
begin
  TMSMap1.LoadMap;
end;

end.