mi.Initialize("MaterialIcon")
mi.Color = Colors.Red
Dim iconlist As List
iconlist.Initialize
iconlist = mi.Iconlist
Log(iconlist)
For i = 0 To 249
mi2.Initialize("MaterialIcon")
Dim idx As Int = Rnd(1,iconlist.Size)
mi2.Icon = idx
mi2.Color = Colors.RGB(Rnd(1,255),Rnd(1,255),Rnd(1,255))
Dim posx As Int = Rnd(0,100%x-50dip)
Dim posy As Int = Rnd(0,100%y-50dip)
Activity.AddView(mi2,posx,posy,50dip,50dip)
Next
