Discussion :

[Bzik59]

Bonjour le forum.
J'ai créé un groupe de 10 champs de saisie nommés : a,b,c,.....,j
et 2 champs nommés A et B n'appartiennent pas au groupe.
Je cherche un code pour remplir les champs du groupe par des croix(x) sous conditions dépendentes des valeurs des champs A et B.
Exemple:
Si champ_A = 2 et Champ_B = 5 alors
Les 2 premiers champs_a = × et champ_b = ×
Et les 5 derniers f,g,h,i,j tous = × pour que les 3 champs du milieu c,d,e restent vides.
Y'a t- il un code plus simple sans passer par le long code des conditions traditionnelles.
Merci

[tatayo]

Bonjour,
Il n'y a pas besoin d'un "code long et compliqué".
Tu parcours les champs avec un EnumereChamp(), en prenant soit de ne lister que les champs de ce groupe (je te laisse regarder dans l'aide en ligne comment faire).
Dans la boucle, tu incrémentes un compteur, et si sa valeur est inférieure ou égale à Champ_A, ou supérieure ou égale à Champ_B, tu affectes x au champ "courant" (celui de la boucle), si besoin avec une indirection.
Vu de loin dans le brouillard, 5 lignes de code.

Tatayo.

[tbc92]

Il faut quand même s'assurer que la fonction enumèreChamp() renvoie les 10 champs toujours dans le même ordre, et toujours dans l'ordre qui nous arrange bien. Peut-être que ça marche aujourd'hui, mais que ça va planter demain, parce que tu vas modifier tel ou tel champ et la fonction enumèreChamp ne va plus renvoyer les champ dans le même ordre ?

Si les 10 champs à manipuler ont des noms 'normalisés' (tous construits selon une certaine logique), alors j'utiliserais les indirections (voir ce mot clé dans l'aide). Je pense qu'ainsi, on a l'assurance que le traitement fait ce qu'on veut.

Ca reste 5 ou 6 lignes de code.

[Bzik59]

Est ce que je peux avoir de l'aide pour ce code?
J'ai testé la fonction Enumèrechamp() et l'indirection {NomChamps,indChamp} ="x", je n'ai que le nbre de champs non vides du groupe et tous les champs sont cochés (×).
Comment incrémenter un compteur pour mon groupe de champs?

[tbc92]

Code :

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

1
2
3
4
5
6
7
8
9
10
11
limite1, limite2, i est un entier 
limite1 = 2
limite2 = 5
pour i = 1 a 10
   nom_champ = "champs_" + milieu( "abcdefghij",i,1)
   si i <= limite1 _ou_ i >= 10-limite2  alors 
      {nom_champ, indchamp} = "x"
   sinon
      {nom_champ, indchamp} = " "
   fin
fin

Pas testé du tout, mais ça devrait fonctionner.

[Bzik59]

Ça marche parfaitement, merci bcp

[Bzik59]

Je reviens vers vous une autre fois, et je reste tjrs dans le même sujet du groupe des 10 champs de saisie cité en haut. La question est la suivante:
Je cherche un code pour récupérer la valeur du premier champ non vide du groupe.
Exemple:
sai_champ_a = 0 ,
sai_champ_b = 0 ,
sai_champ_c = 12 ,
sai_champ_d = 20,
sai_champ_e = 43 ,
sai_champ_f = 0 ,
sai_champ_g = 0 , .....
Je veux récupéré dans un champ a l'extérieur du groupe la valeur du premier champ non nulle, c'est à dire la valeur du
sai_champ_c qui est 12
Merci pour votre aide

[tatayo]

Bonjour,
Avec le code de tbc92, tu sais boucler sur tes champs, et leur affecter une valeur.
L'adapter pour lire la valeur des champs ne présente vraiment aucune difficulté.

Tatayo

[Bzik59]

J'arrive pas à avoir la valeur du premier champ non nul.
J'ai adapté le code de tbc92 mais j'obtiens la valeur du dernier champ non nul du groupe .
Le code est le suivant:

Code :

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

1
2
3
4
5
6
pour i = 1 a 10 
   NomChamp= EnumèreChamp(Gr_groupe1, i ,1) 
   SI {NomChamp, indchamp} <> 0 ALORS
       SAI_résultat =   {NomChamp, indchamp}
    SINON SAI_résultat = 0
FIN

Qu'est ce que je dois rajouter pour avoir la valeur du premier champs non nul du groupe.

[tatayo]

Petite correction:

J'ai adapté le code de tbc92 mais j'obtiens la valeur du dernier champ non nul du groupe s'il est non nul, sinon 0.

Si tu relis bien con code, tu devrais trouver rapidement le pourquoi du comment.
Sinon je tu suggère de poser un point d'arrêt, et d'avancer pas à pas en surveillant ce qu'il se passe. Le problème devrait te sauter aux yeux, ainsi que la solution.

Tatayo.

[Bzik59]

Bonjour Tatayo. Bien sûr je vais pas poser cette question si je suis expert comme vous. Je suis débutant en WinDev. Si vous m'aidez à résoudre mon problème, ça sera une leçon supplémentaire pour moi. Alors merci de me dire ce que je peux faire si vous voulez.
Ce que j'ai fait c'est ç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
POUR i = 1 A 10 
     NomChamp= EnumèreChamp(Gr_groupe1, i ,1) 
     SI {NomChamp, indchamp} = 0 ET i < 5 ALORS 
          NbreChamps = NbreChamps +1
     FIN
FIN
SAI_résultat = NbreChamps
 
POUR j = 1 A NbreChamps + 1
     NomChamp= EnumèreChamp(Gr_groupe1, i ,1) 
     SI {NomChamp, indchamp} <> 0 ALORS 
          SAI_résultat2 = {NomChamp, indchamp} 
     FIN
FIN

Je m'en sors comme ça mais je sens que ce n'est tout à fait juste

[tbc92]

Ici, il ne s'agit pas d'être expert en Windev, mais expert en programmation, au sens large (et le mot expert ...) Le même raisonnement s'appliquerait dans n'importe quel langage.

Ton programme, il fait quoi :

. Tu regardes chacun des 10 champs, du premier au dernier
. Si le champ est vide, tu ne fais rien.
. Si le champ n'est pas vide , tu écris dans sai_resultat la valeur du champ que tu viens de lire. Et tu continues le traitement : tu recherches une nouvelle valeur, pour écraser ce que tu viens d'écrire

Pour les débutants en programmation, on leur conseille en général de dessiner un algorithme.

Ici, tu n'as pas fait cette étape, tu n'as pas réfléchi à l'algorithme. tu as écris un cheminement (faux dans ce cas), et tu as aussitôt traduit en langage informatique. La démarche n'est pas bonne. Il faut d'abord érire un algorithme (avec des dessins comme sur le lien que j'ai donné), et quand on est convaincu que l'algorithme est correct, tu peux traduire l'algorithme dans le langage de ton choix.

[Bzik59]

OK je vais essayer merci