Hallo Thom
Bei der Variante mit Marker.Data:=InfoWindow erhalte ich eine EAccessViolation
ohne nähere angaben. Habe schon versucht das Info-Window nur einzeilg zu halten brachte aber keinen Unterschied.
Du müßtest das Info-Fenster an den Marker "binden". Ab Delphi 2009 geht das sehr komfortabel über anonyme Methoden. Ansonsten könntest Du die
Data-Eigenschaft des Markers nutzen und dort das InfoWindow-Objekt ablegen (vergleichbar mit
TListItem.Data):
Delphi-Quellcode:
Marker.Data:=InfoWindow;
[...]
Die Anzeige im MarkerClick-Ereignis ist dann einfach:
Delphi-Quellcode:
[...]
var
Marker: TMarker;
InfoWindow: TInfoWindow;
begin
Marker:=Sender as TMarker;
InfoWindow:=(Marker.Data) as TInfoWindow;
if assigned(InfoWindow)
then InfoWindow.Open(Marker.GetMap,Marker);
end;
[/DELPHI]
Mit dem Array bin ich noch nicht ganz klar gekommen, werde mich als nächstes daran versuchen.
Das ganze sieht aber schon wirklich super aus.
Manfred