Super Sache !
Hätte ich dein Werk einen Monat früher gefunden, hätte ich mir einiges an Arbeit erspart ;-(
Hab gleich ein wenig gespendet, so eine Leistung gehört honoriert.
Versuche gerade mein (Mach)Werk zu ersezten, und stoße da an meine Grenzen...
Hab ein paar Funktionen in eine eigene Komponete X ausgelagert um meine alter Version 1:1 zu ersetzen. Diese Komponente behinhaltet einen TWebBrowser ,eine DBGrid udn noch ein paar andere Komponenten.
In der Applikation rufe ich im Onshow
Delphi-Quellcode:
newMap:=TX.create(Frame1);
newMap.parent:=Frame1;
newMap.show();
so definiert:
Delphi-Quellcode:
procedure TX.Show();
begin
if Script=nil then
with TScript.Create(WebBrowser) do
LoadAPIAsync(InitMap);
end;
dann
newMap.initMap();
so definiert:
Delphi-Quellcode:
procedure TX.InitMap();
Var ActualPos:TLatlng;
begin
with TScript(Script) do
begin
ActualPos:=New(Google.Maps.LatLng(48,5,16.36974));
....
und fliege mit einer Execption da script=nil ist !
Wenn ich "with TScript(Sender) do" wie in einigen Beispielen verwende, wer/was ist dann der sender??
Und kann mir wer die Sysntax in TX.show gerklären ?
Sorry ich steh ein wenig auf dem Schlauch, meine Delphi5(!) Wissen ist ein wenig eingerostet...