Discussion :

[Trebor]

Bonjour à tous.

J'ai une table MySQL dans laquelle se trouve plusieurs colonnes : id, animation, durée.

Dans ma fenêtre, j'ai une COMBO_animation avec saisie (pour ajouter des animations), une COMBO_id et un champ SAI_durée.

Je souhaiterais que lorsque un animation choisi une animation dans la COMBO_animation, le reste des champs soient automatiquement rempli.

J'ai essayé plusieurs choses, fait de nombreuses recherches sur le net mais je n'ai pas réussi à mettre en oeuvre mon souhait.

Je dois probablement mal m'y prendre ou placer mon code au mauvais endroit.

J'ai consulté la documentation mais n'ai pas réussi non plus.

Merci d'avance pour l'aide que vous pourrez m'apporter.

[Trebor]

Je vais un peu étoffer mon sujet en précisant que ma combo_animation se rempli automatiquement via les données de ma base de donnée.

[tbc92]

Est-ce que tu places ton code au bon endroit ? Va savoir. Tu le places où ?
Est-ce que ton code est correct ? Va savoir. Tu en es où dans ta dernière version ?

[Trebor]

Comme rien ne fonctionnait, j'ai supprimé tout le code.

Finalement, je souhaiterais "couplé" mes deux COMBO... certains de mes collègues animateurs préférent saisir par code et d'autres par libellé...

Dans l'idée, lorsque je saisi le libellé de l'animation ou que je sélectionne un libellé, la COMBO_id affiche automatiquement le code de l'animation et la durée et vice-versa lorsque je saisi l'ID, la combo_animation affiche l'animation qui correspond au code.

J'ai placé mes essais de code dans "Sélection d'une ligne de COMBO_animation" pour voir si cela marchait mais ça n'a rien changé.

Il me faut peut-être ajouté un HLitRecherchePremier ou des commandes supplémentaires.

C'est la première fois que j'utilise un COMBO.

[philouZ]

Dans la sélection de ta combo, il faut que tu fasses quelque chose comme ça.

Code :

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

1
2
3
SI HLitPremier(animation,id,COMBO.id,hidentique) alors
FichierVersEcran()
FIN

Si tu ne l'is pas l'enregistrement windev ne peut pas savoir quoi afficher

[Trebor]

J'étais sûr qu'il me fallait ajouter quelque-chose de cet ordre après mon précédent message.

C'était si simple... Je vais refaire mon code pour voir ce que cela donne.

[Trebor]

Voilà, problème presque résolu...

Voici le code de mon combo_id (selection d'une ligne COMBO) :

Code :

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

1
2
3
4
5
6
7
8
res est un entier
res = combo_id
 
SI HLitPremier(animation,res) ALORS
	COMBO_animation = animation.libelle
	SAI_Durée_en_jours				= animation.duree
	SAI_Date_de_fin_animation	=  EntierVersDate(DateVersEntier(SAI_Date_de_début_animation) + SAI_Durée_en_jours)
FIN

Voici le code de mon combo_animation

Code :

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

1
2
3
4
5
6
7
8
res est un entier
res = combo_animation
 
SI HLitPremier(animation,res) ALORS
	COMBO_id = animation.id
	SAI_Durée_en_jours				= animation.duree
	SAI_Date_de_fin_animation	=  EntierVersDate(DateVersEntier(SAI_Date_de_début_animation) + SAI_Durée_en_jours)
FIN

Ca fonctionne mais le problème est que les valeurs des champs et COMBO ne se mettent pas à jour après une seconde sélection.

Je précise que les deux combos sont dans la même fenêtre.

[tbc92]

Tu fais ça

Code :

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

1
2
3
4
5
SI HLitPremier(animation,res) ALORS
	COMBO_animation = animation.libelle
	SAI_Durée_en_jours				= animation.duree
	SAI_Date_de_fin_animation	=  EntierVersDate(DateVersEntier(SAI_Date_de_début_animation) + SAI_Durée_en_jours)
FIN

Je tte propose de modifier un peu

Code :

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

1
2
3
4
5
6
7
SI HLitPremier(animation,res) ALORS
	COMBO_animation = animation.libelle
	SAI_Durée_en_jours				= animation.duree
	SAI_Date_de_fin_animation	=  EntierVersDate(DateVersEntier(SAI_Date_de_début_animation) + SAI_Durée_en_jours)
sinon
        WARNING ( "Perdu !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! " )
FIN

ça ne va pas beaucoup t'avancer.... mais dans ton code, tu envisages le cas où ça se passe bien ... et tu laisses le programme totalement silencieux quand ça se passe mal.

Quand ça se passe mal, le programme doit CRIER pour te prévenir que ça va mal.
A la place du mot PERDU, tu peux certainement lui demander d'afficher des informations plus pertinentes.

Concrètement, je remplacerais hLitPremier par Lit RecherchePremier pour corriger le problème ... On doit RECHERCHER la première ligne qui correspond à notre critère, et pas lire la première ligne venue.
Et du coup, attention, la syntaxe de hLitRecherchePremier est un peu différente.

[Trebor]

Vi vi vi...

C'est effectivement prévu...

J'ai bien un SINON... si ça se passe mal... et je gère l'erreur complète dans un fichier log mais j'avais la flemme de recopier l'intégralité du code. C'est surtout pour la gestion de la mise à jour des champs que cela me posait problème.

Je n'ai pas pensé à HLitRecherchePremier. Je vais immédiatement tester cette nouvelle information.

[Trebor]

Problème solutionné... Un grand merci à vous...

L'utilisation de HlitRecherchePremier à changé ma vie...