Public Sub Resize(Width As Int, Height As Int)
If IsOpen Then ChangeOffset(-mSideWidth, False, True)
#if B4A
mBasePanel.SetLayoutAnimated(0, 0, 0, Width, Height)
mLeftPanel.SetLayoutAnimated(0, mLeftPanel.Left, 0, mLeftPanel.Width, mBasePanel.Height)
mDarkPanel.SetLayoutAnimated(0, 0, 0, Width, Height)
mCenterPanel.SetLayoutAnimated(0, 0, 0, Width, Height)
#else if B4i
mBasePanel.SetLayoutAnimated(0, 0, -20, Width, Height+20)
mLeftPanel.SetLayoutAnimated(0, mLeftPanel.Left, 0, mLeftPanel.Width, mBasePanel.Height)
mDarkPanel.SetLayoutAnimated(0, 0, 0, Width, Height+40)
mCenterPanel.SetLayoutAnimated(0, 0, 20, Width, Height+20)
#End If
End Sub