Überlappende System-Status-Bar auf IOS scheinbar ab Delphi 10.2.2

[CHackbart]

Ja,

das ist mir heute auch aufgefallen als ich mal wieder ein Projekt anpassen musste.

In FMX.Platform.IOS gibt es eine Funktion namens UpdateStatusBarHeight

Delphi-Quellcode:

function UpdateStatusBarHeight(const ARootView: id; const AStatusBarConstraints: NSLayoutConstraint): Single;
var
  RootView: UIView;
begin
  RootView := TUIView.Wrap(ARootView);
  // It returns system status bar height
  Result := RootView.safeAreaLayoutGuide.layoutFrame.origin.y;
  // Refresh height of status bar view spacer TFMXViewController.StatusBarView
  AStatusBarConstraints.setConstant(Result);
end;

laut Debugger ist result = 0.
Prinzipiell sollte aber das hier als Alternative gehen:

Delphi-Quellcode:

function UpdateStatusBarHeight(const ARootView: id; const AStatusBarConstraints: NSLayoutConstraint): Single;
begin
  result := 20;
  AStatusBarConstraints.setConstant(Result);
end;

Christian
PS: Ich bin mir nicht mal sicher, ob das wirklich ein Bug von Delphi ist.