Google Maps über COM (Component Object Model)

[Peter.Stadler]

Hallo

Ich versuche das Framework von Thom in Rad Studio XE 10.2 Tokyo zu installieren. Dazu habe ich das file gmConfig.inc upgedated.
Leider gibt es dann einen Compilation error mit Studio XE 10.2 Tokyo, wenn ich versuche den Source in meine Programme einzubinden.
Vielleicht ist es ein Fehler im gmConfig.file, vielleicht auch nicht. Kann jemand das File testen? Im Bild 1 ist der Compilation error als Screenshot zu sehen.

Bin für jeden Hinweis dankbar.

Der Compilationsfehler
[dcc32 Fehler] GoogleMaps_Unit1.pas(2694): E2010 Inkompatible Typen: 'TMapEventEvent' und 'Procedure'
hängt vielleicht mit {$IFDEF USE_ANONYMOUS_METHODS} zusammen.
Der Fehler tritt auf in dieser Procedure:

Code:

procedure AttachSecretMessage(Marker: TMarker; Num: Integer);
  var
    //{$IFDEF USE_ANONYMOUS_METHODS}
    InfoWindow: TInfoWindow;
    //{$ENDIF}
    InfoWindowOptions: TInfoWindowOptions;
  var
    callString : string;
  begin
    with Script do
    begin
      InfoWindowOptions:=TInfoWindowOptions.Create;
      InfoWindowOptions.Content := MBParams[ActiveFilter,Num];
      InfoWindow :=  gmAPI.New(Google.Maps.InfoWindow(InfoWindowOptions));
      Marker.OnClick := procedure(Sender: TObject; Event: TEvent)
      begin
        InfoWindow.Open(Marker.GetMap,Marker);
        callString := 'GM '+MBParams[ActiveFilter,Num];
        actualSite := MBParams[ActiveFilter,Num];
        if(ClipboardCB=True) then
        begin
          Clipboard.AsText := actualSite;
        end
        else
        begin
          RunProg.RunProgramWaiting(progPath, '',callString);
        end;
      end;
    end;
  end;

mfg Peter