'Origin selection: spinner
spOrigin.Initialize("spOrigin")
Dim bv As BitmapDrawable
bv.Initialize(LoadBitmap(File.DirAssets,"icon1.png"))
Dim bv2 As BitmapDrawable
bv2.Initialize(LoadBitmap(File.DirAssets,"icon2.png"))
spOrigin.Add2("",bv)
spOrigin.Add2("",bv2)
'spOrigin.TextSize=48 '<--------- have tried changing, but only changes text size if present