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 34
| PROCEDURE Utiliser_ChampClone()
Chaine_Proposition, Chaine_image,chaine_Ovale, Chaine_mot est une chaîne
y_image, y_ovale0, y_mot sont des entiers système
x = Proposition1..XInitial
y = Proposition1..YInitial
y_image = Image1..YInitial
y_ovale0 = Ovale01..YInitial
y_mot = Question1..YInitial
//y_réponse = Réponse1..YInitial
POUR i = 2 A 10
Chaine_Proposition = "Proposition" + i
Chaine_image = "Image" + i
chaine_Ovale = "Ovale0" + i
Chaine_mot = "Question" + i
//Chaine_Réponse = "Réponse" + i
x += 224
SI i = 6 ALORS
x = Proposition1..XInitial
y = Proposition1..YInitial + 64
y_mot += 250
y_image += 250
FIN
ChampClone(Image1, Chaine_image, x, y_image)
ChampClone(Ovale01, chaine_Ovale , x, y)
ChampClone(Question1, Chaine_mot, x, y_mot)
ChampClone(Proposition1, Chaine_Proposition , x, y)
FIN |
Partager