' handle resize event for MainPage - Panel
Private Sub pnlMain_Resize (Width As Double, Height As Double)
' handle all object inside of MainPanel
For i = 0 To pnlMain.NumberOfViews - 1
Dim view As B4XView = pnlMain.GetView(i)
view.Height = Height
view.Width = Width
Next
End Sub