Google Maps über COM (Component Object Model)

[duff]

Hallo,

beim mir funktionieren Adressensuche und Routenberechnung nicht mehr. Es endet mit einer Exception in der Function

Delphi-Quellcode:

PropertyExists

Delphi-Quellcode:

function TDispObject.PropertyExists(const Name: String): Boolean;
var
  DispID: Integer;
begin
  Result:=GetDispID(FDisp,Name,DispID);
end;

Kann das noch jemand beobachten?

[tueddy]

Ja, ich habe laut diesem Thread https://code.google.com/p/gmaps-api-...detail?id=9004
den Header so erweitert:

<meta http-equiv="X-UA-Compatible" content="IE=edge">

Danach bekomme ich den gleichen Dispatch-Fehler. Es scheint über JavaScript die Eigenschaft "length" abgefragt zu werden in Methode
procedure TDirectionsServiceCallbackObject.Callback;

Wie kann man den Fehler vermeiden?

[duff]

Hallo,

seit heute läuft der Aufruf der PanTo Methode in eine Exception

Delphi-Quellcode:

Script[j].Maps[0].PanTo(LatLng);

Edit:

PanTo funktioniert solange kein Zoom vorher oder nachher aufgerufen wird

Edit 2:

Also das anlegen von Circles ist das Problem. Dieses führt zu einem Scriptfehler: http://maps.google.com/maps-api-v3/a...de_ALL/poly.js

Dies hat bis gestern noch funktioniert


Kann das jemand bestätigen?

Gruß

[jonathan]

Bekomme auch einen poly.js Fehler seit heute ... allerdings beim Anlegen eines Polygons.
:(

Edit:
Der Fehler kommt nicht beim Erzeugen, sondern wenn man die Karte mit Poly.SetMap() oder Poly.Map:= zuordnet.
Das Objekt selbst wid problemlos erzeugt und es kann auch darauf zugegriffen werden... nur die Karte kann nicht zugeordnet werden.
Damit ist es aber natürlich unsichtbar - und damit das ganze witzlos
:-(

[dietmar.boehme]

Ich habe das gleiche Problem mit poly.js,
lasse ich die Map-Zuweisung weg gibt es keinen Fehler mehr, aber auch keine Polylines auf der Karte.

[jonathan]

Ja, schöner Mist.
:evil:

Habe jetzt mal die GMLib ausprobiert.
Da ist zwar der letzte Stand immerhin vom September 2015 ... es tritt dort aber exakt der gleiche Fehler (Error in poly.js) auf!
Und ausserdem ist die GMLib viel langsamer als Thoms Umsetzung.

Hat jemand diese kostenpflichtige Lib hier (von TMS) mal ausprobiert?
Oder weiss sonst jemand hier eine funktionierende Alternative?

[DelphiFan2008]

Hallo,

ich habe bei mir folgende Code-Zeilen angepasst - im Prinzip schon ähnlich hier im Thread beschrieben - ohne den echten Hintergrund zu verstehen. Nachdem kam der "Poly.js" Fehler nicht mehr.

Delphi-Quellcode:

  
  {$IFDEF IE7_MODUS}
    Result:=Result+
        '    <meta http-equiv="X-UA-Compatible" content="IE=EmulateIE11" />
    {$ENDIF}
      Result:=Result+
          '    <meta http-equiv="X-UA-Compatible" content="IE=edge" />';
//        '    <meta http-equiv="X-UA-Compatible" content="IE=8" />';
  if LoadAPI then
  begin

Gruß DelphiFan2008

[jonathan]

Hallo DelphiFan2008,
wenn ich auf "EmulateIE11" oder "edge" stelle gibt es eine AccessViolation bei mir.
:cry:

[duff]

Ich habe schreibe jetzt nur noch folgende meta in der gmAPI.pas

Delphi-Quellcode:

Result:=Result+
          '    <meta http-equiv="X-UA-Compatible" content="IE=edge" />'

IE7_MODUS ist auskommentiert.

So kann ich zumindest wieder circles auf die Karte zeichnen.

Was nicht funktioniert:

Sobald ich z.B. ein OnCLick

Delphi-Quellcode:

GMap.OnClick := MapClick;

Event aufrufe (oder eine Adresssuche) läuft er beim aufruf von

Delphi-Quellcode:

FProc

(BrowserTools.pas) in eine exception

Delphi-Quellcode:

function TExternalMethod.Call: Variant;
begin
  Result:=unassigned;
  try
    if assigned(FProc)
      then FProc                                           //Aufruf der Objektmethode ohne Rückgabewert (Prozedur)
      else if assigned(FFunc)
        then Result:=FFunc;                                //Aufruf der Objektmethode mit Rückgabewert (Funktion)
  except
    {$IFDEF DEBUG}                                         //Exceptions dürfen nicht nach außen dringen
    ShowMessage(FName+': '+Exception(ExceptObject).Message);
    {$ENDIF}
  end;
end;

(BrowserTools.pas)

[jonathan]

Wie gesagt, mit "edge" oder "EmulateIE11" funktioniert das komplette Event-Handling nicht mehr und führt zu einer AccessViolation.

Ich habe jetzt mal spasseshalber die TMS VCL WebGMaps Komponente ausprobiert (v2.6.0.0 vom 06.10.2016) und festellen müssen, dass dort exakt der gleiche poly.js-Fehler auftritt!
:evil:

Hat jemand noch eine Idee?
So wie es aussieht, gibt es wohl aktuell keine funktionierende Lösung mehr...
:(