Sub Activity_Create(FirstTime As Boolean)
'Do not forget to load the layout file created with the visual designer. For example:
Activity.LoadLayout("mainmenu")
slider.Initialize("slider")
Activity.AddView(slider,0,lblmenuinfo.Height +lblmenuinfo.Top,100%x,20%y)
clvitems.AsView.Top = slider.Top + slider.Height
clvitems.AsView.Height = 60%y
slider.Color = Colors.white
slider.Delay = 3000
slider.SetTransition(slider.SLIDER_TRANSITION_Fade)
slider.Start
'
'SET CART BADGE
badge.Initialize
badge.SetBadge(btncart,clvcartitems.Size)
'init slidemenu
slidemenu.Initialize(Activity, Me, "SlideMenu", btnmenu.Top+btnmenu.Height,100%x, 35%y,Starter.maincolour,Colors.White,False)
slidemenu.AddItem("My Profile",LoadBitmap(File.DirAssets,"profile.png"),"profile")
slidemenu.AddItem("Total Spent",LoadBitmap(File.DirAssets,"money.png"),"")
slidemenu.AddItem("Orders",LoadBitmap(File.DirAssets,"orders.png"),"")
slidemenu.AddItem("Cart",LoadBitmap(File.DirAssets,"cart2.png"),"cart")