Ver Mensaje Individual
  #7  
Antiguo 08-03-2016
wolfran_hack wolfran_hack is offline
Miembro
 
Registrado: abr 2013
Posts: 97
Reputación: 12
wolfran_hack Va por buen camino
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);
 // Fix by Flying Wang &
 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
 // http://www.2cto.com/kf/201307/227536.html
 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/
Responder Con Cita