Google Maps über COM (Component Object Model)

[omata]

entschuldigung

[DeddyH]

Am Ende des Ausgangsposts:

Zitat:

Allen Interessenten würde ich die Quelltexte nach Absprache per Email zuschicken (sind gezippt nur rund 150kB).

[edit] Na prima, wegeditiert, ich liebe sowas [/edit]

[DelphiFan2008]

Hallo Thom,

schätze langsam, dass der Kauf von "Delphi XE Starter" etwas übereilt war. Denkst du, dass eine Anpassung deines Framework an XE-Starter hinbekommst - ansonsten ist XE-Starter für mich unsinnig.

Gruss DelphiFan2008

[DeddyH]

Das verstehe ich nicht, wieso sollte das mit XE Starter nicht funktionieren?

[Thom]

@DeddyH,

das Framework sollte funktionieren. Aber leider fehlt in der Starter Edition die Komponente TWebBrowser und ich vermute, daß auch der Import von Typbibliotheken gestrichen wurde. Eine Alternative wäre der Embedded Web Browser. Dann müßten aber alle Demos von mir geändert werden.

Ich habe eine Package erstellt, das TWebBrowser und etliche andere Objekte, die das IE-ActiveX exportiert, enthält. Die Typbibliothek ist frisch von meinem IE8 importiert - enthält also keinerlei Code von Embarcadero und sollte deshalb lizenztechnisch gesehen keine Probleme bereiten. Ich hatte das Package gestern abend ohne Probleme in meinem Delphi XE getestet. Ein Test mit Delphi Starter steht allerdings noch aus.

[DelphiFan2008]

Hallo,

mit dem Package von Thom funktionieren nun alle Demos wieder . Damit ist der Einsatz unter Delphi XE Starter ebenfalls sicher gestellt. Der obige Beitrag war spontan aus Frust entstanden!

@Thom,

wäre gut wenn du das TWebBrowser Package hier im Forum bereitstellen würdest.

Gruß DelphiFan2008

[Thom]

Für alle Besitzer der Delphi Starter Edition:
Die fehlende TWebBrowser-Komponente kann hier "nachgerüstet" werden. Zip-Datei downloaden, entpacken und das enthaltene Package installieren. Vorher evtl. noch das Ausgabeverzeichnis für die dcu-Dateien anpassen oder in den Bibliothekspfad aufnehmen.
Das Package wurde von mir selbst erstellt und ist keine Kopie des Originals, das Delphi XE beiliegt.

[Thom]

Zitat von omata:

Bin wohl blind.

Sicher nicht - wohl im vielen Text nur überlesen.

Zitat:

Wo bekommt man die her?

Bei mir. Nette Anfrage über PM unter Angabe Deiner Emailadresse und Du bekommst so schnell wie möglich die aktuelle Version mit den Quelltexten des Frameworks und allen Demos - und das sind sogar mehr, als ich hier bisher veröffentlicht habe...

@DeddyH

[s_weinrich]

Hallo Thom,

Nach unserem Austausch über PM habe ich eine Menge probiert und viel über Google Maps im Allgemeinen gelesen (u.a. Gabriel Svennerberg). Meine Applikation macht auch schon große Fortschritte. Danke nochmals für das Framework.

Eines ist mir aufgefallen. Du definierst eine Klasse TPoint. Diesen Bezeichner gibt es in Delphi 7 schon:
type TPoint = packed record
x:LongInt;
y:LongInt;
end;
Ich verwende den Typ im Zusammenhang der Formatierung meiner Forms. Die Funktion ScreenToClient machte dann Ärger.

Ich habe deshalb mal Dein Framework dahingehend geändert, dass ich Dein TPoint in TgmPoint geändert habe - in allen Units. Damit funktioniert erstmal mein Projekt zufriedenstellend. Vielleicht kannst Du ja mal alles ansehen und evtl. korrigieren.

Evtl. gibt es noch einen anderen Workaround?

Viele Grüße aus Erfurt

Stefan

[uligerhardt]

Zitat von s_weinrich:

Eines ist mir aufgefallen. Du definierst eine Klasse TPoint. Diesen Bezeichner gibt es in Delphi 7 schon:
type TPoint = packed record
x:LongInt;
y:LongInt;
end;
Ich verwende den Typ im Zusammenhang der Formatierung meiner Forms. Die Funktion ScreenToClient machte dann Ärger.

Zitat von s_weinrich:

Evtl. gibt es noch einen anderen Workaround?

Gibt es: Schreib an den relevanten Stellen statt TPoint explizit Windows.TPoint (oder Types.TPoint ) bzw. TGoogleZeugs.TPoint .