FMX IFMXScreenService GetScreenScale

[t2000]

Moin zusammen,

ich benötige die Skalierung des Monitor in Firemonkey. Und zwar von dem, auf dem die Anwendung läuft.

Ich nutze zur Zeit folgendes:

Code:

  FMXScreenService  := IFMXScreenService( TPlatformServices.Current.GetPlatformService(IFMXScreenService));
  FMXDisplayService := IFMXMultiDisplayService( TPlatformServices.Current.GetPlatformService(IFMXMultiDisplayService));

  CurrentDisplay := FMXDisplayService.DisplayFromWindow( MeineMainForm.Handle);
  CurrentScreenScale := FMXScreenService.GetScreenScale;

Ich habe 3 Monitore. Einer hat 100% und die anderen 150%. Der Primary Monitor ist 150%
Ich kann mit FMXDisplayService.DisplayFromWindow(MeineMainForm. Handle) den aktuellen Monitor ermitteln. Aber wie bekomme ich die Skalierung? Eine Property ist nicht vorhanden und beim ScreenService bekomme ich immer 150%, egal auf welchem Monitor die Anwendung läuft.
Wie kann ich FMXScreenService beibringen, "meinen" Monitor zu untersuchen?

Danke
VG Thomas