Sub SetTabBarHeight(tbc As TabBarController, Height As Float)
Dim no As NativeObject = Me
no.RunMethod("setTabBarHeight::", Array(tbc, Height))
End Sub
#if OBJC
- (void)setTabBarHeight:(UITabBarController*)tbc :(float)height {
CGRect tabFrame = tbc.tabBar.frame;
tabFrame.size.height = height;
tabFrame.origin.y = tbc.view.frame.size.height - height;
tbc.tabBar.frame = tabFrame;
}
#end if