Dim icona, icona2, icona3, icona4 As Bitmap
Dim icona5, icona6, icona7, icona8 As Bitmap
Dim theme = 0 As Int '0=holo dark, 1=holo light
' per impostare holo light modificare anche Manifest Editor
' SetApplicationAttribute(android:theme, "@android:style/Theme.Holo.Light")
If theme = 0 Then
icona.Initialize(File.DirAssets, "setting_dark.png")
icona2.Initialize(File.DirAssets, "lente_dark.png")
icona3.Initialize(File.DirAssets, "info_dark.png")
icona4.Initialize(File.DirAssets, "no_dark.png")
icona5.Initialize(File.DirAssets, "allegato_dark.png")
icona6.Initialize(File.DirAssets, "BS_dark.png")
icona7.Initialize(File.DirAssets, "refresh_dark.png")
icona8.Initialize(File.DirAssets, "sveglia_dark.png")
Else
icona.Initialize(File.DirAssets, "setting_light.png")
icona2.Initialize(File.DirAssets, "lente_light.png")
icona3.Initialize(File.DirAssets, "info_light.png")
icona4.Initialize(File.DirAssets, "no_light.png")
icona5.Initialize(File.DirAssets, "allegato_light.png")
icona6.Initialize(File.DirAssets, "BS_light.png")
icona7.Initialize(File.DirAssets, "refresh_light.png")
icona8.Initialize(File.DirAssets, "sveglia_light.png")
End If
Activity.AddMenuItem("Apri", "open")
Activity.AddMenuItem2("Chiudi", "close", icona4)
Activity.AddMenuItem2("Impostazioni", "setup", icona)
Activity.AddMenuItem3("ricerca", "search", icona2, True)
Activity.AddMenuItem3("info", "info", icona3, True)
Activity.AddMenuItem3("a", "a", icona5, True)
Activity.AddMenuItem3("b", "b", icona6, True)
Activity.AddMenuItem3("c", "c", icona7, True)
Activity.AddMenuItem3("d", "d", icona8, True)
Activity.Title = "holo test - by fabio"