Google Maps über COM (Component Object Model)

[Thom]

Ich staune auch immer wieder, was da alles drin ist...

Noch ein kleiner Tip: Wenn Du das Overlay öfters aus- und wieder einblendest, wäre es eventuell sinnvoll, das Abräumen der Delphi-Wrapper für die DIV-Elemente von der Destroy- in die OnRemove-Methode zu verlegen:

Delphi-Quellcode:

destructor TUSGSOverlay.Destroy;
begin
  //FDivNode.Free; <- hier und
  //FImageNode.Free; <- hier weg
  inherited;
end;

procedure TUSGSOverlay.OnRemove;
begin
  Variant(DivNode.ParentNode).RemoveChild(DivNode.Disp);
  FDivNode.Free; //<- und dafür hier 
  FImageNode.Free; //<- und hier hin
end;

Machst Du das nicht, produzierst Du zwar dank der Aufräum-Automatik des Frameworks keine Speicherlecks - dafür packst Du Dir aber den Hauptspeicher unnötig voll.

OK. Veränderte Demo SimpleOverlay:

Delphi-Quellcode:

  TForm1 = class(TForm)
    //...
  private
    FMap: TMap;  //<- neu
    FOverlay: TOverlayView; //<- neu
    //...
  public
    //...
    property Map: TMap read FMap write FMap; //<- neu
    property Overlay: TOverlayView read FOverlay write FOverlay; //<- neu
  end;

procedure TForm1.FormShow(Sender: TObject);
var
  //Map: TMap; <- hier entfernen
  //...
begin
  //...
  Overlay:=TUSGSOverlay.Create(Bounds,SrcImage,Map); //<-Overlay in Variable speichern
end;

procedure TForm1.Button1Click(...)
begin
  Overlay.SetMap(TMap(nil)); //<- Overlay von der Karte entfernen -> OnRemove wird aufgerufen
  Overlay.SetMap(Map); //<- Overlay wieder einblenden -> OnAdd und Draw werden aufgerufen
end;

[BlueLiquidCell]

Hey Thom

Vielen dank aber es gibt immernoch Fehler aber ich suche morgen nochmal

Christoph

[Thom]

Wenn's morgen nicht klappt: Ich kann auch noch mal meine veränderte Demo SimpleOverlay posten, wenn es Dir hilft. An der hatte ich das Ein- und Ausblenden des Overlays gerade getestet.

[BlueLiquidCell]

Das wär super, hab wahrscheinlich irgendwas vergessen

Danke
Christoph

[Thom]

Ok. Da ist sie.

Ist nicht schön: Einfach nur ein Button über die Karte geklebt - demonstriert aber das Aus- und Einblenden eines Overlays...



Ich habe die Demo doch noch etwas "schöner" gemacht:
Jetzt ist der Button zum Aus- und Einblenden des Overlays an der richtigen Stelle und über zwei Schieberegler können sogar Opazität und horizontale Verschiebung der Overlays beeinflußt werden.

[BlueLiquidCell]

Hey Thom

Jetzt gehts! Super!

Christoph

[Thom]

Prima - meistens hilf es wirklich, mal eine Nacht über ein Problem zu schlafen...