System.Sensors.pas:
Delphi-Quellcode:
{$IFDEF ANDROID}
System.Android.Sensors;
{$ENDIF ANDROID}
{$IFDEF IOS}
System.iOS.Sensors;
{$ELSE}
{$IFDEF MACOS}
System.Mac.Sensors;
{$ENDIF MACOS}
{$ENDIF IOS}
{$IFDEF MSWINDOWS}
System.Win.Sensors;
{$ENDIF}
Ist deine Zielplattform Windows, wird
TGeoCoder.Current
einen TWindowsGeocoder zurückliefern.
Das Problem ist, dass man bei
System.Win.Sensors.TPlatformGeocoder
zwar die Methode
GetGeocoderImplementer(): TGeocoderClass
überschreiben kann, die Klasse
TWindowsGeocoder
allerdings im
implementation
-Teil der
Unit deklariert ist und du von dieser nicht ableiten kannst.
Somit: Von TPlatformGeocoder ableiten wäre auch mein erster Schritt gewesen, dann weiß ich aber genauso wenig weiter: Ich müsste mir jetzt einen komplett neuen
TGeoCoder
schreiben (oder den Code aus System.Win.Sensors
kopieren). Das kann es doch nicht sein...