Screen.displayCount=0 bei Android Device (hier Fire HD 10, 9.Gen)

[philipp.hofmann]

Hi,

hat jemand von euch schon mal das Problem gehabt, dass bei einem Tablet (hier Fire HD 10, 9.Gen -> Android 9 Pie) der DisplayCount=0 ist.
In dem Fall gehen z.B. keine Comboboxen auf, weil die Software nicht weiß, wo sie sie anzeigen soll. Ist dies ein Bug in Delphi oder in der Amazon Android-Integration?
Ein Samsung-Tablet mit Android 9 Pie läuft problemlos.

Ich habe mal einen Issue aufgemacht und vielleicht geht es auch mit der Android 64-Bit-Version, welche uns in 10.3.3 erwartet:
https://quality.embarcadero.com/browse/RSP-26563

Aber vielleicht gibt es ja auch einen Trick.

Grüße, Philipp

[philipp.hofmann]

Ist leider mal wieder das typische Problem:
- der Delphi-Support sagt Amazon ist schuld
- der Amazon-Support sagt Delphi ist schuld

Temporäre Lösung: FMX.Forms zu patchen und für Android habe ich die MultiDisplaySupported-Methode angepasst (davor durchlief auch Android den {$ELSE}-Weg:

Delphi-Quellcode:

function TScreen.MultiDisplaySupported: Boolean;
begin
  {$IFDEF ANDROID}
    if FMultiDisplaySvc = nil then
    begin
      Result := TPlatformServices.Current.SupportsPlatformService(IFMXMultiDisplayService, FMultiDisplaySvc);
      if (Result and (IFMXMultiDisplayService(FMultiDisplaySvc).DisplayCount<=0)) then
        Result:=false;
    end else if ((FMultiDisplaySvc<>nil) and (IFMXMultiDisplayService(FMultiDisplaySvc).DisplayCount<=0)) then
      Result:=false
    else
      Result := True;
  {$ELSE}
    if FMultiDisplaySvc = nil then
      Result := TPlatformServices.Current.SupportsPlatformService(IFMXMultiDisplayService, FMultiDisplaySvc)
    else
      Result := True;
  {$ENDIF}
end;