trond

hi, comment this line in Model.Types.pas // Get Screen orientation. function TScreenOrientationMonitor.GetScreenOrientation: TScreenOrientation; begin Result := TScreenOrientation.Portrait; // TMessageManager.DefaultManager.SubscribeToMessage(TOrientationChangedMessage, DoOrientationChanged); var screenService: IFMXScreenService; if TPlatformServices.Current.SupportsPlatformService(IFMXScreenService, screenService) then Result := screenService.GetScreenOrientation; end;