Ya lo solucione:
1.- Buscar en: C:\Program Files (x86)\Embarcadero\Studio\17.0\source\fmx el archivo: FMX.Platform.Android.pas
2.- Copiarlo en la carpeta del proyecto.
3.- Buscar y reemplazar:
Código Delphi
[-]” function TWindowManager.RetrieveContentRect: TRect; ”
con:
Código Delphi
[-]function TWindowManager.RetrieveContentRect: TRect;
var
Activity: JActivity;
NativeWin: JWindow;
DecorView: JView;
ContentRectVisible, ContentRect: JRect;
begin
Activity := SharedActivity;
if Activity <> nil then
begin
NativeWin := Activity.getWindow;
if NativeWin <> nil then
begin
FStatusBarHeight := FNewContentRect.top;
ContentRect := TJRect.Create;
DecorView := NativeWin.getDecorView;
DecorView.getDrawingRect(ContentRect);
CallInUIThread(
procedure
begin
if (not PlatformAndroid.GetFullScreen(nil)) and (SharedActivity.getWindow.getAttributes.flags and
TJWindowManager_LayoutParams.JavaClass.FLAG_FULLSCREEN <> TJWindowManager_LayoutParams.JavaClass.FLAG_FULLSCREEN) then
begin
ContentRectVisible := TJRect.Create;
DecorView.getWindowVisibleDisplayFrame(ContentRectVisible);
if (ContentRect.top < 1) or (ContentRectVisible.top < FStatusBarHeight) then
begin
ContentRect.top := ContentRectVisible.top;
FNewContentRect.top := ContentRectVisible.top;
FStatusBarHeight := FNewContentRect.top;
end;
end;
end);
Result := TRect.Create(Round(FNewContentRect.left / FScale), Round(FNewContentRect.top / FScale), Round(ContentRect.right / FScale),
Round(ContentRect.bottom / FScale));
end;
end;
end;
Fuente:
https://magnumlabs.wordpress.com/201...based-devices/