iOS Question Content is not displayed on the screen (iPhone 13)

[angel_]

I have an app where a user (with iPhone 13) shows me a video with an error in the app. The problem is that when entering some sections from the main screen, the content of the screen is not shown, if you close the app from multitasking and open the app again, the same thing happens again, this does not happen in all the sections and It doesn't always happen in the same screen either.

I have tried to reproduce the problem on real devices (does not match user model) and also not on the simulator (appetize.io/) since there is no iPhone 13.

I use B4XPages and mainly libraries ASViewPager, ASTabStrip and AsTabMenu .

The app is quite large and showing all the code would not be understood, I show an idea of how I load the screens. Maybe with this someone can suggest me where the problem could be.

Private Sub B4XPage_Created (Root1 As B4XView)
    Root = Root1
  
    LoadLayoutMain
End Sub

Private Sub LoadLayoutMain
    Dim HamburgerIcon As B4XBitmap
    Wait For B4XPage_Resize(Width As Int, Height As Int)
          
    Dim r As Rect = B4XPages.GetNativeParent(Me).SafeAreaInsets

    Dim p1 As B4XView = xui.CreatePanel("")
    p1.SetLayoutAnimated(0, 0, 0, 100%x, 150%y)
    p1.LoadLayout("Principal")
  
    'Code position views
    '....

    InitializeActivities
End Sub

Private Sub B4XPage_Resize (Width As Float, Height As Float)
        Drawer.Resize(Width, Height)
End Sub

Sub InitializeActivities
    Page1.Initialize
    B4XPages.AddPage("Page1", Page1)
  
    Page2.Initialize
    B4XPages.AddPage("Page2", Page2)
  
    '....16 pages
End Sub

Sub ShowPage1_Click
    B4XPages.ShowPage("Page1")
End Sub

Public Sub Initialize

End Sub

'This event will be called once, before the page becomes visible.
Private Sub B4XPage_Created (Root1 As B4XView)
    Root = Root1

    LoadLayoutPage1
End Sub

Sub LoadLayoutPage1
    B4XPages.GetNativeParent(B4XPages.MainPage).Title = ""
    TitlePage
  
    'Code to position views

    '...code
End Sub

Private Sub B4XPage_Resize (Width As Float, Height As Float)
        Dim r As Rect = B4XPages.GetNativeParent(Me).SafeAreaInsets
        Root.SetLayoutAnimated(0, r.Left, r.Top, Width - r.Right - r.Left, Height - r.Bottom - r.Top)
End Sub