Dim context As JavaObject
context.InitializeContext
Dim window As JavaObject = context.RunMethod("getWindow", Null)
window.RunMethod("addFlags", Array(0x80000000)) 'FLAG_DRAWS_SYSTEM_BAR_BACKGROUNDS
window.RunMethod("addFlags", Array(0x00000200)) 'FLAG_LAYOUT_NO_LIMITS
Activity.Height = GetDeviceLayoutValues.Height + 48dip