Add View

[Colby]

Bonsoir à tous.
Please where can i get the item " ComboBox " ?
ou comment ajouter de nouveaux éléments a la boîte a outils ?
Merci

 

[Mahares]

L' equivalent de combobox en B4A est le Spinner. Voici un petit example:

Dim sp As Spinner

'In Activity_create
sp.Initialize("sp")  'via code not designer
sp.AddAll(Array As String("Benin", "Togo", "Niger", "Soudan", “Maroc”))
Activity.AddView(sp, 0, 60dip, 200dip, 50dip)

Sub sp_ItemClick (Position As Int, Value As Object)
   Msgbox("Pays choisi " & Value,"")
End Sub