Discussion :

[awane]

Bonjour
j'utilise 64 champs Image dans une fenêtre, les valeurs (même image dans tous les champs) de celles-ci sont identiques (une led grise).

je les ai nommés :
Image1
Image2
Image3
...
...
...
Image64

Ce que je souhaite c'est de fabriquer un tableau d'images comme on peut le faire sous Visual Basic :

MonTableauImage[0]= Image1
MonTableauImage[1]= Image2
...
...
...
MonTableauImage[63]= Image64

Comment créer ce tableau d'objets ? Est-ce que c'est possible ?
Cela va me permettre de changer la valeur de l'image que je veux avec une boucle, par rapport à d'autres paramètres.

J'espère que quelqu'un pourrait m'aider pour ce problème.
Merci d'avance.

[hegros]

MonTableauImage est un tableau de 64 chaines
MonTableauImage[1]="my.jpg"

rappel : les indices de tableau commençent à 1 en Windev et pas 0.

[awane]

Merci pour ta réponse,
Ce que je voulais faire c'est plutot ça :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
 
PROCEDURE Lecture_E_S()
 
SI tabEntrees[1]=1 ALORS
Image1_0..Valeur="D:\Mes Projets\Banc de Test\100 activosxg24.gif"
SINON
Image1_0..Valeur="D:\Mes Projets\Banc de Test\100 activosxg07.gif"
FIN
 
SI tabEntrees[2]=1 ALORS
Image1_1..Valeur="D:\Mes Projets\Banc de Test\100 activosxg24.gif"
SINON
Image1_1..Valeur="D:\Mes Projets\Banc de Test\100 activosxg07.gif"
FIN
 
SI tabEntrees[3]=1 ALORS
Image1_2..Valeur="D:\Mes Projets\Banc de Test\100 activosxg24.gif"
SINON
Image1_2..Valeur="D:\Mes Projets\Banc de Test\100 activosxg07.gif"
FIN
 
SI tabEntrees[4]=1 ALORS
Image1_3..Valeur="D:\Mes Projets\Banc de Test\100 activosxg24.gif"
SINON
Image1_3..Valeur="D:\Mes Projets\Banc de Test\100 activosxg07.gif"
FIN
......
.....
SI tabEntrees[n]=1 ALORS
Image1_n..Valeur="D:\Mes Projets\Banc de Test\100 activosxg24.gif"
SINON
Image1_n..Valeur="D:\Mes Projets\Banc de Test\100 activosxg07.gif"
FIN

En fait je ne sais pas si sur Windev, on peut se permetre cette logique:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
pour n=1 A 32
  SI tabEntrees[n]=1 ALORS
  Image[n]..Valeur="D:\Mes Projets\Banc de Test\100 activosxg24.gif"
  SINON
  Image[n]..Valeur="D:\Mes Projets\Banc de Test\100 activosxg07.gif"
  FIN
Fin

Merci d'avance pour votre aide

[Jannus]

C'est parfaitement faisable.
Mais je ne suis pas sûr de ce que tu veux faire ?

Tu as 64 images qui peuvent être différentes selon une valeur de test.
Cette valeur peut-elle être différente ou non pour chaque image ?

J'ai la sensation que tu ne t'y prends pas très bien.
On pourrait mieux t'aider avec plus de précisions.

[awane]

Merci encore Guardian de tes réponses.


Je m'explique :

En vérité
J'ai 64 champs Image, ces dernieres peuvent avoir chaque une que 2 Valeur:
"vrai.jpg" ou "Faux.jpg" et chaque valeur d'image correspent à un élément d'un tableau de bouléens TabTest[n].


Si TabTest[n] = Vrai
Image[n]..Valeur= "Vrai.jpg"
Sinon
Image[n]..Valeur= "Faux.jpg"
Fin

J'espère que je me suis bien expliqué cette fois et merci encore.

[hegros]

Tu peux essayer aussi :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
PROCEDURE Lecture_E_S()
IMG_Vrai est une chaine ="D:\Mes Projets\Banc de Test\100 activosxg24.gif"
IMG_Faux est une chaine ="D:\Mes Projets\Banc de Test\100 activosxg07.gif"
y est un entier
nbES est un entier = Dimension(tabEntrees)
Pour y=1 a nbES      
     {"Image1_"+(y-1)}..Valeur = tabEntrees[y] = true ?  IMG_Vrai Sinon IMG_Faux
   FIN
FIN

[awane]

Merci hegros,
Je vais essayer cette synthaxe.


Merci encore

[hegros]

Mais cette syntaxe n'est pas terrible parce que dans le cas où Image_199 n'existe pas alors une exception est lancée et dans ce cas prècis ton programme plante

[awane]

Oui t'as raison, je viens d'avoir cette exception, mais l'important c'est que ça marche.

Je te remercie beaucoups pou la solution.