TEST de la presence d'une clée d'une image dans un imagelist......?????
clasix
Messages postés
17
Date d'inscription
mardi 4 janvier 2005
Statut
Membre
Dernière intervention
3 juin 2006
-
15 août 2005 à 14:24
jpleroisse Messages postés 1788 Date d'inscription mardi 7 novembre 2000 Statut Membre Dernière intervention 11 mars 2006 - 15 août 2005 à 15:16
jpleroisse Messages postés 1788 Date d'inscription mardi 7 novembre 2000 Statut Membre Dernière intervention 11 mars 2006 - 15 août 2005 à 15:16
A voir également:
- TEST de la presence d'une clée d'une image dans un imagelist......?????
- Test technique java - Conseils pratiques -C# / .NET
- Une image .tiff repose sur une palette de 256 000 couleurs. - Forum C / C++ / C++.NET
- Test de connection - Forum Delphi / Pascal
- Palette couleur ✓ - Forum C++ & C++ .NET
- Plan de test exemple excel ✓ - Forum Visual Basic 6
4 réponses
cs_cbu
Messages postés
394
Date d'inscription
mercredi 30 janvier 2002
Statut
Membre
Dernière intervention
4 novembre 2009
1
15 août 2005 à 14:41
15 août 2005 à 14:41
SAlut,
if not ImageListe.Images(indexImage) is nothing then
end if
cela marche t il ?
if not ImageListe.Images(indexImage) is nothing then
end if
cela marche t il ?
cs_cbu
Messages postés
394
Date d'inscription
mercredi 30 janvier 2002
Statut
Membre
Dernière intervention
4 novembre 2009
1
15 août 2005 à 14:43
15 août 2005 à 14:43
ou ..
if indexImage < ImageListe.Images.Count then
end if
Bye..
if indexImage < ImageListe.Images.Count then
end if
Bye..
cs_hassen
Messages postés
338
Date d'inscription
mardi 28 janvier 2003
Statut
Membre
Dernière intervention
4 novembre 2008
15 août 2005 à 14:44
15 août 2005 à 14:44
Public function test(indexImage as integer) as boolean
on error goto erreur
dim a
a=ImageListe.Images(indexImage)
test=true
exit function
erreur:
test=false
end function
Hassen TUNISIE
on error goto erreur
dim a
a=ImageListe.Images(indexImage)
test=true
exit function
erreur:
test=false
end function
Hassen TUNISIE
jpleroisse
Messages postés
1788
Date d'inscription
mardi 7 novembre 2000
Statut
Membre
Dernière intervention
11 mars 2006
27
15 août 2005 à 15:16
15 août 2005 à 15:16
Bonjour,
Tu peux faire comme ceci, mais tu dois associer l'index de l'image.
Dans mon exemple, j'ai placé 2 images dans un ImageList, "Horloge1" et "Horloge2".
Private Sub Command1_Click()
If ImageList1.ListImages(1).Key = "Horloge1" Then
MsgBox "La clé existe"
Else
MsgBox "La clé n'existe pas"
End If
End Sub
jpleroisse
Tu peux faire comme ceci, mais tu dois associer l'index de l'image.
Dans mon exemple, j'ai placé 2 images dans un ImageList, "Horloge1" et "Horloge2".
Private Sub Command1_Click()
If ImageList1.ListImages(1).Key = "Horloge1" Then
MsgBox "La clé existe"
Else
MsgBox "La clé n'existe pas"
End If
End Sub
jpleroisse
