French Images aléatoires

Tata Mapassa

Member
Licensed User
Longtime User
Bonjour,

Comment afficher de manière aléatoire des images dans une imageview à 'aide de l’événement click ?
Merci
 

klaus

Expert
Licensed User
Longtime User
Comme ceci:

B4X:
Sub Globals
    Private imvTest As ImageView
    Private IndexImage = 0 As Int
    Private NomFichier(4) As String
End Sub

Sub Activity_Create(FirstTime As Boolean)
    NomFichier = Array As String ("edelweiss.jpg", "gentiane.jpg", "lys_martagon.jpg", "rose.jpg")
    Activity.LoadLayout("Main")
    
    imvTest.Bitmap = LoadBitmap(File.DirAssets, NomFichier(IndexImage))
End Sub

Private Sub imvTest_Click
    IndexImage = Rnd(0, NomFichier.Length)
    Log(NomFichier(IndexImage))
    imvTest.Bitmap = LoadBitmap(File.DirAssets, NomFichier(IndexImage))
End Sub
 

Attachments

  • ImagesAleatoires.zip
    187.9 KB · Views: 186
Top