MenuItem(Index).TwoLinesAndBitmap.ItemHeight = 50dip
MenuItem(Index).TwoLinesAndBitmap.Label.Height = MenuItem(Index).TwoLinesAndBitmap.ItemHeight
MenuItem(Index).TwoLinesAndBitmap.ImageView.SetLayout(12dip, 12dip, 25dip, 25dip)
MenuItem(Index).Color = BackgroundColor
MenuItem(Index).Tag = Index
MenuPanel.Panel.AddView(MenuItem(Index), 0dip, (Index * 51dip) - TitlePad2, 100%x, 51dip)
MenuPanel.Panel.Height = (Index * 51dip) + TitlePad1
ItemsInMenu = ItemsInMenu + 1